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

Есть ответ
17.12.2022
476

Ответ


var

    i, e : Integer;

begin

    e := 1;

 

    for i := 1 to 7 do

      e := e * i;

 

   Writeln(e);  

end.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.