
ОЧЕНЬ НАДО 9 КЛАСС ИНФОРМАТИКА (пожалуйста напишите полную программу, лучший ответ отмечу!!11!)
Написать программу: Заполнить массив из 20 элементов случайными числами на интервале [-20, 25]. Найти произведение элементов с четными номерами.

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

var a:array [1..20] of integer;
i:integer;
p:real;
begin
p:=1;
for i:= 1 to 20 do
begin
a[i]:= Random(46)-20;
if i mod 2 = 0 then p:=p*a[i]
end;
writeln('Массив: ',a);
writeln('Произведение элементов с чётными номерами равно: ',p);
end.



Программа для заполнения массива случайными числами и нахождения произведения элементов с четными номерами
```python import random
# Создаем пустой массив array = []
# Заполняем массив случайными числами на интервале [-20, 25] for _ in range(20): number = random.randint(-20, 25) array.append(number)
# Находим произведение элементов с четными номерами product = 1 for i in range(1, len(array), 2): product *= array[i]
# Выводим результат print("Массив:", array) print("Произведение элементов с четными номерами:", product) ```
В данной программе мы используем модуль `random` для генерации случайных чисел на интервале [-20, 25]. Сначала мы создаем пустой массив `array`, затем с помощью цикла `for` заполняем его 20 случайными числами. Далее, с помощью еще одного цикла `for`, мы находим произведение элементов с четными номерами. Индексы элементов в массиве начинаются с 0, поэтому мы начинаем цикл с индекса 1 и увеличиваем его на 2 на каждой итерации. Наконец, мы выводим исходный массив и произведение элементов с четными номерами.
Примечание: В данной программе мы используем язык программирования Python. Если вам нужно написать программу на другом языке, пожалуйста, уточните это.


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