προετοιμαστεί τις μεταβλητές που απαιτούνται . Υπάρχουν τρεις μεταβλητές που απαιτούνται για να βρόχο μέσω του πίνακα για να βρείτε την υψηλότερη τιμή : ο πίνακας που περιέχει τις τιμές , μια προσωρινή μεταβλητή να βρόχο μέσα σε κάθε τιμή πίνακα και μια μεταβλητή για να κρατήσει την υψηλότερη τιμή . Αυτές οι μεταβλητές αρχικοποιούνται χρησιμοποιώντας τον ακόλουθο κώδικα :
Δημ. myArray ( 2 ), όπως IntegerDim i ως IntegerDim maxValue ως IntegermyArray ( 0 ) = 1myArray ( 1 ) = 2myArray ( 2 ) = 3
Ανακοίνωση η συστοιχία αρχικοποιείται με αριθμούς, 1 , 2 και 3. Αφού ο κώδικας τελειώσει την εκτέλεση , η μέγιστη τιμή που εμφανίζεται είναι 3 . 2
Αποκτήστε την πρώτη τιμή του πίνακα και να το θέσει στην μεταβλητή maxValue . Η μεταβλητή αυτή χρησιμοποιείται για να συγκρίνουμε κάθε τιμή του πίνακα. Εάν η επόμενη τιμή στη λίστα συστοιχία είναι υψηλότερη από την τρέχουσα τιμή , τότε maxValue κατέχει το μέγιστο αριθμό. Ο κώδικας είναι παρακάτω:
maxValue = myArray ( 0 )
εικόνων 3
Loop μέσα σε κάθε τιμή του πίνακα για να βρείτε τη μέγιστη τιμή . Ο κώδικας είναι παρακάτω:
Για i = 0 Για να myArray.GetUpperBound ( ) - 1Αν maxValue Εκτυπώστε το οδηγεί στο παράθυρο εντοπισμού σφαλμάτων. Αυτό χρησιμοποιείται για τη δοκιμή σύνταξη κώδικα σας και τη λογική για τυχόν λάθη . Τα παρακάτω κώδικα εκτυπώνει " 3 " μετά την βρόχος έχει τελειώσει : Εκτύπωση maxValue
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα