Debakisgi
5 год назад
Напише программу для вычисления n!=1*2*3*...*n-1*n; n<=10c помощию цикла while
ОТВЕТЫ
Mara
Oct 24, 2020
program ABC;
var i,N,S:integer;
Begin
Read(N);
S:=1;
For i:=1 to N do
Begin
S:=S*i;
End;
Writeln(S);
End.
Подставляешь n - это будет твое число под факториалом.
Программа выводит .
var i,N,S:integer;
Begin
Read(N);
S:=1;
For i:=1 to N do
Begin
S:=S*i;
End;
Writeln(S);
End.
Подставляешь n - это будет твое число под факториалом.
Программа выводит .
77
Смежные вопросы:
