Άσκηση : απάντηση σε ερώτηση

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

Λύση

    Αλγόριθμος ΑΣΚ
    Διάβασε Επων
    Διάβασε Τιμή
    ΜΑΧ <-- Τιμή
    ΕπωνΜΑΧ <-- Επων
    ΜΙΝ <-- Τιμή
    ΕπωνΜΙΝ <-- Επων
    σ <--Τιμή
    Πληθ <-- 1
    Εμφάνισε 'Ολοκληρώθηκε η είσοδος;'
    Διάβασε Απ
    Όσο Απ < > 'ΝΑΙ' επανάλαβε
         Διάβασε Επων
         Διάβασε Τιμή
         σ <-- σ+Τιμή
         Πληθ <-- Πληθ+1
         Αν Τιμή > ΜΑΧ τότε
              ΜΑΧ <-- Τιμή
              ΕπωνΜΑΧ <-- Επων
         Τέλος_αν 
         Αν Τιμή < ΜΙΝ τότε
              ΜΙΝ <-- Τιμή
              ΕπωνΜΙΝ <-- Επων
         Τέλος_αν 
         Εμφάνισε 'Ολοκληρώθηκε η είσοδος;'
         Διάβασε Απ
    Τέλος_επανάληψης
     ΜΟ <-- σ/Πληθ
     Εμφάνισε ΕπωνΜΑΧ, ΕπωνΜΙΝ, ΜΟ
    Τέλος ΑΣΚ