Η δέκατη τρίτη επαναληπτική άσκηση για το μάθημα της Πληροφορικής (πρώην ΑΕΠΠ) αποτελεί μία επανάληψη στην σειριακή αναζήτηση. Ο αλγόριθμος της σειριακής αναζήτησης απαιτείται να χρησιμοποιηθεί με δύο διαφορετικούς τρόπους από την απλή αναζήτηση ενός στοιχείου σε έναν μονοδιάστατο πίνακα. Αρχικά ζητείται να γίνει αναζήτηση του πρώτου στοιχείου ενός μονοδιάστατου πίνακα που ικανοποιεί μία συνθήκη και στη συνέχεια αν ένα στοιχείο εμφανίζεται συγκεκριμένο αριθμό φορών σε ένα μονοδιάστατο πίνακα.
13η Επαναληπτική Άσκηση
Τίτλος: Οι χαμηλότερες θερμοκρασίες στη Γη
Κατηγορία: Σειριακή αναζήτησηΟι χαμηλότερες θερμοκρασίες στη Γη έχουν καταγραφεί στην ανατολική Ανταρκτική, κοντά στον νότιο πόλο. Τον Ιούλιο του 1983 καταγράφηκε, με επίγειες μετρήσεις, στο σοβιετικό Σταθμό Βοστόκ της Ανταρκτικής, η χαμηλότερη επιφανειακή θερμοκρασία που έχει μετρηθεί ποτέ στη Γη, στους μείον 89,2 βαθμούς Κελσίου. Σημειώνεται πως στην παγωμένη Ανταρκτική κατά τους σκοτεινούς μήνες του χειμώνα η μέση θερμοκρασία είναι περίπου -34,4 βαθμοί Κελσίου.
Να γραφεί πρόγραμμα το οποίο:
α) Θα διαβάζει τις χαμηλότερες θερμοκρασίες που καταγράφηκαν στην Ανταρκτική για κάθε μία από τις τελευταίες εκατό ημέρες και θα τις αποθηκεύει σε έναν μονοδιάστατο πίνακα,
β) Θα υπολογίζει την πρώτη ημέρα που καταγράφηκε θερμοκρασία μικρότερη από μείον 70 βαθμούς Κελσίου (να μην εξετάζονται όλες οι ημέρες αν αυτό δεν είναι απαραίτητο) και
γ) Θα εμφανίζει αν είχαμε τουλάχιστον δύο ημέρες με θερμοκρασίες κάτω από μείον 80 βαθμούς Κελσίου ( να μην εξετάζονται όλες οι ημέρες αν αυτό δεν είναι απαραίτητο).
Παρατήρηση: Στα ερωτήματα β και γ να εμφανίζεται ο αριθμός των ημερών που εξετάστηκαν.
Λύση 13ης επαναληπτικής άσκησης
ΠΡΟΓΡΑΜΜΑ Χαμηλότερες_Θερμοκρασίες
ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: Ι, ΗΜΕΡΕΣ, ΗΜΕΡΑ
ΠΡΑΓΜΑΤΙΚΕΣ: ΘΕΡΜ[100]
ΛΟΓΙΚΕΣ: ΒΡΕΘΗΚΕ
ΑΡΧΗ
ΓΙΑ Ι ΑΠΟ 1 ΜΕΧΡΙ 100
ΓΡΑΨΕ 'Δώσε τη θερμοκρασία της ', Ι, 'ης ημέρας: '
ΔΙΑΒΑΣΕ ΘΕΡΜ[Ι]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΒΡΕΘΗΚΕ <- ΨΕΥΔΗΣ
Ι <- 1
ΗΜΕΡΑ <- 0
ΟΣΟ Ι <= 100 ΚΑΙ ΟΧΙ ΒΡΕΘΗΚΕ ΕΠΑΝΑΛΑΒΕ
ΑΝ ΘΕΡΜ[Ι] < -70 ΤΟΤΕ
ΒΡΕΘΗΚΕ <- ΑΛΗΘΗΣ
ΗΜΕΡΑ <- Ι
ΑΛΛΙΩΣ
Ι <- Ι + 1
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΝ ΒΡΕΘΗΚΕ ΤΟΤΕ
ΓΡΑΨΕ 'Κάτω από -70 είχε την ', ΗΜΕΡΑ, 'η ημέρα.'
ΓΡΑΨΕ 'Εξετάστηκαν ', Ι, ' ημέρες.'
ΤΕΛΟΣ_ΑΝ
Ι <- 1
ΗΜΕΡΕΣ <- 0
ΟΣΟ Ι <= 100 ΚΑΙ ΗΜΕΡΕΣ < 2 ΕΠΑΝΑΛΑΒΕ
ΑΝ ΘΕΡΜ[Ι] < -80 ΤΟΤΕ
ΗΜΕΡΕΣ <- ΗΜΕΡΕΣ + 1
ΤΕΛΟΣ_ΑΝ
Ι <- Ι + 1 ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΝ ΗΜΕΡΕΣ >= 2 ΤΟΤΕ
ΓΡΑΨΕ 'Είχε κάτω από -80 σε τουλάχιστον 2 ημέρες.'
ΓΡΑΨΕ 'Εξετάστηκαν ', Ι - 1, ' ημέρες.'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ Χαμηλότερες_Θερμοκρασίες
Όλες τις επαναληπτικές ασκήσεις για το μάθημα της Πληροφορικής (πρώην ΑΕΠΠ) μπορείτε να τις βρείτε στο παρακάτω άρθρο:
Σχόλια
Δημοσίευση σχολίου