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

Программа, подсчитывающая сумму первых 4 естественных чисел.

program cycle_3;

var i,s: Integer;

begin s:=0;

for i:=1 to 4 do

s:=s+i;

writeln ('сумма чисел одинакова ',s);

writeln ('программа выполнена'); readln;

end.

list S1=0+1=1; S2=1+2=3; S3=3+3=6; S4=6+4=10

Задание 2. Чему равна сумма первых 6 естественных чисел? (В какую строчку необходимо внести конфигурации?)