   Implicit none
   Integer::i,j,k,l
 
      Read(*,*) i,j
      k=i*j
      If (MOD(k,2)==0) then
         l=k/2
      Else
         l=(k+1)/2
      End If
 
      Write(*,*) l
      Stop
 
   End Program PanasonicB