ΠΡΟΓΡΑΜΜΑ ΑΣΚΗΣΗ_4_6_4
ΣΤΑΘΕΡΕΣ
  πλ = 26
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: i, ΒΑΘΜΟΙ[πλ], σ, πλ1
  ΠΡΑΓΜΑΤΙΚΕΣ: μο
ΑΡΧΗ
! Γέμισμα & Ερώτημα 1ο
  σ <- 0
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ πλ
    ΔΙΑΒΑΣΕ ΒΑΘΜΟΙ[i] 
    σ <- σ + ΒΑΘΜΟΙ[i] 
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  μο <- σ/πλ
  ΓΡΑΨΕ μο
! Ερώτημα 2ο
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ πλ
    ΓΡΑΨΕ ΒΑΘΜΟΙ[i] - μο
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
! Ερώτημα 3ο
  πλ1 <- 0
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ πλ
    ΑΝ ΒΑΘΜΟΙ[i] > μο ΤΟΤΕ
      πλ1 <- πλ1 + 1
    ΤΕΛΟΣ_ΑΝ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΓΡΑΨΕ πλ1
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ