lama_byterun/regression/test023.expr
2019-09-29 02:47:07 +03:00

10 lines
87 B
Text

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