BASIC PROGRAMME

Zurück    1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
  
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  
Programm : Download

<<   Inhaltsverzeichnis Kontakt : Webmaster