write(substring(paste(scan("stdin",""),collapse=""),a<-cumsum(0:31)+1,a+0:31),T)