var  x:integer;
      z,d,I,n:real;

begin
readln(x);
readln(I);
if (x>=1) and (x<=100) and (I>=1) and (I<=100) then begin
d:=round(I)-0.99;
n:=x*d;
z:=round(n)+1;

write(z:10:0);
end;
end.