Регистрация
Sultikutan
18.07.2022 03:43
Информатика
Есть ответ 👍

Pascal. составить программу найти произведение n первых натуральных чисел кратных 11

213
353
Посмотреть ответы 2

Ответы на вопрос:

MartKsenka
MartKsenka
4,6(11 оценок)

var n,a,z: integer;

begin

  write('n= ');

  read (n);

  z: =1;

  for a: =1 to n do

    begin

      if (a mod 11 =0)

      then z: =z*a;

    end;  

  writeln(z);

end.

karina694
karina694
4,5(18 оценок)

С+ +яс+= 18 + ето все можуть бути ошибки

Популярно: Информатика