d"SORTEREN"/n"HOEVEEL GETALLEN ";NDx A(N),B(N),C(N)R I1 Nd"GETAL ";I;t" ";A(I): I1 N: B(I)A(I):"SORTEER MOGELIJKHEDEN""1. LINEAIR SORT""2. RIPPLE SORT""3. KEUZE SORT" "4. BUBBLE SORT"!"5. SHAKE SORT"7"6. SHELL SORT"L"7. HEAP SORT"b"8. QUICK SORT"| "9. INSERTION SORT""MAAK UW KEUZE" A$: A$"" 280" A$"1" A$"9" 280,MO(A$)1TI$"000000"6 MO 350,500,620,760,890,1090,1300,1500,19103@ I1 N: A(I)B(I):=J 180R^"INEAIR SORT"\h TI$jr I2 Nx|A(0)A(I)JI1 A(0)A(J) 440A(J1)A(J)JJ1 J0 400A(J1)A(0) I 1820"RIPPLE SORT"  TI$C0# J1 N1< A(J)A(J1) 560f&A(0)A(J):A(J)A(J1):A(J1)A(0):C1n0 J~: C1 520D 1820Xl"KEUZE SORT"v TI$I0:J0:M0 I1 N1MI JI1 N A(J)A(M) MJ J$A(0)A(I):A(I)A(M):A(M)A(0), I7 1820=Q"BUBBLE SORT"[ TI$i  I2 N| JN I 1  A(J1)A(J) 820* 8304A(0)A(J):A(J)A(J1):A(J1)A(0)> JH IR 1820fz"SHAKE SORT" TI$L2:RN:KN% JR L 1> A(J1)A(J) 960dA(0)A(J1):A(J1)A(J):A(J)A(0)lKJt J~LK1 JL R A(J1)A(J) 1020A(0)A(J1):A(J1)A(J):A(J)A(0)KJ JRK1 LR 9201820:B"SHELL SORT" L TI$(VMN5`M(M2)Fj M0 1260NtJ1X~KNM`IJjLIM A(I)A(L) 1230A(0)A(I):A(I)A(L):A(L)A(0)IIM I1 1230 1170JJ1 JK 1160 11201820:"HEAP SORT" TI$*(IN1:L2:RN=2 JR L 1W< A(J1)A(J) 1370}FA(0)A(J):A(J)A(J1):A(J1)A(0)PIJZ JdLI1n JL Rx A(J1)A(J) 1430A(0)A(J):A(J)A(J1):A(J1)A(0)IJ JRI1 LR 13301820:0"QUICK SORT": TI$BL1OC(L)N1WM1bJC(L)lIM1" JM 3 1730,M1((IJ)2)6II1@ IJ 1670J A(I)A(M1) 1590TJJ1^ IJ 1670h A(J)A(M1) 1620rA(0)A(I):A(I)A(J):A(J)A(0)(| 1590< IM1 II1N JM1 1700rA(0)A(I):A(I)A(M1):A(M1)A(0)|LL1C(L)I 1550 JM 2 1760 A(M)A(M1) 1760A(0)A(M):A(M)A(M1):A(M1)A(0)MC(L)1LL1  L0 1550 1820:("";TI$6& I1 NI0 A(I);" ";:IeN"":"DRUK EEN TOETS"}X A$: A$"" 1880bv"INSERTION SORT" TI$ J1 N1 BA(J1) IJ 1 1 BA(I) 2000 A(I1)A(I) I I0 A(I1)B& J1 18207