Как составить на языке Паскаль программу вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа N? Вообще с Паскалем у меня полный завал! Если знаете как, то напишите! Желательно с объяснениями, буду благодарна!

var

i, n, s : integer; / / объявляем три переменных целочисленного типа.

begin

writeln ('Введите натуральное число: '); / / выводим на экран текстовую строку.

readln (n); / / записываем введенное с клавиатуры в переменную n.

for i : = 1 to n do / / начало цикла, с количеством повторений равное числу n.

begin

s:=s+i; / / при каждом шаге цикла добавляем к переменной s значение переменной i.

end;

writeln ('Сумма натуральных чисел от 1 до ', n, ' равна: ', s); / /выводим на экран строку с ответом.

end.