10 DEF FN S$(X$,K)=MID$(X$,K,1)
15 DEF FN Q$(X$)=FN S$(X$,K)+"$"
20 INPUT X$,K:PRINT FN Q$(X$):END