Составить программку, вычисляющую факториал числа N. (N! = 123N)3 цикла

Составить программу, вычисляющую факториал числа N.
(N! = 123N)
3 цикла

Задать свой вопрос
1 ответ
//Pascal ABC.NET v3.0 сборка 1111

//for
Var
 i,n,r:integer;
begin
 readln(n);
 r:=1;
 for i:=1 to n do
  r:=r*i;
 write(r);
end.

//while

Var
 i,n,r:integer;
begin
 readln(n);
 r:=1;
 i:=0;
 while ilt;gt;n do
  begin;
   inc(i);
   r:=r*i;
  end;
 write(r);
end.

//repeat
Var
 i,n,r:integer;
begin
 readln(n);
 r:=1;
 i:=0;
 repeat
   inc(i);
   r:=r*i;
 until n=i;
 write(r);
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт