1645 PRINT : PRINT " VARIABLE =";J;" - ";TC$(J)