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