Ответы
Ответ дал:
1
Program gsdn;
Var i,n,z: integer;
Begin
writeln('Введите n');
readln(n);
z:=1;
For i:=1 to n do
z:=i*z;
Writeln('n факториал =',z);
end.
Var i,n,z: integer;
Begin
writeln('Введите n');
readln(n);
z:=1;
For i:=1 to n do
z:=i*z;
Writeln('n факториал =',z);
end.
Аноним:
Потому что все это нудно в версиях Паскаль для DOS, а в версиях для Windows этого не требуется. Вы не указали версию языка и автор ответа был вправе использовать любую, что он и сделал. Это программа для версии Pascal ABC
Вас заинтересует
1 год назад
6 лет назад
8 лет назад