Άσκηση : επεξεργασία δοσμένου πλήθους δεδομένων (Για..από..μέχρι)

Γράψτε πρόγραμμα το οποίο:
α) διαβάζει τα ονόματα και το φύλο των 25 μαθητών
     μιας τάξης,
β) υπολογίζει και εμφανίζει:
    * πόσοι μαθητές έχουν το όνομα 'ΝΙΚΟΣ',
    * το ποσοστό (%) επί του συνόλου των μαθητριών
       των κοριτσιών που έχουν το όνομα 'ΜΑΡΙΑ',
    * το πλήθος των αγοριών της τάξης.

Παρατήρηση
Πρέπει να διασφαλίζεται η εγκυρότητα των εισερχόμενων
δεδομένων και συγκεκριμένα ότι:
* Τα ονόματα πρέπει να είναι διάφορα του κενού διαστήματος.
* Το φύλο προσδιορίζεται με τις τιμές Α - αγόρι, Κ - κορίτσι.

Λύση

      ΠΡΟΓΡΑΜΜΑ ΑΣΚ
      ΜΕΤΑΒΛΗΤΕΣ
            ΑΚΕΡΑΙΕΣ: Αγόρια, Κορίτσια, Νικ, Μαρ, κ
            ΠΡΑΓΜΑΤΙΚΕΣ: ΠΟΣ
            ΧΑΡΑΚΤΗΡΕΣ: ΟΝ, Φύλο
      ΑΡΧΗ
             Αγόρια <-- 0
             Κορίτσια <-- 0
             Μαρ <-- 0
             Νικ <-- 0
             ΓΙΑ κ ΑΠΟ 1 ΜΕΧΡΙ 25
                   ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
                      ΔΙΑΒΑΣΕ ΟΝ
                   ΜΕΧΡΙΣ_ΟΤΟΥ ΟΝ < > '  '
                   ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ

                      ΔΙΑΒΑΣΕ Φύλο

                   ΜΕΧΡΙΣ_ΟΤΟΥ (Φύλο =  'Α') Ή (Φύλο = 'Κ')

                   ΑΝ Φύλο = 'Α' ΤΟΤΕ

                         Αγόρια <-- Αγόρια+1

                         ΑΝ ΟΝ = 'ΝΙΚΟΣ' ΤΟΤΕ

                               Νικ <-- Νικ+1

                         ΤΕΛΟΣ_ΑΝ

                   ΑΛΛΙΩΣ

                          Κορίτσια <-- Κορίτσια+1

                          ΑΝ ΟΝ = 'ΜΑΡΙΑ' ΤΟΤΕ

                                Μαρ <-- Μαρ+1

                          ΤΕΛΟΣ_ΑΝ

                   ΤΕΛΟΣ_ΑΝ

             ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
             ΓΡΑΨΕ Αγόρια, Νικ
             ΑΝ Κορίτσια > 0 ΤΟΤΕ
                   ΠΟΣ <-- 100*Μαρ/Κορίτσια
                   ΓΡΑΨΕ ΠΟΣ
             ΑΛΛΙΩΣ
                   ΓΡΑΨΕ 'Δεν υπάρχει καμία μαθήτρια!'
             ΤΕΛΟΣ_ΑΝ
      ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ