Напишите программу на pascal. составьте программу, которая выводит на экран сумму чисел кратных 5-и от 30 до 60. цикл repeat

Var i,s: integer;
begin
  i:=30; s:=0;
  repeat
   s:=s+i;
   i:=i+5;
  until i>60;
  writeln('сумма = ',s);
end.