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

Γράψτε διαδικασία που δέχεται ως παράμετρο ένα
ακέραιο πίνακα Α[3, 4, 5] και υπολογίζει το μικρότερο
στοιχείο του και τη θέση του μέσα στον πίνακα.

Λύση

      ΔΙΑΔΙΚΑΣΙΑ ΜΙΚΡ(Α, ΜΙΝ, ΘΚ, ΘΛ, ΘΜ)
      ΜΕΤΑΒΛΗΤΕΣ
            ΑΚΕΡΑΙΕΣ: Α[3, 4, 5], ΜΙΝ, ΘΚ, ΘΛ, ΘΜ,
                                  Κ, Λ, Μ
      ΑΡΧΗ
            ΜΙΝ <-- Α[1, 1, 1]
            ΘΚ <-- 1
            ΘΛ <-- 1
            ΘΜ <-- 1
            ΓΙΑ Κ ΑΠΟ 1 ΜΕΧΡΙ 3
                  ΓΙΑ Λ ΑΠΟ 1 ΜΕΧΡΙ 4
                        ΓΙΑ Μ ΑΠΟ 1 ΜΕΧΡΙ 5
                               ΑΝ Α[Κ, Λ, Μ] < ΜΙΝ ΤΟΤΕ
                                     ΜΙΝ <-- Α[Κ, Λ, Μ]
                                     ΘΚ <-- Κ
                                     ΘΛ <-- Λ
                                     ΘΜ <-- Μ
                               ΤΕΛΟΣ_ΑΝ
                        ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
                  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
            ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
      ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ