Philips VG 8020 Gebruiksaanwijzing pagina 75
Inhoudsopgave
NEW
10
G(100)
DIM
"Hoeveel
20
INPUT
en 100) ";A
2
IF
(A<2)OR(A>100)
30
40
I=1
TO
FOR
50
PRINT
""Nummer";I;
G(I)
60
INPUT
I
70
NEXT
Als I
75
REM
gaat het
oud
van
A,
er
regel
met
"Ik ben
80
PRINT
en"
I=2
90
FOR
TO
100 X1i=1:X2=I
110
X3=X1+INT((X2-X1)/2)
G(I)<G(X3)
120
IF
IF G(I)>G(X3)
130
140
X2=X3
IF
150
X2=X3
160
X2=X3:GOTO
IF
170
X1=X3
180
X1=X3:GOTO110
190
H=G(I)
200
J=1
FOR
G(J)=G(J-1)
210
J
220
NEXT
230 G(X2)=H
240
I
NEXT
Als
245
REM
houd
van
A,
der
regel
met
"Dit
250
PRINT
volgorde"
I=1
260
FOR
G(I);
270
PRINT
280
I
NEXT
RUN
Als
dit
u
programma
netjes
in
getallen
het
Werkt
programma niet naar behoren,
dan
zorgvuldig.
73
getallen
GOTO
A
is
kleiner
programma
50
aan
nu
A
THEN
THEN
190
THEN
110
190
THEN
STEP-1
X2+1
TO
is
kleiner
I
gaat het
programma
100
zijn
de
TO
A
uitvoeren,
laat
de
juiste volgorde worden
(tussen
20
inh
dan de
verd
sorter
het
150
170
in
dan de
ver
in
getallen
dat
de
zien
zult u
gezet.
controleer
het
Inhoudsopgave
