Дано все двузначные числа. Найти количество и сумму кратных 5 (Язык Паскаль)

var    i: integer;    k := 0;    s := 0;begin    for i := 10 to 99 do        if i mod 5 = 0 then begin            s := s + i;            k := k + 1;        end;        writeln('количество  = ', k, ' и сумму = ', s);end.