Напишите программу которая вычисляет сумму первых n натуральных чисел Очень ​

Var

s,k,n: Integer

BEGIN

Write('Введите первое число ');

Readln(n);

Write('Введите второе число ');

Readln(k);

s:=0;

s=n+k;

Writeln('Сумма Ваших двух чисел равна: ',s);

END

Это программа которые может посчитать сумму чисел которых вы сами сможете ввести(любые цифры и числа).