100 DIM E$(10),A$(10)
110 DATA "RAM","MONITOR","FLOPPY","DISC","ROM","COMPUTER","TASTEN","JOYSTICK","DRUCKER","BASIC"
120 FORI=1TO10:READE$(I):NEXT
130 D=10
140 FORI=1TOD:A$(I)=E$(I):NEXT
150 AT=TI:GOSUB210:AT=TI-AT
160 FORI=1TOD:PRINTE$(I),A$(I):NEXT
170 PRINT:PRINTAT:END
180 REM ------------------------------
190 REM SELEKT-SORT TEXT
200 REM ------------------------------
210 FORJ=2TOD:VW$=A$(J-1):A=J-1:FORI=JTOD
220 IFA$(I)<VW$THENVW$=A$(I):A=I
230 NEXTI:A$(A)=A$(J-1):A$(J-1)=VW$:NEXTJ:RETURN
240 REM ------------------------------