ΠΡΟΓΡΑΜΜΑ Εύρεση_Ελαχίστου
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : στοιχείο1, στοιχείο2, στοιχείο3, ελάχιστο
ΑΡΧΗ
ΔΙΑΒΑΣΕ στοιχείο1, στοιχείο2, στοιχείο3
ελάχιστο <-- Μικρότερος_από_3 (στοιχείο1, στοιχείο2, στοιχείο3)
ΓΡΑΨΕ ελάχιστο
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ Εύρεση_Ελαχίστου
! =========================================
ΣΥΝΑΡΤΗΣΗ Μικρότερος_από_3 (α, β, γ): ΑΚΕΡΑΙΑ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : α, β, γ, εκτίμηση
ΑΡΧΗ
εκτίμηση <-- Μικρότερος_από_2 (α, β)! Βρίσκω τον μικρότερο από τους 2 πρώτους
εκτίμηση <-- Μικρότερος_από_2 (εκτίμηση, γ)! Τον συγκρίνω με τον τρίτο κι κρατάω τον μικρότερο
Μικρότερος_από_3 <-- εκτίμηση
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ
! =========================================
ΣΥΝΑΡΤΗΣΗ Μικρότερος_από_2 (x, y): ΑΚΕΡΑΙΑ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: x, y, min
ΑΡΧΗ
ΑΝ x < y ΤΟΤΕ
min <-- x
ΑΛΛΙΩΣ
min <-- y
ΤΕΛΟΣ_ΑΝ
Μικρότερος_από_2 <-- min
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ