Нахождение суммы целых чисел на промижутке [15; 50]

Программа на паскале
var i,s:integer;
begin
s:=0;
for i:=15 to 50 do s:=s+i;
writeln('s = ',s);
end.

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