m@main=getLine>>=putStrLn.f.map read.words>>m f(a:b)|a*b!!0*2>sum b="Pass"|0<1="Fail"