ΠΡΟΓΡΑΜΜΑ ArrayValidation
ΣΤΑΘΕΡΕΣ
  n = 5
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: i, j, A[n] 
  ΛΟΓΙΚΕΣ: valid
ΑΡΧΗ
  i <- 1
  ΟΣΟ i <= n ΕΠΑΝΑΛΑΒΕ
    valid <- ΑΛΗΘΗΣ  ! Έστω οτι δόθηκε στοιχείο διαφορετικό απο τα προηγούμενα
    ΓΡΑΨΕ "A[", i, "] : "
    ΔΙΑΒΑΣΕ A[i]
    ! Συγκρίνουμε το νέο στοιχείο με όλα τα προηγούμενα
    ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ i - 1
      ΑΝ A[i] = A[j] ΤΟΤΕ  ! Βρέθηκε ίδιο στοιχείο
        valid <- ΨΕΥΔΗΣ
      ΤΕΛΟΣ_ΑΝ
    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
    ! Επόμενη εισαγωγή ΜΟΝΟ αν εισάγαμε στοιχείο
    ! διαφορετικό απο τα προηγούμενα, αλλιώς το i
    ! παραμένει στην ίδια τιμή και το στοιχείο
    ! ζητείται και πάλι στην επόμενη επανάληψη
    ΑΝ valid = ΑΛΗΘΗΣ ΤΟΤΕ ! Αν το στοιχείο είναι διαφορετικό απο τα
      i <- i + 1           ! προηγούμενα, προχωράμε στο επόμενο στοιχείο
    ΤΕΛΟΣ_ΑΝ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ n
    ΓΡΑΨΕ "A[", i, "] : ", A[i] 
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ