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