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

Γράψτε αλγόριθμο που διαβάζει :
α) το ονοματεπώνυμο,  την ειδικότητα (π.χ ΠΕ19) και τα
    χρόνια υπηρεσίας 135  καθηγητών,
β) υπολογίζει και εμφανίζει:
    * το ονοματεπώνυμο του καθηγητή που έχει τα
       περισσότερα χρόνια υπηρεσίας ανάμεσα στους
       καθηγητές με ειδικότητα ΠΕ19,
    * το ποσοστό (%) των καθηγητών με ειδικότητα
       ΠΕ4
    * το πλήθος των καθηγητών που έχουν τουλάχιστον
       20 αλλά όχι παραπάνω από 26 χρόνια υπηρεσίας.

Λύση

      Αλγόριθμος Ειδικότητες
      Μεγ <-- -100
      ΠΕ4 <-- 0
      Χρ2026 <-- 0
      Για κ από 1 μέχρι 135
           Διάβασε Ον
           Διάβασε Ειδ
           Διάβασε Χρ
           Αν (Χρ > Μεγ) ΚΑΙ (Ειδ = 'ΠΕ19') τότε
                Μεγ <-- Χρ
                ΟνΜεγ <-- Ον
           Τέλος_αν
           Αν Ειδ = 'ΠΕ4' τότε
                ΠΕ4 <-- ΠΕ4+1
           Τέλος_αν
           Αν (Χρ >= 20) ΚΑΙ (Χρ <= 26) τότε
                Χρ2026 <-- Χρ2026+1
           Τέλος_αν
      Τέλος_επανάληψης
      Αν Μεγ > 0 τότε
           Εμφάνισε ΟνΜεγ
      αλλιώς
           Εμφάνισε 'Δεν υπάρχει κανένας καθηγητής ΠΕ19'
      Τέλος_αν
      ΠΟΣ <-- 100*ΠΕ4/135
      Εμφάνισε Χρ2026, ΠΟΣ
      Τέλος Ειδικότητες