l=[2..447] main=mapM print$filter(`elem`[x^y|x<-l,y<-l,x^y<59^3])[4..8^6]