Υλικό Ανάπτυξη Εφαρμογών Μ.Κ.Δ. Λύση
Μ.Κ.Δ. Λύση
Η παρακάτω λύση δόθηκε από τον μαθητή της Γ τάξης, Τάσο Γρηγοριάδη:
ΠΡΟΓΡΑΜΜΑ Μ_Κ_Δ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: μ, ν, ΜΙΝ, τ, ΔΙ, Δ2
ΛΟΓΙΚΕΣ: flag
ΑΡΧΗ
ΑΡΧΗ ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ " Δώσε 2 ακαίρεους θετικούς"
ΔΙΑΒΑΣΕ μ, ν
ΜΕΧΡΙΣ_ΟΤΟΥ μ > 0 ΚΑΙ ν > 0
ΑΝ μ < ν ΤΟΤΕ
ΜΙΝ <- μ
ΑΛΛΙΩΣ
ΜΙΝ <- ν ΤΕΛΟΣ_ΑΝ
τ <- ΜΙΝ
flag <- ΨΕΥΔΗΣ
ΟΣΟ flag = ΨΕΥΔΗΣ ΕΠΑΝΑΛΑΒΕ
ΔΙ <- μ MOD τ
ΑΝ ΔΙ = 0 ΤΟΤΕ
Δ2 <- ν MOD τ
ΑΝ Δ2 = 0 ΤΟΤΕ
flag <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
τ <- τ - 1
ΤΕΛΟΣ_ΑΝ
ΑΛΛΙΩΣ
τ <- τ - 1
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ " Μέγιστος Κοινός Διαιρέτης", τ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Τελευταία ενημέρωση: Κυριακή 13/10/2024 13:09