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

Вывести на экран все трёхзначные числа кратные трём и заканчивающиеся на один

ОТВЕТЫ
Program n1;
var i: integer;
begin
for i:=111 to 981 do if ( i mod 3=0) and (i mod 10=1) then write(i,' ');
end.
391
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам