1775 IF KINCM THEN KE=5 : B$=">=1 y <="+STR$(NCM) :