ΠΡΟΓΡΑΜΜΑ παλινδρομο ΣΤΑΘΕΡΕΣ θεσεις = 5 ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: ι, κ, ελεγχος, ξ, λ, ν, ζ, δφρ, μαχ_ι, μαχ_ζ ΧΑΡΑΚΤΗΡΕΣ: α[θεσεις], β[θεσεις] ΑΡΧΗ ΓΙΑ ι ΑΠΟ 1 ΜΕΧΡΙ θεσεις ΔΙΑΒΑΣΕ α[ι] β[ι] <- α[ι] ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ !αντιγραφω τα στοιχεια του α στον πινακα β δφρ <- 0 μαχ_ι <- 0 μαχ_ζ <- -1 ΓΙΑ ι ΑΠΟ 1 ΜΕΧΡΙ θεσεις ΓΙΑ ζ ΑΠΟ ι + 1 ΜΕΧΡΙ θεσεις ΚΑΛΕΣΕ αντιστροφη_πινακα(β, ι, ζ) !η παραπανω διαδικασια αντιστρεφει τα στοιχεια του πινακα !β απο τη θεση ι μεχρι την ζ ελεγχος <- συγκριση_στοιχειων_2_πινακων (α, β, ι, ζ) !ελεγχω να δω αν τα στοιχεια του α με του β ειναι ιδια !μετα την αντιστροφη του β. ΑΝ ελεγχος = 1 ΤΟΤΕ ΑΝ Α_Τ(ι - ζ) > δφρ ΤΟΤΕ μαχ_ι <- ι μαχ_ζ <- ζ δφρ <- Α_Τ(ι - ζ) ΤΕΛΟΣ_ΑΝ ΤΕΛΟΣ_ΑΝ !παραπανω βρισκω τα μαχ ι και ζ που υπαρχει παλινδρομο ΓΙΑ λ ΑΠΟ ι ΜΕΧΡΙ ζ β[λ] <- α[λ] ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ !ξαναβαζω τα στοιχεια του β οπως ηταν πριν την αντιστροφη του ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΓΙΑ ι ΑΠΟ μαχ_ι ΜΕΧΡΙ μαχ_ζ ΓΡΑΨΕ α[ι] ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ !γραφω το μεγιστο παλινδρομο ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ ΣΥΝΑΡΤΗΣΗ συγκριση_στοιχειων_2_πινακων (γ, δ, αρχ, τελ): ΑΚΕΡΑΙΑ ΣΤΑΘΕΡΕΣ θεσεις = 5 ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: αρχ, τελ, ι, φλαγκ ΧΑΡΑΚΤΗΡΕΣ: γ[θεσεις], δ[θεσεις] ΑΡΧΗ φλαγκ <- 1 ΓΙΑ ι ΑΠΟ αρχ ΜΕΧΡΙ τελ ΑΝ γ[ι] <> δ[ι] ΤΟΤΕ φλαγκ <- 0 ι <- τελ ΤΕΛΟΣ_ΑΝ ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ συγκριση_στοιχειων_2_πινακων <- φλαγκ ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ ΔΙΑΔΙΚΑΣΙΑ αντιστροφη_πινακα(π, αρχ, θ) ΣΤΑΘΕΡΕΣ θεσεις = 5 ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: θ, ι, αρχ, κ, τ ΧΑΡΑΚΤΗΡΕΣ: π[θεσεις], τεμπ ΑΡΧΗ τ <- αρχ κ <- θ ΓΙΑ ι ΑΠΟ 1 ΜΕΧΡΙ ((θ - αρχ + 1) DIV 2) τεμπ <- π[κ] π[ κ] <- π[τ] π[τ] <- τεμπ κ <- κ - 1 τ <- τ + 1 ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ