Question

Пользователь вводит последовательность целых чисел (каждое число на новой строке). Если пользователь вводит 0, то последовательность заканчивается.
Напишите программу, которая будет считать сумму этих чисел.

Пример ввода:

4
5
0
Пример результат:

9

Answer 1

var

a,s:integer;

begin

s:=0;

a:=1;

until a<>0 do

begin

read(a);

s:=s+a;

end;

write(s);

end.

Answer 2

s = 0

i = 1

while i != 0:

   i = int(input())

   s += i

print(s)