BASIC står for Begynder All- Purpose Symbolsk Instruction Code , mastering det er det første skridt mange programmører tage, når lære deres håndværk. QBASIC er et integreret udviklingsmiljø for BASIC , du kunne skrive BASIC inden QBASIC og teste det , gemme det eller debug det uden behov for noget andet program . Fordi BASIC er et sprog primært lavet for læring, er der ingen indbygget "sort " -funktionen. At lære at sortere i BASIC er en stor øvelse i kritisk tænkning og hvordan man skriver præcis kode. Ting du skal
QBASIC eller andre BASIC tolk
Vis Flere Instruktioner
1
Ryd din skærm for enhver anden kode i starten af programmet ved at skrive " CLS " som den første linje . Tryk på " Enter " for at flytte til næste linje
2
Skriv følgende i QBASIC : .
LET DATA = 10
DIM A ( DATA) < br >
Dette vil skabe en variabel kaldet "data" med 10 punkter og derefter sørge for BASIC kender du ønsker at bruge det som et array.
3
Tilføj følgende til programmet : Hej
FOR NUM = 1 TO DATA
LET A ( NUM ) = INT (100 * RND ) + 1
NEXT NUM
denne blok kode, sætte dig op en løkke , hvor tilfældige tal mellem 1 og 100 genereres og sat ind i en " DATA " variabel. I første linje , sæt dig op det første nummer , du ønsker at gentage , indtil matrix slutter. Inde i loop " RND" ganges med 100 og har 1 tilføjes det. Dette skyldes, at "RND " altid returnerer et tal mellem 0 og 1, og hele, ikke-nul tal er lettere for mennesker at forstå
4
Indtast den næste kode nedenfor: .
< P > FOR YDRE = 1 til DATA - 1
PRINT YDRE ,
FOR INNER = YDRE + 1 TO DATA
IF A ( ydre) <= A ( INNER ) SÅ GOTO NOCHANGE
SWAP A (ydre) , A ( INNER )
NOCHANGE : Hej
NEXT INNER
NEXT YDRE
kode er den faktiske sortering kode . " Indre" og " YDRE " er to variabler, som du bruger til at repræsentere den første og anden elementer i array. Hvis man er større , så programmet swaps . Hvis ikke, vil det gå til " NOCHANGE : " markør og blot arbejde over det næste trin i programmet
5
Føj følgende kode : .
FOR NUM = 1 TO PUNKTER
PRINT A ( NUM ) ,
NEXT NUM
Dette vil udskrive sorteret liste , så du kan kontrollere dit arbejde .