Πίνακας συχνοτήτων - αναζήτηση επαναληπτικά - ταξινόμηση

Η κεντρική διεύθυνση της αυτοκινητοβιομηχανίας TOYOTA στην Ελλάδα κάνει στατιστική επεξεργασία της πώλησης των μοντέλων που διαθέτει στην ελληνική αγορά μέσω των κατά τόπους αντιπροσωπειών της κάθε μήνα. Για το λόγο αυτό δημιουργεί κάθε τέλος του μήνα πίνακα ΠΩΛ Νx3 για τους Ν πελάτες του μήνα διατηρώντας ονομ/μο , τηλέφωνο και μοντέλο αυτοκινήτου που αγόρασε κάθε πελάτης. Να γραφεί αλγόριθμος ο οποίος για το μήνα που πέρασε:
α. θα διαβάζει το πλήθος Ν των πελατών του μήνα με το Ν να είναι θετικός και το πολύ ίσος με 1000
β. θα δημιουργεί τον πίνακα ΠΩΛ αποθηκεύοντας στην 1η στήλη το ονομ/μο, στη 2η το τηλέφωνο και στην 3η το μοντέλο του αυτοκινήτου που μπορεί να είναι:AYGO , YARIS , AURIS, AVENSIS , COROLLA , RAV4 , LAND CRUISER
γ. θα καταμετρά το πλήθος των αυτοκινήτων που πωλήθηκαν το συγκεκριμένο μήνα ανά μοντέλο και θα εμφανίζει τα 3 δημοφιλέστερα
δ. θα διαβάζει το όνομα ενός μοντέλου και θα εμφανίζει τη λίστα των πελατών που το αγόρασαν. Σε περίπτωση λάθους να δίνεται η δυνατότητα να εισάγεται ξανά.....

αφιερωμένη στο Γιώργο του Γ15...


Αλγόριθμος cars
Αρχή_επανάληψης
    Διάβασε Ν
Μέχρις_ότου Ν>0 και Ν<=1000
Για i από 1 μέχρι Ν
    Για j από 1 μέχρι 3
        Διάβασε ΠΩΛ[i,j]
    Τέλος_επανάληψης
Τέλος_επανάληψης
Για i από 1 μέχρι 7
    ΠΛ[i] ← 0
Τέλος_επανάληψης
Για i από 1 μέχρι Ν
    Αν ΠΩΛ[i,3]='AYGO' τότε
        ΠΛ[1] ←  ΠΛ[1] + 1
    αλλιώς_αν ΠΩΛ[i,3]='YARIS' τότε
        ΠΛ[2] ←  ΠΛ[2] + 1
    αλλιώς_αν ΠΩΛ[i,3]='AURIS' τότε
        ΠΛ[3] ←  ΠΛ[3] + 1
    αλλιώς_αν ΠΩΛ[i,3]='AVENSIS' τότε
        ΠΛ[4] ←  ΠΛ[4] + 1
    αλλιώς_αν ΠΩΛ[i,3]='COROLLA' τότε
        ΠΛ[5] ←  ΠΛ[5] + 1
    αλλιώς_αν ΠΩΛ[i,3]='RAV4' τότε
        ΠΛ[6] ←  ΠΛ[6] + 1
    αλλιώς
        ΠΛ[7] ←  ΠΛ[7] + 1
    Τέλος_αν
Τέλος_επανάληψης
model[1] ← 'AYGO'
model[2] ← 'YARIS'
model[3] ← 'AURIS'
model[4] ← 'AVENSIS'
model[5] ← 'COROLLA'
model[6] ← 'RAV4'
model[7] ← 'LAND CRUISER'
Για i από 2 μέχρι 7
   Για j από 7 μέχρι i με_βήμα -1
      Αν ΠΛ[j-1] < ΠΛ[j] τότε
         Αντιμετάθεσε ΠΛ[j-1],ΠΛ[j]
         Αντιμετάθεσε model[j-1],model[j]
      Τέλος_αν
   Τέλος_επανάληψης
Τέλος_επανάληψης
Εμφάνισε 'δημοφιλέστερα μοντέλα:'
Για i από 1 μέχρι 3
    Εμφάνισε model[i]
Τέλος_επανάληψης
Διάβασε μοντέλο
Μ ← 0
Όσο Μ = 0 επανάλαβε
    Διάβασε μοντέλο
    Για i από 1 μέχρι Ν
        Αν μοντέλο=ΠΩΛ[i,3] τότε
           Εμφάνισε ΠΩΛ[i,1]
           Μ ← Μ + 1
        Τέλος_αν
    Τέλος_επανάληψης
Τέλος_επανάληψης
Τέλος cars