Нужно составить в паскале программу, которая выводит на экран в строку через пробел числа, кратные 10 в промежутке от 100 до 500.

Помогите пожалуйста!!! Очень срочно нужно!! Буду благодарен.

program dfgd;var  i: integer;begin  for i := 100 to 500 do    if (i mod 10 = 0)      then write(i, ' ');end.