Среди трёхзначных чисел найти все числа кратные - вопрос №894650127 от мюсьера 23.08.2022 07:36

Question

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

мюсьера · Answer

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