cat(rep(strsplit(readChar("stdin",999),"")[[1]],e=2),sep="")