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

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