Регистрация
Войти
Стать экспертом Правила
Информатика

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

ОТВЕТЫ
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.
134
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам