10 CLS 20 INPUT "choose a number", A$ 30 IF A$>10 GOSUB 100 40 if A$<5 GOSUB 100 50 PRINT "you typed ", A$ 60 END 99 REM the following 2 lines are a subroutine! 100 PRINT "you must enter a number between 5 and 10" 110 RETURN