character*13c;do1;read'(a)',c;k=c(13:)>"";1 print'(at1a)',trim(c),"No. Everyone does."(:k*18);end