Написать программу выводящую на сумму натуральных чисел от k до 400 , включая k и 400 паскаль

// PascalABC.NET 3.2, сборка 1389 от 01.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('S= ',Range(ReadInteger('K='),400).Sum)
end.

Пример
K= 15
S= 80095