Паскаль!!!ввести все трехзначные числа,делящиеся ** 15. Пожалуйста.

Question

Паскаль!!!ввести все трехзначные числа,делящиеся на 15. Пожалуйста.

Comments

можно и одно в принципе

Answer 1

Var i,k:integer;beginfor i:=100 to 999 dobegink:=i mod 15;if k=0 then writeln(i);end;end.