r=zipWith(+)(0:0:0:r)$[mod(7^i)$2^31-1|i<-[0,5..150]]++r;main=putStr[[' '..]!!read(show$r!!n`div`2`mod`2^31`mod`95)|n<-[313..1077]]