Составить программу и блок схему используя операторы FOR,REPEAT,WHILE для задачи : вычислить сумму первых m натуральных

program zz1;vari, m, s:integer; // задаем переменные целого типа beginwrite(\' введите m \');read(m); // вводим с клавиатуры s:=0;repeat // организуем циклi:=i+1;s:=s+i; until i = m; writeln(\' сумма первых m чисел = \', s); // выводим ответend.

program zz1;vari, m, s:integer; // задаем переменные целого типа beginwrite(\' введите m \');read(m); // вводим с клавиатуры s:=0;for i:=1 to m do // организуем циклs:=s+i; writeln(\' сумма первых m чисел = \', s); // выводим ответend.

program zz1;vari, m, s:integer; // задаем переменные целого типа beginwrite(\' введите m \');read(m); // вводим с клавиатуры s:=0;i:=1;while i <= m do // организуем циклbegins:=s+i; i:=i + 1;end;writeln(\' сумма первых m чисел = \', s); // выводим ответend.

program zz1;vari, n, x:integer; // задаем переменные целого типаs:real; // задаем переменную не целого типаbeginwrite(\' введите x \');read(x); // вводим с клавиатуры s:=0;i:=1;while s < x do // организуем циклbegins:=s+1/i; // прибавляем часть рядаi:=i + 1;n:=n + 1;end;writeln(\' первое число большее чем х = \', s); // выводим ответwriteln(\' количество элементов ряда = \', n);end.