Нахождение суммы всех нечетных чисел от 0 до 50

Question

Нахождение суммы всех нечетных чисел от 0 до 50

Answer 1

// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
  Writeln(Range(1,50,2).Sum)
end.

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

Answer 2

1+3+5+7+9+11+13+15+17+19+21+23+25+27+29+31+33+35+37+39+41+43+45+47+49 = 625