Помогите написать программу в pascal.
Найдите сумму всех целых чисел [a;b]Заранее спасибо.

Var   a,b:integer;   S:real;BeginS:=0;Write('a = ');ReadLn(a);Write('b = ');ReadLn(b);For b:= a to b do    S:=S+b;WriteLn('S = ',S);End.

// PascalABC.NET 3.2, сборка 1437 от 03.05.2017// Внимание! Если программа не работает, обновите версию!begin  var a,b:integer; Read(a,b);  Writeln('S=',Range(a,b).Sum)end.Пример8 42S=875