! _______________________________________________________________________________
!      
! Σε ένα σχολείο οι μαθητές που θα διαγωνιστούν για μια θέση στην ομάδα μπάσκετ του σχολείου
! είναι εκείνοι που το ύψος τους είναι μεγαλύτερο από το μέσο όρο του ύψους των μαθητών της
! συγκεκριμένης τάξης.
! Να γραφεί πρόγραμμα που να δέχεται το ύψος των 100 μαθητών της τάξης και να εμφανίζει :
!     - Το μέσο όρο του ύψους των μαθητών της τάξης.      
!     - Το ύψος του ψηλότερου μαθητή της τάξης.
!     - Το πλήθος των μαθητών που θα διαγωνιστούν για την ομάδα.
!     - Το μέσο όρο των υψών των μαθητών που θα διαγωνιστούν για την ομάδα.
! ______________________________________________________________________________

ΠΡΟΓΡΑΜΜΑ ΟΜΑΔΑ_ΜΠΑΣΚΕΤ
ΜΕΤΑΒΛΗΤΕΣ
  ΠΡΑΓΜΑΤΙΚΕΣ: ΥΨΟΣ[100] , ΑΘΡΟΙΣΜΑ , ΜΕΣΟΣ1 , ΜΑΧ , ΜΕΣΟΣ2
  ΑΚΕΡΑΙΕΣ: x , n
ΑΡΧΗ
  ΑΘΡΟΙΣΜΑ <-- 0
  ΓΙΑ x ΑΠΟ 1 ΜΕΧΡΙ 100
    ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΥΨΟΣ ΤΟΥ ΜΑΘΗΤΗ Νο : ' , x
    ΔΙΑΒΑΣΕ ΥΨΟΣ[x]
    ΑΘΡΟΙΣΜΑ <-- ΑΘΡΟΙΣΜΑ + ΥΨΟΣ[x]
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΜΕΣΟΣ1 <-- ΑΘΡΟΙΣΜΑ / 100
  ΜΑΧ <-- ΥΨΟΣ[1]
  ΓΙΑ x ΑΠΟ 2 ΜΕΧΡΙ 100
    ΑΝ ΥΨΟΣ[x] > ΜΑΧ ΤΟΤΕ
      ΜΑΧ <-- ΥΨΟΣ[x]
    ΤΕΛΟΣ_ΑΝ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  n <-- 0
  ΑΘΡΟΙΣΜΑ <-- 0
  ΓΙΑ x ΑΠΟ 1 ΜΕΧΡΙ 100
    ΑΝ ΥΨΟΣ[x] > ΜΕΣΟΣ1 ΤΟΤΕ
      n <-- n + 1
      ΑΘΡΟΙΣΜΑ <-- ΑΘΡΟΙΣΜΑ + ΥΨΟΣ[x]
    ΤΕΛΟΣ_ΑΝ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΜΕΣΟΣ2 <-- ΑΘΡΟΙΣΜΑ / n
  ΓΡΑΨΕ 'Ο μέσος όρος των υψών όλων των μαθητών της τάξης είναι : ', ΜΕΣΟΣ1
  ΓΡΑΨΕ 'Ο ψηλότερος μαθητής της τάξης έχει ύψος : ', ΜΑΧ
  ΓΡΑΨΕ 'Το πλήθος των μαθητών που θα διαγωνιστούν για την ομάδα είναι : ', n
  ΓΡΑΨΕ 'Ο μέσος όρος των υψών των μαθητών που θα διαγωνιστούν είναι : ' , ΜΕΣΟΣ2
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ ΟΜΑΔΑ_ΜΠΑΣΚΕΤ