10 PRINT"[147]"
20 PRINT"PART 13.- ISN'T FINISHED"
30 FORT=0TO2000:NEXT