|
e-ΜΑΘΗΜΑΤΑ |
|
Μετατροπή εντολής Αν-Αλλιώς_αν σε Επίλεξε |
ΠΡΟΓΡΑΜΜΑ ΜΕΤΕΟ
!2006 Θ4
!Για την παρακολούθηση των θερμοκρασιών της επικράτειας κατά το
!μήνα Μάιο καταγράφεται κάθε μέρα η θερμοκρασία στις 12:00 το
!μεσημέρι για 20 πόλεις. Να σχεδιάσετε αλγόριθμο που:
!
!α. θα διαβάζει τα ονόματα των 20 πόλεων και τις αντίστοιχες
! θερμοκρασίες για κάθε μία από τις ημέρες του μήνα και
! θα καταχωρεί τα στοιχεία σε πίνακες.
!β. θα διαβάζει το όνομα μίας πόλης και θα εμφανίζει τη μέγιστη
! θερμοκρασία της στη διάρκεια του μήνα.
! Αν δεν υπάρχει η πόλη στον πίνακα, θα εμφανίζει κατάλληλα
! διαμορφωμένο μήνυμα.
!γ. θα εμφανίζει το πλήθος των ημερών που η μέση θερμοκρασία
! των 20 πόλεων ξεπέρασε τους 20οC, αλλά όχι τους 30οC.
ΜΕΤΑΒΛΗΤΕΣ
ΧΑΡΑΚΤΗΡΕΣ: πολη[20], όνομα
ΠΡΑΓΜΑΤΙΚΕΣ: θ[20, 31], max, sum, μέση_θερμοκρασία
ΑΚΕΡΑΙΕΣ: i, j, pos, count
ΛΟΓΙΚΕΣ: βρέθηκε
ΑΡΧΗ
!α
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 20
ΓΡΑΨΕ 'Δώσε όνομα ', i, ' πόλης : '
ΔΙΑΒΑΣΕ πολη[i]
ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ 31
ΓΡΑΨΕ 'Δώσε θερμοκρασία ', j, ' ημέρας : '
ΔΙΑΒΑΣΕ θ[i, j]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
!β
ΔΙΑΒΑΣΕ όνομα
βρέθηκε <- ΨΕΥΔΗΣ
i <- 1
ΟΣΟ (i <= 20) ΚΑΙ (ΟΧΙ βρέθηκε) ΕΠΑΝΑΛΑΒΕ
ΑΝ όνομα = πολη[i] ΤΟΤΕ
βρέθηκε <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
i <- i + 1
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΝ βρέθηκε = ΨΕΥΔΗΣ ΤΟΤΕ
ΓΡΑΨΕ 'Δεν βρέθηκε πόλη με όνομα', όνομα
ΑΛΛΙΩΣ
max <- θ[i, 1]
pos <- 1
ΓΙΑ j ΑΠΟ 2 ΜΕΧΡΙ 30
ΑΝ θ[i, j] > max ΤΟΤΕ
max <- θ[i, j]
pos <- j
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Μέγιστη θερμοκρασία την ', pos, ' ημέρα :', θ[i, pos]
ΤΕΛΟΣ_ΑΝ
!γ. θα εμφανίζει το πλήθος των ημερών που η μέση θερμοκρασία
! των 20 πόλεων ξεπέρασε τους 20οC, αλλά όχι τους 30οC.
count <- 0
ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ 31
sum <- 0
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 20
sum <- sum + θ[i, j]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
μέση_θερμοκρασία <- sum/ 20
ΑΝ μέση_θερμοκρασία > 20 ΚΑΙ μέση_θερμοκρασία <= 30 ΤΟΤΕ
count <- count + 1
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ count, ' ημέρες είχαν μέση θερμοκρασία από 20 μέχρι 30 βαθμούς'
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
|
|
|
|
