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