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