Inhaltsverzeichnis
Werbung
Kapitel 8: Anwendungsbeispiele
Digitaler Würfel
Dieses Programm simuliert das Werfen mehrerer Würfel.
Auf diese Weise können Sie ein Würfelspiel ohne Würfel
spielen, weil Sie entweder keine Würfel oder keinen Platz
zum Würfeln haben.
Geben Sie zuerst die Anzahl der Würfel ein. Anschließend würfeln Sie und
lassen sich das Ergebnis solange anzeigen, bis eine Taste gedrückt wird.
b 2 1 0 drücken, um ein neues Programm zu erstellen.
1.
2.
Geben Sie DICE als Programmtitel ein, und drücken Sie anschließend
e.
• Ein neues Programm mit dem Titel "DICE" wird erstellt.
3.
Geben Sie das Programm wie folgt ein:
Programmcode
Print"NO OF DICE
Input N
Label PLAY
M=1
X=0
Label ROLL
X=X+r.dice
M=M+1
If M<=N Goto ROLL
Print X
Wait
Goto PLAY
106
Tastenfolge
i 1 @ a NO s OF
s DICE ; e
i 2 ; N e
i 6 @ a PLAY ; e
; M ; = 1 e
; X ; = 0 e
i 6 @ a ROLL ; e
; X ; = ; X + @
w 1 e
; M ; = ; M + 1 e
i 8 ; M i E ; N
; s i 9 @ a
ROLL ; e
i 0 ; X e
i 3 e
i 9 @ a PLAY ; e
Quicklinks ausblenden:
Werbung
Inhaltsverzeichnis
