Написать программу вычисления произведения всех двузначных нечетных чисел. В ПАСКАЛЕ!!!!...

Question

Написать программу вычисления произведения всех двузначных нечетных чисел. В ПАСКАЛЕ!!!! Пожалуйста))

Answer 1

Var i,p:integer;
begin
i:=11;
p:=1;
while i<=99 do<br>begin
p:=p*i;
i:=i+2;
end;
writeln(p)
end.

Comments

спасибо