Найти произведение всех двух значных чисел
Найти произведение всех двух значных чисел
Гость
Ответ(ы) на вопрос:
ГостьВот программа:
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
Не нашли ответ?
Похожие вопросы