>>769

#!/usr/bin/perl

$incr=0;
while (<STDIN>) {
chomp;
$incr+=$_;
}
print $incr,"¥n";