e-ΜΑΘΗΜΑΤΑ |
Λύσεις ασκήσεων από τον Οδηγό Μελέτης Μαθητών |
ΠΡΟΓΡΑΜΜΑ ταξινόμηση_παράλληλων
! ΑΕΠΠ - Οδηγός Μελέτης Μαθητή
! Μη λυμένες ασκήσεις 4.10.15
!
! 15. Σ' ένα διαγωνισμό ταλέντων διαγωνίστηκαν 250 υποψήφιοι.
! Η βαθμολογία τους είναι στο διάστημα [1,100].
! Να γραφεί πρόγραμμα σε "ΓΛΩΣΣΑ", το οποίο :
! 1) Να καταχωρεί σε πίνακες τα ονόματα και οι βαθμοί των υποψηφίων.
! 2) Να εμφανίζει μια λίστα με τους 10 πρώτους, ταξινομημένους
! κατά φθίνουσα σειρά ως προς την βαθμολογία τους.
ΣΤΑΘΕΡΕΣ
Ν = 250
ΜΕΤΑΒΛΗΤΕΣ
ΧΑΡΑΚΤΗΡΕΣ: Ονόματα[Ν], temp_on
ΑΚΕΡΑΙΕΣ: Βαθμοί[Ν], i, j, temp
ΑΡΧΗ
! 1 Διάβασμα στα ονόματα
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν
ΓΡΑΨΕ 'Δώστε όνομα : ', i
ΔΙΑΒΑΣΕ Ονόματα[i]
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώστε βαθμό : '
ΔΙΑΒΑΣΕ Βαθμοί[i]
ΑΝ Βαθμοί[i] < 0 Η Βαθμοί[i] > 100 ΤΟΤΕ
ΓΡΑΨΕ 'Λάθος τιμή(0..100)'
ΤΕΛΟΣ_ΑΝ
ΜΕΧΡΙΣ_ΟΤΟΥ Βαθμοί[i] >= 0 ΚΑΙ Βαθμοί[i] <= 100
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
!2α ταξινόμηση ως προς βαθμό φθίνουσα
ΓΙΑ i ΑΠΟ 2 ΜΕΧΡΙ Ν
ΓΙΑ j ΑΠΟ Ν ΜΕΧΡΙ i ΜΕ ΒΗΜΑ -1
ΑΝ (Βαθμοί[j - 1] < Βαθμοί[j]) ΤΟΤΕ
temp <- Βαθμοί[j]
Βαθμοί[j] <- Βαθμοί[j - 1]
Βαθμοί[j - 1] <- temp
temp_on <- Ονόματα[j]
Ονόματα[j] <- Ονόματα[j - 1]
Ονόματα[j - 1] <- temp_on
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
! Για να ταξινομήσουμε μόνο μέχρι 10 πρώτα, μπορούμε να αλλάξουμε την πρωτη γραμμή σε :
! ΓΙΑ i ΑΠΟ 2 ΜΕΧΡΙ 11
! Προσοχή! αν βάζαμε ΜΕΧΡΙ 10, θα έκανε 9 επαναλήψεις και θα ταξινομούσε 9 μόνο στοιχεία.
!2β εμφανίζει μια λίστα με τους 10 πρώτους
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 10
ΓΡΑΨΕ i, Ονόματα[i], Βαθμοί[i]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
|