set s 0;foreach c [read stdin] {incr s $c};puts $s