!Να γραφεί πρόγραμμα το οποίο θα καταχωρεί θετικούς αριθμούς στον
!πίνακα Α[100]. Αποδεκτοί είναι οι αριθμοί που είναι μεγαλύτεροι από
!500 και ο αριθμός 1. Να ταξινομηθεί ο πίνακας Α κατά αύξουσα σειρά,
!χωρίς να επηρεαστούν τα στοιχεία εκείνα που είναι ίσα με το 1.

!Παράδειγμα:
!αρχικό  περιεχόμενο πίνακα Α	500	1	830	1	1	620	900	510 1
!τελικό περιεχόμενο πίνακα  Α	500	1	510	1	1	620	830	900 1


ΠΡΟΓΡΑΜΜΑ taxinomisi_2_G
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: a[10], i, j, temp, k, t
  ΛΟΓΙΚΕΣ: flag
ΑΡΧΗ
  a[1] <- 500
  a[2] <- 1
  a[3] <- 830
  a[4] <- 1
  a[5] <- 1
  a[6] <- 620
  a[7] <- 900
  a[8] <- 510
  a[9] <- 1
  ΓΙΑ i ΑΠΟ 2 ΜΕΧΡΙ 9
    flag <- ΨΕΥΔΗΣ
    t <- 9
    j <- t - 1
    ΟΣΟ j <= 9 ΚΑΙ j >= i ΕΠΑΝΑΛΑΒΕ
      ΟΣΟ a[j] = 1 ΕΠΑΝΑΛΑΒΕ
        j <- j - 1
      ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
      ΟΣΟ a[t] = 1 ΕΠΑΝΑΛΑΒΕ
        t <- t - 1
        j <- j - 1
      ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
      flag <- ΑΛΗΘΗΣ
      ΑΝ a[j] > a[t] ΤΟΤΕ
        temp <- a[j] 
        a[j] <- a[t] 
        a[t] <- temp
      ΤΕΛΟΣ_ΑΝ
      ΑΝ flag = ΑΛΗΘΗΣ ΤΟΤΕ
        t <- j
        j <- j - 1
      ΑΛΛΙΩΣ
        j <- j - 1
        t <- t - 1
      ΤΕΛΟΣ_ΑΝ
    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 9
    ΓΡΑΨΕ a[i] 
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ