profile
Опубликовано 6 лет назад по предмету Информатика от Scania730

Помогите, люди добрые <3

  1. Ответ
    Ответ дан Аккаунт удален

    2. program faktorial;

        uses crt; 

        var n,i,k : longint;

    begin

    writeln('Введите желаемое значение'); 

    readln(n); 

    k:=1; 

    for i:=1 to n do k:=k*i; 

    writeln('Факториал числа ',n,' равен ', k); 

    end.

    Легче уже некуда.

    1. Ответ
      Ответ дан Scania730
      а по проще никак нельзя?)
    2. Ответ
      Ответ дан Аккаунт удален
      А если по-проще то я сейчас изменю
    3. Ответ
      Ответ дан Scania730
      да, если можно
Самые новые вопросы