Выведите на экран все числа от 10 до 595, которые делятся

program zz1;
var i:integer; //заводим переменную для цикла
begin
for i:=10 to 595 do //организуем перебор всех чисел от 10 до 595
if (i mod 5 = 0) and (i mod 13 = 0) then write(i, ); //проверяем, если еще одно число из данного промежутка делится на 5 и делится на тринадцать, то выводим это число на экран в строку через пробел

end.