1690 IF NINFM-NF THEN KE=5 : B$=">=1 y <="+STR$(NFM-NF) :