Μ.Κ.Δ. Λύση

Share

Η παρακάτω λύση δόθηκε από τον μαθητή της Γ τάξης,  Τάσο Γρηγοριάδη:

 

ΠΡΟΓΡΑΜΜΑ Μ_Κ_Δ

ΜΕΤΑΒΛΗΤΕΣ

ΑΚΕΡΑΙΕΣ: μ, ν, ΜΙΝ, τ, ΔΙ, Δ2

ΛΟΓΙΚΕΣ: flag

ΑΡΧΗ

ΑΡΧΗ ΕΠΑΝΑΛΗΨΗΣ

ΓΡΑΨΕ " Δώσε 2 ακαίρεους θετικούς"

ΔΙΑΒΑΣΕ μ, ν

ΜΕΧΡΙΣ_ΟΤΟΥ μ > 0 ΚΑΙ ν > 0

ΑΝ μ < ν ΤΟΤΕ

ΜΙΝ <- μ

ΑΛΛΙΩΣ

ΜΙΝ <- ν ΤΕΛΟΣ_ΑΝ

τ <- ΜΙΝ

flag <- ΨΕΥΔΗΣ

ΟΣΟ flag = ΨΕΥΔΗΣ ΕΠΑΝΑΛΑΒΕ

ΔΙ <- μ MOD τ

ΑΝ ΔΙ = 0 ΤΟΤΕ

Δ2 <- ν MOD τ

ΑΝ Δ2 = 0 ΤΟΤΕ

flag <- ΑΛΗΘΗΣ

ΑΛΛΙΩΣ

τ <- τ - 1

ΤΕΛΟΣ_ΑΝ

ΑΛΛΙΩΣ

τ <- τ - 1

ΤΕΛΟΣ_ΑΝ

ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

ΓΡΑΨΕ " Μέγιστος Κοινός Διαιρέτης", τ

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ