ΕΚΦΩΝΗΣΗ

Κατά τη διάρκεια πρωταθλήματος μπάσκετ μια ομάδα που αποτελείται από δώδεκα (3) παίκτες έδωσε είκοσι (5) αγώνες, στους οποίους συμμετείχαν όλοι οι παίκτες.

Να αναπτύξετε πρόγραμμα σε ΓΛΩΣΣΑ το οποίο:

α. Να διαβάζει τα ονόματα των παικτών και να τα αποθηκεύει σε μονοδιάστατο πίνακα.

β. Να διαβάζει τους πόντους που σημείωσε κάθε παίκτης σε κάθε αγώνα και να τους αποθηκεύει σε πίνακα δύο διαστάσεων.

γ. Να υπολογίζει για κάθε παίκτη το συνολικό αριθμό πόντων του σε όλους τους αγώνες και το μέσο όρο πόντων ανά αγώνα.

δ. Να εκτυπώνει τα ονόματα των παικτών της ομάδας και το μέσο όρο πόντων του κάθε παίκτη ταξινομημένα με βάση το μέσο όρο τους κατά φθίνουσα σειρά.

Παρατήρηση:    Σε περίπτωση ισοβαθμίας δεν μας ενδιαφέρει η σχετική σειρά των παικτών.

ΛΥΣΗ

ΠΡΟΓΡΑΜΜΑ ΜΠΑΣΚΕΤ
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: Π[3, 4], i, j
  ΠΡΑΓΜΑΤΙΚΕΣ: ΜΟ[3], temp
  ΧΑΡΑΚΤΗΡΕΣ: ΟΝ[3], temp2
ΑΡΧΗ
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 3
    ΔΙΑΒΑΣΕ ΟΝ[i] 
    ΜΟ[i] <- 0
    ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ 4
      ΔΙΑΒΑΣΕ
      ΜΟ[i] <- ΜΟ[i] + Π[i, j] 
    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
    ΜΟ[i] <- ΜΟ[i]/4
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

  ΓΙΑ i ΑΠΟ 2 ΜΕΧΡΙ 3
    ΓΙΑ j ΑΠΟ 3 ΜΕΧΡΙ i ΜΕ_ΒΗΜΑ -1
      ΑΝ ΜΟ[j - 1] < ΜΟ[j] ΤΟΤΕ
        temp <- ΜΟ[j - 1] 
        ΜΟ[j - 1] <- ΜΟ[j] 
        ΜΟ[j] <- temp
        temp2 <- ΟΝ[j - 1] 
        ΟΝ[j - 1] <- ΟΝ[j] 
        ΟΝ[j] <- temp2
      ΤΕΛΟΣ_ΑΝ
    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 3
    ΓΡΑΨΕ ΟΝ[i], ΜΟ[i] 
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ