ΠΡΟΓΡΑΜΜΑ αααα
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: Χ, Μέγιστος
ΑΡΧΗ
  ΔΙΑΒΑΣΕ Χ
  Μέγιστος <- Χ
  ΔΙΑΒΑΣΕ Χ
  ΟΣΟ Χ >= 0 ΕΠΑΝΑΛΑΒΕ
    Μέγιστος <- ΜΕΓΑΛ(Μέγιστος, Χ) 
    ΔΙΑΒΑΣΕ Χ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

  ΓΡΑΨΕ "ΕΙΝΑΙ Ο", Μέγιστος
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ





ΣΥΝΑΡΤΗΣΗ ΜΕΓΑΛ(Α, Β): ΑΚΕΡΑΙΑ
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: Α, Β
ΑΡΧΗ
  ΑΝ Α >= Β ΤΟΤΕ
    ΜΕΓΑΛ <- Α
  ΑΛΛΙΩΣ
    ΜΕΓΑΛ <- Β
  ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ