Предмет: Информатика,
автор: woolf2e1
Задача 3. Напишите программу, которая в последовательности натуральных
чисел определяет произведение нечётных чисел. Программа получает на
вход количество чисел в последовательности, а затем сами числа. В
последовательности всегда имеется нечётное число. Количество чисел не
превышает 1000. Введённые числа не превышают 30000. Программа должна
вывести одно число – произведение нечётных чисел.
Леганда555:
на Паскале,
??
на каком языке программирования нужно написать программу?
Ответы
Автор ответа:
0
program main;
var n, proiz, k, a: integer; //объявление переменных
begin
proiz:=1; //начальное значение счетчика произведения
readln(n); //ввод количества чисел в последовательности
for k:=1 to n do //цикл
begin
readln(a); //ввод следующего числа
if (a mod 2<>0) then proiz:=a*proiz; // число нечётное, подсчитываем произведение
end;
writeln('proizvedenie =',proiz); //вывод произведения нечётных чисел
end.
Интересные вопросы
Предмет: Русский язык,
автор: АнастасияБолдырева
Предмет: Русский язык,
автор: sasaozerova
Предмет: Русский язык,
автор: Vara342
Предмет: Математика,
автор: alinazhumabaeva2007
Предмет: Другие предметы,
автор: maria256432