diff options
Diffstat (limited to 'src/user/app/kbasic/pppg.bas')
| -rw-r--r-- | src/user/app/kbasic/pppg.bas | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/src/user/app/kbasic/pppg.bas b/src/user/app/kbasic/pppg.bas new file mode 100644 index 0000000..32fc050 --- /dev/null +++ b/src/user/app/kbasic/pppg.bas @@ -0,0 +1,14 @@ + +n = RND % 100 +e = 0 + +20 input "Devinez le nombre: ", i +e = e + 1 +if i > n then print "Trop grand !" +if i < n then print "Trop petit !" +if i = n then goto 42 +goto 20 + +42 print "Bravo, vous avez trouvé en ", e, " essais!" +end + |