Γράψε
"----------------------------------------"
Γράψε
"Σειριακή αναζήτηση πίνακα με χρήση"
Γράψε
"της εντολής επανάληψης Για"
Γράψε
"----------------------------------------"
A <- [16, 22, 50, 87, 6, 69, 93, 6, 24, 39]
Διάβασε
X
Για
i
Από
1
Μέχρι
10
Με_Βήμα
1
Αν
A[i] = X
Τότε
Γράψε
"Βρέθηκε στη θέση ", i
Αλλιώς
Γράψε
"Δεν βρέθηκε στη θέση ", i
Τέλος_Αν
Τέλος_Επανάληψης
Γράψε
"----------------------------------------"
Γράψε
"----------------------------------------"
Γράψε
"Σειριακή αναζήτηση πίνακα με χρήση της εντολής επανάληψης Όσο."
Γράψε
"----------------------------------------"
A <- [16, 22, 50, 87, 6, 69, 93, 6, 24, 39]
βρεθηκε <- ψευδης
position <- 0
i <- 1
Διάβασε
X
Όσο
βρεθηκε = ψευδης και i <= 10
Επανάλαβε
Αν
A[i] = X
Τότε
βρεθηκε <- αληθης
position <- i
Αλλιώς
i <- i + 1
Τέλος_Αν
Τέλος_Επανάληψης
Αν
βρεθηκε = αληθης
Τότε
Γράψε
"Ο αριθμός ", X, " βρέθηκε στη θέση ", position
Αλλιώς
Γράψε
"Ο αριθμός ", X, " δεν βρέθηκε."
Τέλος_Αν
Γράψε
"----------------------------------------"