# -*- mode: icon -*-
# $Id: sumcol.icon,v 1.2 2000/12/17 23:40:20 doug Exp $
# http://www.bagley.org/~doug/shootout/

procedure main(argv)
    sum := 0
    while(sum +:= read())
    write(sum)
end