Question

помогите пожалуйста по информатике​

Answer 1

Uses crt;

Begin

 for var i:=500 to 750 do

   if (i mod 10 = 0) and (i mod 15 <>0) then

     writeln(i);

end.