ΠΡΟΓΡΑΜΜΑ Στίβος
ΜΕΤΑΒΛΗΤΕΣ
   ΑΚΕΡΑΙΕΣ: i, δΑ, δΒ
   ΠΡΑΓΜΑΤΙΚΕΣ: ΧΡΑ[8], ΧΡΒ[8], ΧΡ[8]
   ΧΑΡΑΚΤΗΡΕΣ: ΟΝΑ[8], ΟΝΒ[8], ΟΝ[8]
ΑΡΧΗ
   ΚΑΛΕΣΕ Είσοδος(ΟΝΑ, ΧΡΑ)
   ΚΑΛΕΣΕ Είσοδος(ΟΝΒ, ΧΡΑ)
   ΚΑΛΕΣΕ Ταξινόμηση(ΟΝΑ, ΧΡΑ)
   ΚΑΛΕΣΕ Ταξινόμηση(ΟΝΒ, ΧΡΒ)
   ! ο τελικός πίνακας ΧΡ[8], δε ζητά η   εκφώνηση    ! να είναι ταξινομημένος, τα βάζω τυχαία    ΟΝ[1] <- ΟΝΑ[1]    ΧΡ[1] <- ΧΡΑ[1]    ΟΝ[2] <- ΟΝΒ[1]    ΧΡ[2] <- ΧΡΒ[1] δΑ <- 2   ! παραλλαγή της έξυπνης συγχώνευσης    δΒ <- 2    ΓΙΑ i ΑΠΟ 3 ΜΕΧΡΙ 8       ΑΝ ΧΡΑ[δΑ] < ΧΡΒ[δΒ] ΤΟΤΕ          ΟΝ[i] <- ΟΝΑ[δΑ]          ΧΡ[i] <- ΧΡΑ[δΑ]          δΑ <- δΑ + 1       ΑΛΛΙΩΣ          ΟΝ[i] <- ΟΝΒ[δΒ]          ΧΡ[i] <- ΧΡΒ[δΒ]          δΒ <- δΒ + 1       ΤΕΛΟΣ_ΑΝ    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ    ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 8       ΓΡΑΨΕ ΟΝ[i], ΧΡ[i]    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ Στίβος ! ======================================= ΔΙΑΔΙΚΑΣΙΑ Είσοδος(Ο, Χ) ΜΕΤΑΒΛΗΤΕΣ    ΑΚΕΡΑΙΕΣ: Ι    ΠΡΑΓΜΑΤΙΚΕΣ: Χ[8]    ΧΑΡΑΚΤΗΡΕΣ: Ο[8] ΑΡΧΗ    ΓΙΑ Ι ΑΠΟ 1 ΜΕΧΡΙ 8       ΔΙΑΒΑΣΕ  Ο[Ι], Χ[Ι]    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ ! ======================================= ΔΙΑΔΙΚΑΣΙΑ Ταξινόμηση(Ο, Χ) ΜΕΤΑΒΛΗΤΕΣ    ΑΚΕΡΑΙΕΣ: i, j    ΠΡΑΓΜΑΤΙΚΕΣ: Χ[8], β1    ΧΑΡΑΚΤΗΡΕΣ: Ο[8], β2 ΑΡΧΗ    ΓΙΑ i ΑΠΟ 2 ΜΕΧΡΙ 8       ΓΙΑ j ΑΠΟ 8 ΜΕΧΡΙ i ΜΕ ΒΗΜΑ –1          ΑΝ Χ[j – 1] > Χ[j] ΤΟΤΕ             β1 <- Χ[j – 1]             Χ[j – 1] <- Χ[j]             Χ[j] <- β1             β2 <- Ο[j – 1]             Ο[j – 1] <- Ο[j]             Ο[j] <- β2          ΤΕΛΟΣ_ΑΝ       ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ 
 
  
                 
 
Δεν υπάρχουν σχόλια:
Δημοσίευση σχολίου