От программы, записанной на алгоритмическом языке, перейдите к записи программы на языке Паскаль. Определите, что будет выведено в результате работы программы, если были введены следующие числа: 1, 5, -10, 3, -8, 6, 4, 0. Алгоритмический язык: алг цел s, х нач s:=0; нц ввод х s:=s+x кц при х=0; вывод s кон s x x=0
program Summation
va
s, x: integer
begi
s := 0
repea
readln(x)
s := s + x
until x = 0
writeln(s)
end.
При вводе чисел: 1, 5, -10, 3, -8, 6, 4, 0 программа выведет сумму этих чисел, которая равна 1 + 5 - 10 + 3 - 8 + 6 + 4 = 1.