Оберіть фрагмент програми, який знаходить суму п'яти послідовних натуральних чисел, перше з яких рівне а.s:= 0; while i <5 do begin s:=s*a; end;s:= 0; for i:=1 to 5 do begin s:=s+a; a:=a+1; end;s:= 0; for i:=1 to 5 do s:=s+a;

s:= 0;

for i:=1 to 5 do begin

s:=s+a;

a:=a+1;

end;

Объяснение:

s:= 0; //Переменной суммы s присвоили значение 0

for i:=1 to 5 do begin //начало цикла

s:=s+a; // к сумме прибавляется натуральное число a

a:=a+1; // вычисляется значение следующего за a натурального числа

end;