100 INPUT "n=";N 110 LET I=2 120 IF N-INT(N/I)*I<>0 THEN 130 LET I=I+1 140 GOTO 120 150 END IF 161 IF N-INT(N/I)*I=0 THEN 162 LET N=N/I 163 GOTO 161 164 END IF 170 IF N=1 THEN 180 PRINT I 190 GOTO 230 200 END IF 210 PRINT I;"*"; 220 GOTO 120 230 END