
Самойло
5 год назад
Вычислите 5! (пять факториал) и перестройте в цикл с предусловием, пожалуйста!

ОТВЕТЫ

Parfen
Oct 24, 2020
program factorial;
var i,F:integer;
begin
F:=1;
i:=0;
while i<5 do
begin;
i:=i+1;
F:=F*i;
end;
writeln ('F=', F);
end.
var i,F:integer;
begin
F:=1;
i:=0;
while i<5 do
begin;
i:=i+1;
F:=F*i;
end;
writeln ('F=', F);
end.
134
Смежные вопросы: