Регистрация
Войти
Стать экспертом Правила
Информатика

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

ОТВЕТЫ

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
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам