
Составить программу которая вычисляет произведение членов последовательности N натуральных чисел,
кратных 5. Программа получает на вход целые числа, количество введеных чисел неизвестно, последовательность заканчивается числом N.

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

var n,a:integer; p:real;
begin
write('n = '); readln(n);
write('a = '); readln(a);
p:=1;
while a<>n do
begin
if a mod 5 = 0 then p:=p*a;
write('a = '); readln(a);
end;
writeln('p = ',p);
end.
Пример:
n = 999
a = 6
a = 10
a = 24
a = 15
a = 56
a = 7
a = 5
a = 999
p = 750






Конечно, вот пример программы на языке Python, которая вычисляет произведение членов последовательности N натуральных чисел, кратных 5:
```python # Инициализация переменной для хранения произведения произведение = 1
# Ввод первого числа число = int(input("Введите число (для завершения введите N): "))
# Обработка ввода и вычисление произведения while число != 'N': # Проверка, кратно ли число 5 if число % 5 == 0: # Умножение числа на текущее произведение произведение *= число
# Ввод следующего числа число = input("Введите число (для завершения введите N): ")
# Вывод результата print("Произведение кратных 5 чисел:", произведение) ```
Эта программа начинает с ввода первого числа и затем в цикле запрашивает следующее число до тех пор, пока не будет введено 'N'. Если введенное число кратно 5, оно умножается на текущее произведение. После завершения ввода программа выводит итоговое произведение кратных 5 чисел.


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







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