program rectangle_cutting

 implicit none
 real(8)::w,h,x,y,ans1
 integer::ans2
 read*,w,h,x,y

 ans1=w*h*0.5

 if(x==w*0.5 .and. y==h*0.5) then
  ans2=1
 else
  ans2=0
 end if

 print*,ans1,ans2

end program rectangle_cutting