Какая задача решается в результате выполнения фрагмента программы на языке Паскаль? S: =0; a:=0; While a < > 5 do Begin Read (a); S:=S+a WriteIn (' сумма S=', S); End;
While a < > 5 do //создали цикл, тело которого будет выполняться до тех пор, пока значение переменной "а" не равно 5
Begin //ниже выполнится тело цикла
Read (a); //считали значение переменной "а" (ввод с клавиатуры)
S:=S+a //увеличили значение переменной "s" на переменную "а", то есть нашли сумму двух переменных
WriteIn (' сумма S=', S); //вывели сумму, которая хранится в переменной "S", на экран
End; //конец тела цикла
Проведя анализ программы, выяснили, что в результате выполнения данного фрагмента кода, в переменную "s" записывается сумма всех переменных "a", введённых с клавиатуры. Программа завершает свое действие, когда пользователь вводит с клавиатуры цифру "5", т.к. цикл действует до той поры, пока переменная "а" не равна 5. Таким образом, мы получили на выводе сумму всех введённых нами с клавиатуры чисел.
S: =0; a:=0; //задали две переменные, обе равны 0
While a < > 5 do //создали цикл, тело которого будет выполняться до тех пор, пока значение переменной "а" не равно 5
Begin //ниже выполнится тело цикла
Read (a); //считали значение переменной "а" (ввод с клавиатуры)
S:=S+a //увеличили значение переменной "s" на переменную "а", то есть нашли сумму двух переменных
WriteIn (' сумма S=', S); //вывели сумму, которая хранится в переменной "S", на экран
End; //конец тела цикла
Проведя анализ программы, выяснили, что в результате выполнения данного фрагмента кода, в переменную "s" записывается сумма всех переменных "a", введённых с клавиатуры. Программа завершает свое действие, когда пользователь вводит с клавиатуры цифру "5", т.к. цикл действует до той поры, пока переменная "а" не равна 5. Таким образом, мы получили на выводе сумму всех введённых нами с клавиатуры чисел.