Άσκηση : Για+φρουρός

Σε ένα πρωτάθλημα ποδοσφαίρου συμμετέχουν 16 ομάδες.
Γράψτε πρόγραμμα το οποίο:
α) διαβάζει το όνομα κάθε ομάδας και τα αποτελέσματα
     (Νίκη ή Ισοπαλία ή Ήττα) που έφερε  σε κάποιους
    αγώνες του  πρωταθλήματος (η είσοδος ολοκληρώνεται
    μόλις δοθεί ως τιμή εισόδου η λέξη 'ΤΕΛΟΣ')
β) υπολογίζει και εμφανίζει:
    * το όνομα της ομάδας με τη μεγαλύτερη βαθμολογία,
    * το όνομα της ομάδας με τις λιγότερες ισοπαλίες.
Παρατηρήσεις
* Καμιά ομάδα δεν είχε περισσότερες από 10 ισοπαλίες στους
   αγώνες της.
* Κάθε νίκη αποτιμάται με 3 βαθμούς, η ισοπαλία με 1 ενώ η
   ήττα δε δίνει κανένα βαθμό.
* Δεν απαιτείται κανένας έλεγχος εγκυρότητας των εισερχό-
   μενων δεδομένων.
* Θεωρείστε ότι κάθε ομάδα έδωσε τουλάχιστον ένα αγώνα.


Λύση

       ΠΡΟΓΡΑΜΜΑ ΠΟΔΟΣΦΑΙΡΟ
       ΜΕΤΑΒΛΗΤΕΣ
             ΑΚΕΡΑΙΕΣ: κ, Ισοπαλίες, ΜΙΝ, ΜΑΧ, Βαθμ
             ΧΑΡΑΚΤΗΡΕΣ: Απ, ΟΝ, ΟΝΜΑΧ, ΟΝΜΙΝ
       ΑΡΧΗ
             ΜΑΧ <-- -100
             ΜΙΝ <-- 11
             ΓΙΑ κ ΑΠΟ 1 ΜΕΧΡΙ 16
                  ΔΙΑΒΑΣΕ ΟΝ
                  Βαθμ <-- 0
                  Ισοπαλίες <-- 0
                  ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
                         ΔΙΑΒΑΣΕ Απ
                         ΑΝ Απ < > 'ΤΕΛΟΣ' ΤΟΤΕ
                             ΑΝ Απ = 'Νίκη' ΤΟΤΕ
                                 Βαθμ <-- Βαθμ+2
                             ΑΛΛΙΩΣ
                                ΑΝ Απ = 'Ισοπαλία' ΤΟΤΕ
                                     Βαθμ <-- Βαθμ+1
                                     Ισοπαλίες <-- Ισοπαλίες+1
                                ΤΕΛΟΣ_ΑΝ
                             ΤΕΛΟΣ_ΑΝ

                         ΤΕΛΟΣ_ΑΝ                         
                  ΜΕΧΡΙΣ_ΟΤΟΥ Απ = 'ΤΕΛΟΣ'
                  ΑΝ Βαθμ > ΜΑΧ ΤΟΤΕ
                        ΜΑΧ <-- Βαθμ
                        ΟΝΜΑΧ <-- ΟΝ
                  ΤΕΛΟΣ_ΑΝ
                  ΑΝ Ισοπαλίες < ΜΙΝ ΤΟΤΕ
                        ΜΙΝ <-- Ισοπαλίες
                        ΟΝΜΙΝ <-- ΟΝ
                  ΤΕΛΟΣ_ΑΝ
             ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
             ΓΡΑΨΕ ΟΝΜΑΧ, ΟΝΜΙΝ
       ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ