(read)(doseq(i'(31 26))(princ(subseq(read-line)0 i)))