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

var a,s:integer;begins:=0;a:=11;while a<=99 do begin s:=s+a; a:=a+2; end;writeln('s = ',s);end.Результат:s = 2475

// PascalABC.NET 3.1, сборка 1204 от 24.03.2016begin  Write(Range(11,99,2).Sum)end.Результат выполнения программы:2475