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

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

s:=0repeat

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

until x=0; writeln(s)

end.

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