program main
  implicit none
  integer::N,i
  read *,N
  select case(N)
  case(1)
     print '(i0)',7
  case(2)
     print '(i0)',4
  case(3)
     print '(i0)',4
  case(4)
     print '(i0)',4
  case(5)
     print '(i0)',5
  case(6)
     print '(i0)',4
  case(7)
     print '(i0)',4
  case(8)
     print '(i0)',2
  case(9)
     print '(i0)',3
  case(10)
     print '(i0)',4
  end select
end program main