Напишите программу, которая считает произведенине нечетных чисел на заданном промежутке (паскаль)

Maximismailov281 Maximismailov281    3   31.08.2019 11:00    1

Ответы
петя1023 петя1023  06.10.2020 07:07
Program;
var a,i,n,p:integer;
Begin
p:=1;
read(n);
for i:=1 to n do
begin
read(a);
if a mod 2<>0 then
p:=p*a;
end;
writeln(p);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика