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

Question

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

Answer 1

// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
  Write(Range(11,99,2).Sum)
end.

Результат выполнения программы:
2475

Answer 2

Var a,s:integer;
begin
s:=0;
a:=11;
while a<=99 do<br> begin
 s:=s+a;
 a:=a+2;
 end;
writeln('s = ',s);
end.

Результат:
s = 2475