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

Question

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

krll333 · Answer

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....

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

Популярные вопросы