От программы, записанной на алгоритмическом языке, перейдите к записи программы на языке Паскаль. Определите, что будет

Паскаль:n
var s, х: integег; n
begin

s:=0n
repeat

readln(x); n
s:=s+x;

until x=0; n
writeln(s)

end.

s x x = 0n
0 1 нетn
1 5 нетn
6 -10 нетn
-4 3 нетn
-1 -8 нетn
-9 6 нетn
-3 4 нетn
1 0 да