Θέμα4ο : Επαναληπτικές Απολυτήριες εξετάσεις ενιαίου λυκείου 2004

Σε κάποια χώρα της Ευρωπαϊκής Ένωσης διεξάγονται
εκλογές για την ανάδειξη των μελών του Ευρωπαϊκού
Κοινοβουλίου. Θεωρήστε ότι μετέχουν 15 συνδυασμοί
κομμάτων, οι οποίοι θα μοιραστούν 24 έδρες σύμφωνα με το
ποσοστό των έγκυρων ψηφοδελτίων που έλαβαν. Κόμματα
που δεν συγκεντρώνουν ποσοστό έγκυρων ψηφοδελτίων
τουλάχιστον ίσο με το 3% του συνόλου των έγκυρων
ψηφοδελτίων δεν δικαιούνται έδρα.
Για κάθε κόμμα, εκτός του πρώτου κόμματος, ο αριθμός των
εδρών που θα λάβει υπολογίζεται ως εξής: Το ποσοστό των
έγκυρων ψηφοδελτίων πολλαπλασιάζεται επί 24 και στη
συνέχεια το γινόμενο διαιρείται με το άθροισμα των
ποσοστών όλων των κομμάτων που δικαιούνται έδρα. Το
ακέραιο μέρος του αριθμού που προκύπτει είναι ο αριθμός
των εδρών που θα λάβει το κόμμα.
Το πρώτο κόμμα λαμβάνει τις υπόλοιπες έδρες.
Να γράψετε αλγόριθμο ο οποίος:
α. να διαβάζει και να αποθηκεύει σε μονοδιάστατους
    πίνακες τα ονόματα των κομμάτων και τα αντίστοιχα
    ποσοστά των έγκυρων ψηφοδελτίων τους.
                                                                     Μονάδες 4
β. να εκτυπώνει τα ονόματα και το αντίστοιχο ποσοστό
   έγκυρων ψηφοδελτίων των κομμάτων που δεν έλαβαν
   έδρα.
                                                                    Μονάδες 4
γ. να εκτυπώνει το όνομα του κόμματος με το μεγαλύτερο
    ποσοστό έγκυρων ψηφοδελτίων.
                                                                    Μονάδες 4
δ. να υπολογίζει και να εκτυπώνει το άθροισμα των
    ποσοστών όλων των κομμάτων που δικαιούνται έδρα.
                                                                    Μονάδες 4
ε. να εκτυπώνει τα ονόματα των κομμάτων που έλαβαν
    έδρα και τον αντίστοιχο αριθμό των εδρών τους.
                                                                    Μονάδες 4
Παρατηρήσεις:
α) Υποθέτουμε ότι δεν υπάρχουν δύο κόμματα που
     να έχουν το ίδιο ποσοστό έγκυρων ψηφοδελτίων.
β) Μπορείτε να χρησιμοποιήσετε τη συνάρτηση Α_Μ(x)
    που επιστρέφει το ακέραιο μέρος του πραγματικού
    αριθμού x.
γ) Τα ποσοστά να θεωρηθούν επί τοις εκατό (%).

Λύση

    Αλγόριθμος Θ4_ΕπανΕν2004
    Για λ από 1 μέχρι 15
         Διάβασε Κομ[λ]
         Διάβασε ΠΟΣ[λ]
    Τέλος_επανάληψης
    Για λ από 1 μέχρι 15

         Αν ΠΟΣ[λ] < 3 τότε

              Εμφάνισε Κομ[λ], ΠΟΣ[λ]

         Τέλος_αν

    Τέλος_επανάληψης

    ΜΑΧ <-- ΠΟΣ[1]

    ΑΑΜΑΧ <-- 1

     Για λ από 2 μέχρι 15

         Αν ΠΟΣ[λ] > ΜΑΧ τότε

              ΜΑΧ <-- ΠΟΣ[λ]

              ΑΑΜΑΧ <-- λ

         Τέλος_αν

    Τέλος_επανάληψης

    Εμφάνισε Κομ[ΑΑΜΑΧ]

    Άθροισμα <-- 0

    Για λ από 1 μέχρι 15

         Αν ΠΟΣ[λ] >= 3 τότε

              Άθροισμα <-- Άθροισμα+ΠΟΣ[λ]

         Τέλος_αν

    Τέλος_επανάληψης

    Εμφάνισε Άθροισμα

    Σύνολο <-- 0

    Για λ από 1 μέχρι 15

         Αν (ΠΟΣ[λ] >= 3) ΚΑΙ (λ < > ΑΑΜΑΧ) τότε

              Έδρες <-- Α_Μ( (ΠΟΣ[λ]*24)/Άθροισμα )

              Εμφάνισε Κομ[λ], Έδρες

              Σύνολο <-- Σύνολο+Έδρες

         Τέλος_αν

    Τέλος_επανάληψης

    ΕδρΠρώτου <-- 24-Σύνολο

    Εμφάνισε Κομ[ΑΑΜΑΧ], ΕδρΠρώτου

    Τέλος Θ4_ΕπανΕν2004