Πρόγραμμα+συνάρτηση

α) Γράψτε συνάρτηση ΗΛΙΚΙΑ η οποία δέχεται ως
    παράμετρο το έτος γέννησης ενός ανθρώπου και
    υπολογίζει την ηλικία του.
β) Γράψτε πρόγραμμα που :
    * διαβάζει το έτος γέννησης 130 ανθρώπων,
    * καλώντας τη συνάρτηση ΗΛΙΚΙΑ υπολογίζει την
       ηλικία τους,
    * εμφανίζει την ηλικία αυτή στην οθόνη.
    * υπολογίζει και εμφανίζει πόσοι άνθρωποι έχουν
       ηλικία τουλάχιστον 15 έτη.

Λύση

          ΠΡΟΓΡΑΜΜΑ ΑΝΘΡΩΠΟΙ
          ΜΕΤΑΒΛΗΤΕΣ
                ΑΚΕΡΑΙΕΣ: κ, ΕΤΟΣ, Ηλ, φ
          ΑΡΧΗ
                φ <-- 0
                ΓΙΑ κ ΑΠΟ 1 ΜΕΧΡΙ 130
                       ΔΙΑΒΑΣΕ ΕΤΟΣ
                       Ηλ <-- ΗΛΙΚΙΑ(ΕΤΟΣ)
                       ΓΡΑΨΕ Ηλ
                       ΑΝ Ηλ >= 15 ΤΟΤΕ
                            φ <-- φ+1
                       ΤΕΛΟΣ_ΑΝ
                ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
                ΓΡΑΨΕ φ
          ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

          ΣΥΝΑΡΤΗΣΗ ΗΛΙΚΙΑ(ΕΤΟΣ) : ΑΚΕΡΑΙΑ
          ΜΕΤΑΒΛΗΤΕΣ
                 ΑΚΕΡΑΙΕΣ: ΕΤΟΣ
          ΑΡΧΗ
                 ΗΛΙΚΙΑ <-- 2011-ΕΤΟΣ
          ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ