
В массиве случайных чисел найти сумму и количество элементов значение которых больше -3 но меньше 20


Ответы на вопрос

Ответ:
const
N = 10;
var
mas: array [1..N] of integer;
sum,count,i:integer;
begin
for i:=1 to N do begin
mas[i] := random(51)-10;
end;
writeln('Массив: ');
for i:=1 to N do begin
write(mas[i] + ' ');
end;
writeln();
for i:=1 to N do begin
if (mas[i] > -3) and (mas[i] < 20) then begin
sum += mas[i];
count+=1;
end;
end;
writeln('Сумма элементов массива, значение которых больше -3 но меньше 20 = ' + sum);
writeln('Их количество = ' + count);
end.
Объяснение:
Pascal.



===== PascalABC.NET =====
begin
var n := ReadInteger('n =');
var a := ArrRandom(n, -99, 99);
a.Println;
var s := a.Where(p -> p.InRange(-2, 19));
Writeln('Сумма ', s.Sum, ', кол-во ', s.Count)
end.




Хорошо, чтобы найти сумму и количество элементов в массиве случайных чисел, которые находятся в интервале между -3 и 20, можно использовать следующий алгоритм:
- Инициализируйте переменные
сумма
иколичество
со значениями 0. - Переберите каждый элемент массива случайных чисел.
- Если текущий элемент больше -3 и меньше 20, выполните следующие шаги:
- Увеличьте значение
сумма
на текущий элемент. - Увеличьте значение
количество
на 1.
- Увеличьте значение
- Выведите найденную сумму и количество элементов.
Ниже приведен пример кода на языке Python, реализующий описанный алгоритм:
pythonimport random
# Создание массива случайных чисел
array = [random.randint(-10, 30) for _ in range(100)]
# Инициализация переменных
summa = 0
count = 0
# Перебор элементов массива
for num in array:
if -3 < num < 20:
summa += num
count += 1
# Вывод результата
print("Сумма элементов:", summa)
print("Количество элементов:", count)
Обратите внимание, что в приведенном примере я использовал random.randint(-10, 30)
, чтобы сгенерировать случайные числа в диапазоне от -10 до 30. Вы можете изменить эти значения в зависимости от ваших требований.


Похожие вопросы
Топ вопросов за вчера в категории Информатика







Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili