66
ROCK, PAPER, SCISSORS
10
PRINT “Rock, Paper, Scissors”
20
PRINT “Type in P, R, S”
30
INPUT “and see if you win. ->”; ANSWER$
40
PRINT “You :” ; ANSWER$;
50
MYGUESS = INT (RND (0)*(3) + 1)
60
IF MYGUESS = 1 THEN PRINT “ Me : Rock”
70
IF MYGUESS = 2 THEN PRINT “ Me : Paper”
80
IF MYGUESS = 3 THEN PRINT “ Me : Scissors”
90
INPUT “To play again press Y : ”; AGAIN$
100 IF AGAIN$ = “Y” OR AGAIN$ = “y” THEN 20
110 END
RUN
CANDY KISSES
10
PRINT “How many candy kisses”
20
PRINT “would equal your”
30
PRINT “weight if each kiss”
40
PRINT “weighed one ounce”
50
INPUT “Enter your weight.” ; WEIGHT
60
INPUT “Enter a guess.”;GUESS
70
AMOUNT = WEIGHT *16
80
DIFF = ABS (AMOUNT-GUESS)
90
PRINT AMOUNT; “kisses will”
100 PRINT “equal your weight.”
110 PRINT “You were ”; DIFF; “off.”
120 IF DIFF= 0 THEN PRINT “Wow that was right on!”
130 END
RUN
Содержание PreComputer Power Pad Plus
Страница 1: ...Precomputer Power PadTM Plus User s manual...