procedure main() n:=0 while a:=read()do n+:=*write(repl(" ",n),a) end