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

Question

Информатика

Мисаил

28 октября, 13:06

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

+3

Ответы (1)

Знаешь ответ?

Флена · Answer 1

Вот программа:

var i:integer; p:real;

begin

p:=1;

for i:=10 to 99 do p:=p*i;

writeln ('p=', p);

end.

Произведение будет очень-очень большое:

p=2.57182031095525E+150