l=[0..15]
main=mapM(\y->putStrLn[(l>>"0123456789abcdef")!!(x*y)|x<-l])l