Задать вопрос Регистрация
Помочь другим

  • составить программу вычисления произведения первых 7 натуральных чисел

Ответы 1

  • var

        i, e : Integer;

    begin

        e := 1;

     

        for i := 1 to 7 do

          e := e * i;

     

       Writeln(e);  

    end.

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years