e-ΜΑΘΗΜΑΤΑ |
Λύσεις ασκήσεων από τον Οδηγό Μελέτης Μαθητών |
ΠΡΟΓΡΑΜΜΑ ΚΛΗΣΗ_ΥΠΟΠΡΟΓΡΑΜΜΑΤΟΣ
! ΑΕΠΠ - Οδηγός Μελέτης Μαθητή
! Μη λυμένες ασκήσεις 5.4.4.3
!
! 3. Να γραφεί υποπρόγραμμα το οποίο να αναζητεί ένα ακέραιο αριθμό
! σ' ένα πίνακα x[1000] ακέραιων αριθμών. Όταν τον βρίσκει να επιστρέφει
! τη θέση που βρέθηκε, διαφορετικά να επιστρέφει μηδέν.
! Ο πίνακας και ο ακέραιος αριθμός να ορίζονται ως παράμετροι
! του υποπρογράμματος. (οι αριθμοί στον πίνακα είναι μοναδικοί)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: x[1000], τιμή, θέση, i
ΑΡΧΗ
! το κύριο πρόγραμμα δεν το ζητάει η εκφώνηση, αλλά χρειάζεται
! για την κλήση του υποπρογράμματος.
!
! Επειδή το υποπρόγραμμα επιστρέφει μόνο ένα αριθμό το υλοποιούμε
! σε ΣΥΝΑΡΤΗΣΗ
ΓΡΑΨΕ 'Δώστε τιμή για αναζήτηση: '
ΔΙΑΒΑΣΕ τιμή
ΓΡΑΨΕ 'Δώστε τιμές πίνακα'
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 1000
ΔΙΑΒΑΣΕ x[i]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
θέση <- αναζήτηση (x, τιμή)
ΑΝ θέση > 0 ΤΟΤΕ
ΓΡΑΨΕ 'Βρέθηκε στη θέση: ', θέση
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'Δεν βρέθηκε'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΣΥΝΑΡΤΗΣΗ αναζήτηση (x, τιμή): ΑΚΕΡΑΙΑ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: x[1000], τιμή, i
ΛΟΓΙΚΕΣ: βρέθηκε
ΑΡΧΗ
i <- 1
αναζήτηση <- 0
! εφοσον η εκφώνηση αναφέρει ότι οι αριθμοί είναι διαφορετικοί
! μεταξύ τους, η αναζήτηση θα σταματήσει όταν βρεθεί ο αριθμός
βρέθηκε <- ΨΕΥΔΗΣ
ΟΣΟ i <= 1000 ΚΑΙ βρέθηκε = ΨΕΥΔΗΣ ΕΠΑΝΑΛΑΒΕ
ΑΝ x[i] = τιμή ΤΟΤΕ
βρέθηκε <- ΑΛΗΘΗΣ
αναζήτηση <- i
ΑΛΛΙΩΣ
i <- i + 1
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ
|