ΠΡΟΓΡΑΜΜΑ ΜΑΝΤΕΨΕ
ΣΤΑΘΕΡΕΣ
  Ν = 1000
  ΠΛ = 10                                                   ! ΠΛΗΘΟΣ ΠΡΟΣΠΑΘΕΙΩΝ
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: ΠΡΩΤΟΣ, ΤΕΛΕΥΤΑΙΟΣ, ΠΡΟΣΠΑΘΕΙΕΣ, ΜΕΣΟΝ
  ΛΟΓΙΚΕΣ: ΒΡΕΘΗΚΕ
  ΧΑΡΑΚΤΗΡΕΣ: ΑΠΑΝΤΗΣΗ
ΑΡΧΗ
  ΓΡΑΨΕ "ΣΚΕΨΟΥ ΕΝΑΝ ΑΡΙΘΜΟ ΑΠΟ ΤΟ 1 ΕΩΣ ΤΟ  ", Ν
  ΠΡΟΣΠΑΘΕΙΕΣ <- 0
  ΒΡΕΘΗΚΕ <- ΨΕΥΔΗΣ
  ΠΡΩΤΟΣ <- 1
  ΤΕΛΕΥΤΑΙΟΣ <- Ν
  ΟΣΟ ΟΧΙ ΒΡΕΘΗΚΕ ΚΑΙ ΠΡΟΣΠΑΘΕΙΕΣ < ΠΛ ΕΠΑΝΑΛΑΒΕ
    ΜΕΣΟΝ <- (ΠΡΩΤΟΣ + ΤΕΛΕΥΤΑΙΟΣ) div 2
    ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
      ΓΡΑΨΕ "ΕΙΝΑΙ Ο ΑΡΙΘΜΟΣ Ο ", ΜΕΣΟΝ, " ΝΑΙ/ΟΧΙ"
      ΔΙΑΒΑΣΕ ΑΠΑΝΤΗΣΗ
    ΜΕΧΡΙΣ_ΟΤΟΥ ΑΠΑΝΤΗΣΗ = "ΝΑΙ" Η ΑΠΑΝΤΗΣΗ = "ΟΧΙ"
    ΠΡΟΣΠΑΘΕΙΕΣ <- ΠΡΟΣΠΑΘΕΙΕΣ + 1
    ΑΝ ΑΠΑΝΤΗΣΗ = "ΝΑΙ" ΤΟΤΕ
      ΒΡΕΘΗΚΕ <- ΑΛΗΘΗΣ
    ΑΛΛΙΩΣ
      ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
        ΓΡΑΨΕ "ΕΙΝΑΙ ΜΙΚΡΟΤΕΡΟΣ ΤΟΥ ", ΜΕΣΟΝ, " ΝΑΙ/ΟΧΙ"
        ΔΙΑΒΑΣΕ ΑΠΑΝΤΗΣΗ
      ΜΕΧΡΙΣ_ΟΤΟΥ ΑΠΑΝΤΗΣΗ = "ΝΑΙ" Η ΑΠΑΝΤΗΣΗ = "ΟΧΙ"
      ΑΝ ΑΠΑΝΤΗΣΗ = "ΝΑΙ" ΤΟΤΕ
        ΤΕΛΕΥΤΑΙΟΣ <- ΜΕΣΟΝ - 1
      ΑΛΛΙΩΣ_ΑΝ ΑΠΑΝΤΗΣΗ = "ΟΧΙ" ΤΟΤΕ
        ΠΡΩΤΟΣ <- ΜΕΣΟΝ + 1
      ΤΕΛΟΣ_ΑΝ
    ΤΕΛΟΣ_ΑΝ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΑΝ ΒΡΕΘΗΚΕ = ΑΛΗΘΗΣ ΤΟΤΕ
    ΓΡΑΨΕ "ΚΕΡΔΙΣΑ !!! ΤΟ ΒΡΗΚΑ ΜΕ ", ΠΡΟΣΠΑΘΕΙΕΣ, " ΠΡΟΣΠΑΘΕΙΕΣ"
  ΑΛΛΙΩΣ
    ΓΡΑΨΕ "ΚΕΡΔΙΣΕΣ"
  ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ