Ответы
Ответ дал:
0
Ответ:
Объяснение:
var
i,p:integer;
begin
p:=1;
for i:=1 to 7 do p:=p*i;
writeln('p=',p);
readln;
end.
Вас заинтересует
2 года назад
2 года назад
3 года назад
3 года назад
8 лет назад
8 лет назад
9 лет назад