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

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

ΠΡΟΓΡΑΜΜΑ Mystery_ΤΘ_25945

!ΘΕΜΑ 4

!Η εταιρεία Ultimate Mystery προσφέρει 10 διαφορετικά σενάρια μυστηρίου προς λύση

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

! («εσωτερικά» σενάρια) είτε σε εξωτερικούς χώρους («εξωτερικά» σενάρια).

!Οι παίκτες προσπαθούν να λύσουν το κάθε μυστήριο ως ομάδα. Κάθε σενάριο μπορεί

!να κλειστεί μόνο μία φορά κάθε απόγευμα. Η χρέωση, ανά άτομο, για τη συμμετοχή

!στη λύση ενός σεναρίου μυστηρίου γίνεται σύμφωνα με τον παρακάτω πίνακα:

!

!Πλήθος ατόμων ομάδας   Χρέωση για «Εσωτερικά» Σενάρια   Χρέωση για «Εξωτερικά» Σενάρια

!                         (σε ευρώ ανά άτομο)                 (σε ευρώ ανά άτομο)

!       1-8                      30                                 40

!  Πάνω από 8 άτομα              20                                 30

!Η χρέωση αυτή δεν είναι κλιμακωτή.

!Να γράψετε πρόγραμμα σε ΓΛΩΣΣΑ που:

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

!Για κάθε ένα από τα 10 σενάρια μυστηρίου που προσφέρει η εταιρεία

!να διαβάζει τον κωδικό αριθμό (ΚΩΔ) του σεναρίου μυστηρίου (1-10)

!και εάν για το συγκεκριμένο απόγευμα το σενάριο είναι κλεισμένο ή διαθέσιμο (ΚΑΤΑΣΤ),

!με επιτρεπτές απαντήσεις 'ΚΛ' και 'ΔΙΑΘ', αντίστοιχα.

!Εάν το σενάριο είναι κλεισμένο, θα διαβάζει το πλήθος των ατόμων της ομάδας

!που το έκλεισε (ΠΛ) και εάν θα παιχθεί στις εγκαταστάσεις της εταιρείας ή σε εξωτερικό χώρο

!(ΤΟΠΟΣ), με επιτρεπτές απαντήσεις 'ΕΣ' ή 'ΕΞ', αντίστοιχα.

!Να θεωρήσετε ότι όλα τα δεδομένα που εισάγονται είναι σωστά και δεν απαιτείται

!έλεγχος της εγκυρότητάς τους.

!Μονάδες 5

!4.2. Στη συνέχεια, εφόσον το σενάριο είναι κλεισμένο, να υπολογίζει και να εμφανίζει

!τα χρήματα (ΧΡ) που θα πληρώσει συνολικά η ομάδα που το έκλεισε, με βάση τον

!παραπάνω πίνακα. Οι ομάδες που θα παίξουν σε εξωτερικό χώρο και απαρτίζονται

!από περισσότερα από 8 άτομα, δικαιούνται δωρεάν αναψυκτικά. Αν η συγκεκριμένη

!ομάδα δικαιούται δωρεάν αναψυκτικά, το πρόγραμμα θα πρέπει να εμφανίζει κατάλληλο μήνυμα.

!Μονάδες 12

!4.3  Να εμφανίζει τον κωδικό αριθμό του σεναρίου που θα αποφέρει στην εταιρεία

!τα περισσότερα χρήματα το απόγευμα αυτό καθώς και πόσα από τα κλεισμένα σενάρια

!θα παιχθούν σε εσωτερικό χώρο.

!Μονάδες 8





ΜΕΤΑΒΛΗΤΕΣ

  ΧΑΡΑΚΤΗΡΕΣ: ΚΑΤΑΣΤ, ΤΟΠΟΣ

  ΑΚΕΡΑΙΕΣ: ΚΩΔ, ΠΛ, έσοδα_σεναρίου, εσωτερικά_σενάρια, i, σενάριο_max

  ΠΡΑΓΜΑΤΙΚΕΣ: ΧΡ, max_έσοδα

ΑΡΧΗ

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

  max_έσοδα <- -1

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



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

! Εισαγωγή δεδομένων

    ΓΡΑΨΕ 'Δώσε τον κωδικό αριθμό του σεναρίου (1-10):'

    ΔΙΑΒΑΣΕ ΚΩΔ

    ΓΡΑΨΕ 'Δώσε την κατάσταση του σεναρίου (ΚΛ για κλεισμένο, ΔΙΑΘ για διαθέσιμο):'

    ΔΙΑΒΑΣΕ ΚΑΤΑΣΤ



    ΑΝ ΚΑΤΑΣΤ = 'ΚΛ' ΤΟΤΕ

      ΓΡΑΨΕ 'Δώσε το πλήθος των ατόμων της ομάδας που το έκλεισε:'

      ΔΙΑΒΑΣΕ ΠΛ

      ΓΡΑΨΕ 'Δώσε τον τόπο διεξαγωγής (ΕΣ για εσωτερικό, ΕΞ για εξωτερικό):'

      ΔΙΑΒΑΣΕ ΤΟΠΟΣ



! Υπολογισμός χρέωσης

      ΑΝ ΤΟΠΟΣ = 'ΕΣ' ΤΟΤΕ

        ΑΝ ΠΛ <= 8 ΤΟΤΕ

          ΧΡ <- ΠΛ* 30

        ΑΛΛΙΩΣ

          ΧΡ <- ΠΛ* 20

        ΤΕΛΟΣ_ΑΝ

        εσωτερικά_σενάρια <- εσωτερικά_σενάρια + 1

      ΑΛΛΙΩΣ

        ΑΝ ΠΛ <= 8 ΤΟΤΕ

          ΧΡ <- ΠΛ* 40

        ΑΛΛΙΩΣ

          ΧΡ <- ΠΛ* 30

          ΓΡΑΨΕ 'Η ομάδα δικαιούται δωρεάν αναψυκτικά.'

        ΤΕΛΟΣ_ΑΝ

      ΤΕΛΟΣ_ΑΝ



      ΓΡΑΨΕ 'Το συνολικό κόστος για το σενάριο ', ΚΩΔ, ' είναι ', ΧΡ, ' ευρώ.'



! Ενημέρωση μέγιστων εσόδων

      ΑΝ ΧΡ > max_έσοδα ΤΟΤΕ

        max_έσοδα <- ΧΡ

        σενάριο_max <- ΚΩΔ

      ΤΕΛΟΣ_ΑΝ

    ΤΕΛΟΣ_ΑΝ

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



! Εμφάνιση αποτελεσμάτων

  ΓΡΑΨΕ 'Το σενάριο με τα περισσότερα έσοδα είναι το ', σενάριο_max, ' με έσοδα ', max_έσοδα, ' ευρώ.'

  ΓΡΑΨΕ 'Το πλήθος των κλεισμένων σεναρίων που θα παιχθούν σε εσωτερικό χώρο είναι ', εσωτερικά_σενάρια, '.'

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