Программа, подсчитывающая сумму первых четырех натуральных чисел. 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. чему равна сумма первых шести натуральных чисел? (в какую строку нужно внести изменения? )
в строку list нужно внести изменения
"for i:=1 to 4 do" заменить на "for i:=1 to 6 do"