import Control.Arrow
import Data.List
f=product.map fst.zip[1..]
main=getLine>>=print.(`mod`573).(subtract 1).(uncurry div).(f&&&product.map f.group.sort)