Πώς να Ταξινόμηση με QBASIC

BASIC σημαίνει All- Purpose Συμβολική Οδηγίες κώδικα για αρχάριους ? Mastering είναι το πρώτο βήμα που πολλοί προγραμματιστές λαμβάνουν όταν μαθαίνει την τέχνη τους . QBASIC είναι ένα ολοκληρωμένο περιβάλλον ανάπτυξης για BASIC ? Θα μπορούσατε να γράψετε BASIC εντός QBASIC και δοκιμάστε το , να το αποθηκεύσετε ή η επέμβαση χωρίς την ανάγκη για οποιοδήποτε άλλο πρόγραμμα . Επειδή BASIC είναι μια γλώσσα που γίνονται κατά κύριο λόγο για τη μάθηση , δεν υπάρχει ενσωματωμένη σε "είδος " λειτουργία. Μαθαίνοντας να ταξινομήσετε σε BASIC είναι μια μεγάλη άσκηση κριτικής σκέψης και πώς να γράψει ακριβή κώδικα . Τα πράγματα που θα χρειαστείτε
QBASIC ή άλλες διερμηνέα BASIC
Η Εμφάνιση Περισσότερες οδηγίες
Η

1 Καταργήστε την οθόνη σας από οποιοδήποτε άλλο κώδικα στην αρχή του προγράμματος , πληκτρολογώντας " CLS " ως την πρώτη γραμμή . Πατήστε το πλήκτρο " Enter" για να μετακινηθείτε στην επόμενη γραμμή 2

Πληκτρολογήστε τα ακόλουθα στο QBASIC : .

LET DATA = 10

DIM A ( DATA )

Αυτό θα δημιουργήσει μια μεταβλητή που ονομάζεται "DATA " με 10 αντικείμενα και , στη συνέχεια, βεβαιωθείτε ότι BASIC ξέρει θέλετε να το χρησιμοποιήσετε ως μια σειρά .
εικόνων 3

Προσθέστε το ακόλουθο πρόγραμμα :

ΓΙΑ NUM = 1 TO DATA

LET A ( NUM ) = INT ( 100 * RND ) + 1

NEXT NUM

Σε αυτό το μπλοκ του κώδικα , θα δημιουργήσει ένα βρόχο όπου οι τυχαίοι αριθμοί μεταξύ 1 και 100 δημιουργούνται και να τεθεί σε ένα "DATA " μεταβλητή . Στην πρώτη γραμμή , θα δημιουργήσει τον πρώτο αριθμό που θέλετε να επαναλάβετε μέχρι να τελειώσει η σειρά . Μέσα από το βρόχο, " RND " πολλαπλασιάζεται με 100 και να έχει 1 προστεθούν σε αυτό . Αυτό οφείλεται στο γεγονός ότι " RND " επιστρέφει πάντα έναν αριθμό μεταξύ 0 και 1 , και το πλήρες , μη μηδενικών αριθμών είναι πιο εύκολο για τους ανθρώπους να κατανοήσουν
Η 4

Εισάγετε τον επόμενο κωδικό παρακάτω : .

ΓΙΑ ΕΞΩΤΕΡΙΚΗ = 1 TO DATA - 1

PRINT ΕΞΩΤΕΡΙΚΟ ?

ΓΙΑ ΕΣΩΤΕΡΙΚΗ ΕΞΩΤΕΡΙΚΗ = + 1 ΔΕΔΟΜΕΝΩΝ

ΑΝ Α ( ΕΞΩΤΕΡΙΚΗ ) <= Α ( INNER ) ΤΟΤΕ GOTO NOCHANGE

SWAP A ( ΕΞΩΤΕΡΙΚΗ ) , A ( ΕΣΩΤΕΡΙΚΗ )

NOCHANGE :

NEXT INNER

NEXT ΕΞΩΤΕΡΙΚΗ

Αυτό κώδικας είναι ο κώδικας διαλογής . " INNER " και " ΕΞΩΤΕΡΙΚΗ " είναι δύο μεταβλητές που μπορείτε να χρησιμοποιήσετε για να αναπαριστούν την πρώτη και τη δεύτερη τα στοιχεία του πίνακα . Αν κάποιος είναι μεγαλύτερη , τότε το πρόγραμμα swaps . Αν όχι , θα πάει στο " NOCHANGE : " δείκτη και απλά δουλεύουν πάνω στο επόμενο στάδιο του προγράμματος
5

Προσθέστε τον ακόλουθο κώδικα : .

ΓΙΑ NUM = 1 TO Αντικείμενα