Άσκηση : συγγραφή συνάρτησης

Γράψτε συνάρτηση που δέχεται ως παράμετρο τους
ακέραιους πίνακες Α[12], Β[12], Γ[12] και ελέγχει
αν ισχύει η ιδιότητα :
       Α[Κ] = 2*Β[Κ]-ΓΚ], για Κ = 1, 2, ..., 12

Λύση

        ΣΥΝΑΡΤΗΣΗ ΙΔΙΟΤΗΤΑ(Α, Β, Γ) : ΛΟΓΙΚΗ
        ΜΕΤΑΒΛΗΤΕΣ
               ΑΚΕΡΑΙΕΣ: Α[12], Β[12], Γ[12], Κ, Φ
        ΑΡΧΗ
               Φ <-- 0
               ΓΙΑ Κ ΑΠΟ 1 ΜΕΧΡΙ 12
                     ΑΝ Α[Κ] = 2*Β[Κ]-ΓΚ] ΤΟΤΕ
                            Φ <-- Φ+1
                     ΤΕΛΟΣ_ΑΝ
               ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
               ΑΝ Φ = 12 ΤΟΤΕ
                    ΙΔΙΟΤΗΤΑ <-- ΑΛΗΘΗΣ
               ΑΛΛΙΩΣ
                    ΙΔΙΟΤΗΤΑ <-- ΨΕΥΔΗΣ
               ΤΕΛΟΣ_ΑΝ
        ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ