#! /usr/local/bin/perl5 -w

while (defined($line=<STDIN>)) {
	print eval($line), "\n";
}
