Найти произведение всех двух значных чисел
Вот программа:
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
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
