$_=<>;
@a=split/[*+]/;
s/\d//g;
@s=split//;

$ans = $a[0];
for ($i = 0; $i < @s; $i++) {;
  if ($s[$i] eq '*') {
    $ans += $a[$i + 1];
  } elsif ($s[$i] eq '+') {
    $ans *= $a[$i + 1];
  }
}
print$ans;