   Program ABC159C
   implicit none
   integer::L,i,j
   real(8)::L1,V,V1,x,y

      read *,L
      L1=L
      V=0
      do i=0,100*L
         do j=0,100*L
            x=i
            y=j
            V1=x*y*(L1-x/100.0-y/100.0)/10000.0
            if (V1>V) V=V1
         end do
      end do

      print *,V
      stop

   End Program ABC159C