| | |
| 17. ZUFALLSZAHLEN | |
| Der Computer liefert eine Zufallszahl (zwischen 1 und 1000) und Sie sollen schätzen, welche Zahl das sein wird. Wieviele Versuche haben Sie unternommen? | |
| | |
| 10 REM GUESS A NUMBER | |
| 20 CLS : C = 1 | |
| 30 A = RND (1000) | |
| 40 PRINT "SUCHEN SIE EINE ZAHL" | |
| 50 INPUT "(1-1000)";B | |
| 60 IF B > A THEN PRINT "KLEINER" | |
| 70 IF B < A THEN PRINT "GROESSER" | |
| 80 IF B = A THEN 100 | |
| 90 C = C + 1 : GOTO 40 | |
| 100 PRINT "RICHTIG" | |
| 110 PRINT "SIE HATTEN";C; | |
| 120 PRINT "VERSUCHE" | |
| 130 END | |