2ο ΓΕΛ Γέρακα - ΠΛΗΡΟΦΟΡΙΚΗ - ΛΥΣΕΙΣ ΤΡΑΠΕΖΑΣ ΘΕΜΑΤΩΝ 28928

e-ΜΑΘΗΜΑΤΑ
ΠΛΗΡΟΦΟΡΙΚΗ
Λύσεις ασκήσεων Τράπεζας Θεμάτων
28928

ΠΡΟΓΡΑΜΜΑ Κέντρο_Εκπαίδευσης_ΤΘ_28928

!ΘΕΜΑ 4

!Ένα Κέντρο Εκπαίδευσης Ενηλίκων διοργάνωσε πρόγραμμα επιμόρφωσης που παρακολούθησαν

!150 άτομα. Για κάθε καταρτιζόμενο, το Κέντρο αποθηκεύει πληροφορίες σχετικά με

!το όνομα, την ηλικία, το φύλο και το ατομικό τους εισόδημα, οι οποίες χρησιμοποιούνται

!για στατιστική επεξεργασία. Να γραφτεί πρόγραμμα σε ΓΛΩΣΣΑ το οποίο:

!4.1  Να περιλαμβάνει το τμήμα δηλώσεων.

!   Μονάδες 2

!4.2  Να διαβάζει για κάθε καταρτιζόμενο:

! - το ονοματεπώνυμο

! -  το έτος γέννησης, που πρέπει να είναι μικρότερο ή ίσο του 2004

!   (απαιτείται έλεγχος εγκυρότητας)

! - το φύλο, με αποδεκτές τιμές 'Α' και 'Γ' (απαιτείται έλεγχος εγκυρότητας)

!  - το ατομικό εισόδημα

! Τα στοιχεία καταχωρίζονται αντίστοιχα σε μονοδιάστατους πίνακες

!Μονάδες 9

!4.3  Να ταξινομεί και να εμφανίζει κατά φθίνουσα σειρά ηλικίας τους καταρτιζόμενους.

!Μονάδες 7

!4.4 Να υπολογίζει και να τυπώνει το μέσο όρο του εισοδήματος των ανδρών και των γυναικών.

!Μονάδες 7



ΣΤΑΘΕΡΕΣ

  Ν = 150

  ΤΡΕΧΟΝ_ΕΤΟΣ = 2025



ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: i, j, ετος_γεννησης[Ν], πλ_ανδρών, πλ_γυναικών, temp

  ΠΡΑΓΜΑΤΙΚΕΣ: εισοδημα[Ν], αθρ_εισ_αντρων, αθρ_εισ_γυναικων, μεσος_αντρων, μεσος_γυναικων, tempP

  ΧΑΡΑΚΤΗΡΕΣ: ονομα[Ν], φυλο[Ν], tempO

ΑΡΧΗ



! Αρχικοποίηση μεταβλητών

  αθρ_εισ_αντρων <- 0

  αθρ_εισ_γυναικων <- 0

  πλ_ανδρών <- 0

  πλ_γυναικών <- 0



  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν

! Ανάγνωση ονόματος

    ΓΡΑΨΕ "Δώσε το ονοματεπώνυμο του καταρτιζόμενου ", i

    ΔΙΑΒΑΣΕ ονομα[i] 



! Ανάγνωση και έλεγχος εγκυρότητας έτους γέννησης

    ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ

      ΓΡΑΨΕ "Δώσε το έτος γέννησης (<= 2004):"

      ΔΙΑΒΑΣΕ ετος_γεννησης[i] 

    ΜΕΧΡΙΣ_ΟΤΟΥ ετος_γεννησης[i] <= 2004





! Ανάγνωση και έλεγχος εγκυρότητας φύλου

    ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ

      ΓΡΑΨΕ "Δώσε το φύλο (Α για άντρα, Γ για γυναίκα):"

      ΔΙΑΒΑΣΕ φυλο[i] 

    ΜΕΧΡΙΣ_ΟΤΟΥ φυλο[i] = "Α" Η φυλο[i] = "Γ"



! Ανάγνωση εισοδήματος

    ΓΡΑΨΕ "Δώσε το ατομικό εισόδημα:"

    ΔΙΑΒΑΣΕ εισοδημα[i] 



! Υπολογισμός εισοδήματος ανά φύλο

    ΑΝ φυλο[i] = "Α" ΤΟΤΕ

      αθρ_εισ_αντρων <- αθρ_εισ_αντρων + εισοδημα[i] 

      πλ_ανδρών <- πλ_ανδρών + 1

    ΑΛΛΙΩΣ

      αθρ_εισ_γυναικων <- αθρ_εισ_γυναικων + εισοδημα[i] 

      πλ_γυναικών <- πλ_γυναικών + 1

    ΤΕΛΟΣ_ΑΝ

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ



! 4.3 Ταξινόμηση κατά φθίνουσα σειρά ηλικίας , άρα αύξουσα σε έτος γέννησης

  ΓΙΑ i ΑΠΟ 2 ΜΕΧΡΙ Ν

    ΓΙΑ j ΑΠΟ Ν ΜΕΧΡΙ i ΜΕ ΒΗΜΑ -1

      ΑΝ ετος_γεννησης[j - 1] > ετος_γεννησης[j] ΤΟΤΕ

! Ανταλλαγή ηλικίας

        temp <- ετος_γεννησης[j - 1] 

        ετος_γεννησης[j - 1] <- ετος_γεννησης[j] 

        ετος_γεννησης[j] <- temp



! Ανταλλαγή ονόματος

        tempO <- ονομα[j - 1] 

        ονομα[j - 1] <- ονομα[j] 

        ονομα[j] <- tempO



! Ανταλλαγή φύλου

        tempO <- φυλο[j - 1] 

        φυλο[j - 1] <- φυλο[j] 

        φυλο[j] <- tempO



! Ανταλλαγή εισοδήματος

        tempP <- εισοδημα[j - 1] 

        εισοδημα[j - 1] <- εισοδημα[j] 

        εισοδημα[j] <- tempP

      ΤΕΛΟΣ_ΑΝ

    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ



! Εμφάνιση ταξινομημένων καταρτιζόμενων

  ΓΡΑΨΕ "Καταρτιζόμενοι κατά φθίνουσα σειρά ηλικίας:"

  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν

    ΓΡΑΨΕ "Ονοματεπώνυμο: ", ονομα[i], " Ηλικία: ", ΤΡΕΧΟΝ_ΕΤΟΣ - ετος_γεννησης[i] 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ



! 4.4 Υπολογισμός και εμφάνιση μέσου εισοδήματος

  ΑΝ πλ_ανδρών > 0 ΤΟΤΕ

    μεσος_αντρων <- αθρ_εισ_αντρων/ πλ_ανδρών

  ΑΛΛΙΩΣ

    μεσος_αντρων <- 0

  ΤΕΛΟΣ_ΑΝ



  ΑΝ πλ_γυναικών > 0 ΤΟΤΕ

    μεσος_γυναικων <- αθρ_εισ_γυναικων/ πλ_γυναικών

  ΑΛΛΙΩΣ

    μεσος_γυναικων <- 0

  ΤΕΛΟΣ_ΑΝ



  ΓΡΑΨΕ "Μέσο εισόδημα ανδρών: ", μεσος_αντρων

  ΓΡΑΨΕ "Μέσο εισόδημα γυναικών: ", μεσος_γυναικων



ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ