($a,$b)=glob<>; print$a==$b?($a*$b>>2)-!($a%2*$b%2):($a*$b+1>>1)-1