7480 A$=STR$(TP(K)) : N=LEN(A$)