ΠΡΟΓΡΑΜΜΑ  Ε_Κ_Π
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: Α, Β, εκπ
ΑΡΧΗ
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
  ΓΡΑΨΕ  "ΔΩΣΤΕ ΤΟΝ ΠΡΩΤΟ ΑΡΙΘΜΟ : "
  ΔΙΑΒΑΣΕ  Α
ΜΕΧΡΙΣ_ΟΤΟΥ  Α > 0
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
  ΓΡΑΨΕ  "ΔΩΣΤΕ ΤΟΝ ΔΕΥΤΕΡΟ ΑΡΙΘΜΟ : "
  ΔΙΑΒΑΣΕ  Β
ΜΕΧΡΙΣ_ΟΤΟΥ  Β > 0
ΑΝ  Α > Β ΤΟΤΕ
  εκπ ← Α
ΑΛΛΙΩΣ
  εκπ ← Β
ΤΕΛΟΣ_ΑΝ
ΟΣΟ  (εκπ mod Α) ≠ 0 Η  (εκπ mod Β) ≠ 0 ΕΠΑΝΑΛΑΒΕ
  εκπ ← εκπ + 1
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ  "Ε.Κ.Π = ", εκπ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ Ε_Κ_Π