Среди трёхзначных чисел найти все числа кратные - вопрос №278946726 от rus200130 27.08.2022 20:47

Question

Информатика: Среди трёхзначных чисел найти все числа кратные 2 и 7 и выведите их в паскале напишите программу

rus200130 · Answer

Var i: integer;beginfor i := 100 to 999 do  if ((i mod 2 = 0) and (i mod 7 = 0)) then    writeln(i);end....