home *** CD-ROM | disk | FTP | other *** search
/ Falcon 030 Power 2 / F030_POWER2.iso / ST_STE / MAGS / ICTARI03.ARJ / ictari.03 / GFA / TUTORIAL / BRANCH_2.LST < prev    next >
File List  |  1989-07-29  |  263b  |  17 lines
  1. INPUT "Enter A Number: ",value%
  2. '
  3. PRINT CHR$(10);
  4. IF value%<0
  5.   PRINT "Number is negative"
  6. ELSE
  7.   IF value%<10
  8.     PRINT "Number only has one digit"
  9.   ELSE
  10.     PRINT "Number has more than one digit"
  11.   ENDIF
  12. ENDIF
  13. '
  14. PRINT CHR$(7);
  15. VOID INP(2)
  16. EDIT
  17.