Ответы
Ответ дал:
2
program al;
var p,i:integer;
begin
p:=1;
for i:= 1 to 30 do
p:=p*i;
writeln('p=',p);
readln;
end.
var p,i:integer;
begin
p:=1;
for i:= 1 to 30 do
p:=p*i;
writeln('p=',p);
readln;
end.
kaulitzkm1:
Спасибо)))))))
не за что ...правда украинский не понимаю..условие в переводчике перевела..))
Похожие вопросы
1 год назад
1 год назад
1 год назад
1 год назад
6 лет назад
8 лет назад