Question

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

Answer 1

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

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

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

Answer 2

Могу, но не стану. Во-первых, ответ уже нельзя исправлять, потому что он был принят модератором. Во-вторых, Вы не указали версию Паскаля, поэтому я выбрал её сам. Если Вам плевать на чужой труд, то почему я должен дважды делать одно и то же?