Question

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

Answer 1

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