×
Toegevoegd aan mijn handleidingen
29.2
Een
willekeurig
functie
De
een
willekeurig getal
senOen
1. Wilt
sen
6
en
1
met een dobbelsteen
lekeurige getal met
wordt
er
bij
1
NEW
AO/=INT(RND(1)*6+1)
10
20
PRINT
RUN
voorbeeld
dit
In
binatie met
maakt van
INT
(integer).
29.3
Lottogetallen
Het
volgende
invullen van
NEW
10
X=0
20
FOR
30 A®©/=INT(RND(1)*41+1)
40
FOR
IF
50
A%/0=X(I)
60
NEXT
70 X(I)=A%0
80
NEXT
90
PRINT "De
100
FOR
I:PRINT
110
INPUT "Nog
IF
120
130
END
dit
Laat
programma
MSX-BASIC
goed
werkt,
ties goed
hebt
81
getal
wordt
RND
dikwijls
te
laten bepalen. Dat getal
de computer een
u
laten opwekken
(bij
te bootsen),
na
worden
6
voorbeeld:
opgeteld.
Als
A%
10
in
regel
zijn
instructie
een
enkele
willekeurige
het
kiest
programma
lottoformulier:
het
I=1
TO 6
J=1
TO 5
GOTO
J
I
lottogetallen zijn:
I=i to
6:PRINT
eens
A$="J"
A$="j"
OR
lopen
kijk
en
bedenkt.
voor
u
controleer dan
zorgvuldig of
ingetoetst.
gebruikt om
MSX-BASIC
willekeurig getal
voorbeeld
het
om
dan moet
vermenigvuldigd, waarna
twee functies
in
functie
De
gebruikt.
een
getal
geheel!
getallen voor het
zes
30
X(I);:NEXT
(J/N)
";A$
10
GOTO
welke lottogetallen
het
Als
programma
u alle
tus-
ligt
tus-
werpen
het
wil-
com-
getal
";
niet
instruc-
Gerelateerde Producten voor Philips VG 8020