Δευτέρα 14 Μαρτίου 2011

Θέμα 3ο - Επαναληπτικές Απολυτήριες εξετάσεις εσπερινού ενιαίου λυκείου 2005

Εκατό (100) υποψήφιοι του ΑΣΕΠ διαγωνίζονται σε τρία
μαθήματα για την κάλυψη θέσεων του Δημοσίου. Να γραφεί
κύριο πρόγραμμα σε ΓΛΩΣΣΑ που να κάνει τα παρακάτω:
α) Διαβάζει τα ονόματα των 100 υποψηφίων του ΑΣΕΠ και
τη βαθμολογία καθενός υποψηφίου σε τρία διαφορετικά
μαθήματα. (Θεωρήστε ότι η βαθμολογία κάθε μαθήματος
είναι από 1 έως 20).
                                                                         Μονάδες 4
β) Βρίσκει και τυπώνει τον ελάχιστο και τον μέγιστο βαθμό
    καθενός υποψηφίου στα τρία μαθήματα που εξετάστηκε.
                                                                         Μονάδες 6
γ) Να γραφεί υποπρόγραμμα, το οποίο να καλείται από το
    κύριο πρόγραμμα, για τον υπολογισμό και την εκτύπωση
    του μέσου όρου κάθε υποψηφίου στα τρία μαθήματα που
   διαγωνίστηκε.
                                                                       Μονάδες 10

Λύση

      ΠΡΟΓΡΑΜΜΑ Θ3_ΕπανΕν2005
      ΜΕΤΑΒΛΗΤΕΣ
             ΑΚΕΡΑΙΕΣ: λ, μ
             ΠΡΑΓΜΑΤΙΚΕΣ: Βαθμ[100, 3], ΜΑΧ, ΜΙΝ
             ΧΑΡΑΚΤΗΡΕΣ: Ον[100]
      ΑΡΧΗ
             ΓΙΑ λ ΑΠΟ 1 ΜΕΧΡΙ 100
                  ΔΙΑΒΑΣΕ Ον[λ]
             ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
             ΓΙΑ λ ΑΠΟ ΜΕΧΡΙ 100
                  ΓΙΑ μ ΑΠΟ ΜΕΧΡΙ 3
                       ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ 
                            ΔΙΑΒΑΣΕ Βαθμ[λ, μ]
                       ΜΕΧΡΙΣ_ΟΤΟΥ (Βαθμ[λ, μ] >= 1) ΚΑΙ
                                                   (Βαθμ[λ, μ] <= 20)
                 ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
             ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
             ΓΙΑ λ ΑΠΟ ΜΕΧΡΙ 100
                  ΜΑΧ <-- Βαθμ[λ, 1]
                  ΜΙΝ <-- Βαθμ[λ, 1]
                  ΓΙΑ μ ΑΠΟ ΜΕΧΡΙ 3
                       ΑΝ Βαθμ[λ, μ] > ΜΑΧ ΤΟΤΕ
                             ΜΑΧ <-- Βαθμ[λ, μ] 
                       ΤΕΛΟΣ_ΑΝ
                       ΑΝ Βαθμ[λ, μ] < ΜΙΝ ΤΟΤΕ
                             ΜΙΝ <-- Βαθμ[λ, μ] 
                       ΤΕΛΟΣ_ΑΝ                                                   
                 ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
                 ΓΡΑΨΕ 'Υποψήφιος :', Ον[λ], 'ΜΑΧ =', ΜΑΧ
                 ΓΡΑΨΕ 'ΜΙΝ =', ΜΙΝ
             ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
             ΚΑΛΕΣΕ ΜΕΣΟΙ(Βαθμ)
      ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

      ΔΙΑΔΙΚΑΣΙΑ ΜΕΣΟΙ(Βαθμ)
      ΜΕΤΑΒΛΗΤΕΣ
             ΠΡΑΓΜΑΤΙΚΕΣ: Βαθμ[100, 3], σ, ΜΟ
             ΑΚΕΡΑΙΕΣ: λ, μ
      ΑΡΧΗ
             ΓΙΑ λ ΑΠΟ ΜΕΧΡΙ 100
                  σ <-- 0
                  ΓΙΑ μ ΑΠΟ ΜΕΧΡΙ 3
                        σ <-- σ+Βαθμ[λ, μ]
                  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
                  ΜΟ <-- σ/3
                  ΓΡΑΨΕ 'ΜΟ υποψηφίου Νο:', Λ, ' =', ΜΟ
             ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
      ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ

Δεν υπάρχουν σχόλια:

Δημοσίευση σχολίου