Άσκηση :συγγραφή διαδικασίας

Γράψτε διαδικασία που διαβάζει 110 λέξεις και υπολογίζει
το ποσοστό (%) των λέξεων αυτών που προηγούνται
λεξικογραφικά της λέξης 'ΑΝΑΠΤΥΞΗ'

Λύση

      ΔΙΑΔΙΚΑΣΙΑ ΥΠΟΛ(ΠΟΣ)
      ΣΤΑΘΕΡΕΣ
           ΑΡΧΛΕΞ = 'ΑΝΑΠΤΥΞΗ'
      ΜΕΤΑΒΛΗΤΕΣ
             ΑΚΕΡΑΙΕΣ: Φ, Κ
             ΠΡΑΓΜΑΤΙΚΕΣ: ΠΟΣ
             ΧΑΡΑΚΤΗΡΕΣ : Λέξη
      ΑΡΧΗ


               Φ <-- 0
               ΓΙΑ Κ ΑΠΟ 1 ΜΕΧΡΙ 110
                     ΔΙΑΒΑΣΕ Λέξη
                     ΑΝ Λέξη < ΑΡΧΛΕΞ ΤΟΤΕ
                          Φ <-- Φ+1
                     ΤΕΛΟΣ_ΑΝ
               ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
               ΠΟΣ <-- 100*Φ/110
      ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ