
Huth
4 год назад
Пожалуйста посчитайте, пожалуйста. Вывести на экран все трёхзначные числа, которые делятся на 5, и не делятся на 3. (Желательно на кумире, но подойдет и паскаль).

ОТВЕТЫ

Nikifor
Oct 24, 2020
program p1;
begin
for var i := 100 to 999 do begin
if (i mod 5 = 0) and (i mod 3 <> 0) then writeln(i);
end;
end.
PascalABC.NET
12
Смежные вопросы: