Составьте программу к задаче на сумму всех двузначных чисел кратных 5.

ABC Паскаль
------------------
var
   sum:longint;
 begin
  sum:=0;
  // основной цикл
  for var i:=3 to 19 do
  begin
    sum:=sum+5*i;
    writeln (i*5);
  end;
  writeln('Сумма всех двузначных чисел кратных 5 = ',sum);
end.