Есть ответ 👍

Задание в прекрепленом файле

274
484
Посмотреть ответы 1

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


Var i,p: integer;       beginp: =1; for i: = 20 to 50 doif(i mod 5 = 0) then p: =p*i; writeln('произведение чисел кратных 5: 'p); end.

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