Найти произведение всех нечетных чисел от числа "а" до числа "b"

leijlalirva leijlalirva    3   27.08.2019 02:00    3

Ответы
JONNYDAPP JONNYDAPP  05.10.2020 21:57
Program n1;
var a,b,i: integer;
p: real;
begin
p:=1;
readln(a,b);
for i:=a to b do if i mod 2<>0 then p:=p*i;
write(p);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика