! -------------------------------------------
! ΤΟ ΠΡΟΓΡΑΜΜΑ ΖΗΤΑΕΙ ΤΙΜΕΣ ΓΙΑ ΕΝΑΝ ΠΙΝΑΚΑ Π
! ΚΑΙ ΜΙΑ ΤΙΜΗ ΠΡΟΣ ΑΝΑΖΗΤΗΣΗ. ΣΤΗ ΣΥΝΕΧΕΙΑ
! ΕΜΦΑΝΙΖΕΙ ΣΕ ΠΟΙΑ ΘΕΣΗ ΥΠΑΡΧΕΙ Η ΖΗΤΟΥΜΕΝΗ
! ΤΙΜΗ (ΑΝ ΥΠΑΡΧΕΙ).
! -------------------------------------------
ΠΡΟΓΡΑΜΜΑ ΕΥΡΕΣΗ_ΤΙΜΗΣ_ΣΕ_ΠΙΝΑΚΑ
ΣΤΑΘΕΡΕΣ
Ν=10
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: ΖΗΤ_ΤΙΜΗ, ΘΕΣΗ, Π[Ν], Ι
ΑΡΧΗ
ΓΙΑ Ι ΑΠΟ 1 ΜΕΧΡΙ Ν
ΓΡΑΨΕ 'Δώσε την ', Ι, 'η τιμή του πίνακα:'
ΔΙΑΒΑΣΕ Π[Ι]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε την τιμή που αναζητάς:'
ΔΙΑΒΑΣΕ ΖΗΤ_ΤΙΜΗ
!Σας προτείνω την παρακάτω λύση
Ι <-- 1
ΟΣΟ (Π[Ι]<>ΖΗΤ_ΤΙΜΗ) ΚΑΙ (Ι<Ν) ΕΠΑΝΑΛΑΒΕ
Ι <-- Ι+1
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΝ Π[Ι]=ΖΗΤ_ΤΙΜΗ ΤΟΤΕ
ΓΡΑΨΕ 'Η τιμή ', ΖΗΤ_ΤΙΜΗ, ' βρέθηκε στην ', Ι, 'η θέση'
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'Η τιμή ', ΖΗΤ_ΤΙΜΗ, ' δε βρέθηκε στον πίνακα'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ ΕΥΡΕΣΗ_ΤΙΜΗΣ_ΣΕ_ΠΙΝΑΚΑ