Найдите сумму всех двузначных чисел.

{ Нужно написать программу, выводящую сумму всех двузначных чисел
var
  S, i: integer;
  
begin
  for i := 10 to 99 do
    s += i;
  writeln(s);
end.