lama_byterun/regression/test023.expr
2019-04-10 22:15:08 +03:00

8 lines
74 B
Text

s := 0;
repeat
n := read ();
s := s + n
until (n == 0);
write (s)