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

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

ΠΡΟΓΡΑΜΜΑ Κομμωτήριο_ΤΘ25917

!ΘΕΜΑ 4

!Ένα κομμωτήριο προσφέρει τις εξής υπηρεσίες (με κωδικούς αριθμούς 1-4, αντίστοιχα):

!Κούρεμα, Χτένισμα, Βαφή και Θεραπεία Μαλλιών.

!Οι υπηρεσίες αυτές προσφέρονται στους πελάτες κατόπιν ραντεβού.

!Το κομμωτήριο καταγράφει ηλεκτρονικά τα ακόλουθα στοιχεία για τα ραντεβού της

!περασμένης εβδομάδας, τα οποία αποθηκεύονται σε μονοδιάστατους πίνακες:

!τα ονοματεπώνυμα των πελατών  σε πίνακα ΟΝ,

!οι αντίστοιχοι κωδικοί παρεχόμενων υπηρεσιών (1-4) σε πίνακα ΥΠ και

!οι χρεώσεις σε ευρώ των πελατών σε πίνακα ΧΡ.

!Το μέγιστο συνολικό πλήθος ραντεβού του κομμωτηρίου ανά εβδομάδα είναι 150.

!Να αναπτύξετε πρόγραμμα σε ΓΛΩΣΣΑ, το οποίο:

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

!Να διαβάζει τα στοιχεία για κάθε ραντεβού της περασμένης εβδομάδας

!και να τα αποθηκεύει στους πίνακες ΟΝ, ΥΠ και ΧΡ που αναφέρθηκαν παραπάνω.

!Η εισαγωγή των στοιχείων τερματίζεται όταν δοθεί σαν ονοματεπώνυμο πελάτη η λέξη ΤΕΛΟΣ

!ή όταν συμπληρωθεί ο μέγιστος αριθμός ραντεβού (150).

!Κατά την εισαγωγή του κωδικού της υπηρεσίας πρέπει να ελέγχεται ότι είναι

!μέσα στα επιτρεπτά όρια (1-4). Στην περίπτωση που εισάγεται άκυρη τιμή,

!το πρόγραμμα πρέπει να ζητάει νέα τιμή μέχρι να δοθεί τιμή εντός ορίων.

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

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

!Μονάδες 10

!4.2. Στη συνέχεια το πρόγραμμα να ζητάει από το χρήστη το ονοματεπώνυμο

!ενός πελάτη και να εμφανίζει μια λίστα με τα καταγεγραμμένα ραντεβού

!του πελάτη αυτού, ως εξής:

!Κωδικός υπηρεσίας, Χρέωση.

!Στην περίπτωση που ο πελάτης δεν έχει κλείσει κανένα ραντεβού κατά την

!περασμένη εβδομάδα, να εμφανίζει το μήνυμα «ΔΕ ΒΡΕΘΗΚΕ ΡΑΝΤΕΒΟΥ».

!Μονάδες 8

!4.3. Να εμφανίζει, τέλος, το ποσοστό  (%) των εσόδων από τις Θεραπείες

!Μαλλιών σε σχέση με τα συνολικά έσοδα της εβδομάδας.

!Μονάδες 7



ΣΤΑΘΕΡΕΣ

  Ν = 150

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: ΥΠ[Ν], ΧΡ[Ν], πλήθος, i, συνολικέςΧρεώσεις, χρεώσειςΘεραπειών

  ΧΑΡΑΚΤΗΡΕΣ: ΟΝ[Ν], όνομα

  ΛΟΓΙΚΕΣ: βρεθηκε

  ΠΡΑΓΜΑΤΙΚΕΣ: ποσοστόΘεραπειών

ΑΡΧΗ

! Αρχικοποίηση

  πλήθος <- 0

  συνολικέςΧρεώσεις <- 0

  χρεώσειςΘεραπειών <- 0



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

  ΓΡΑΨΕ 'Δώστε τα στοιχεία των ραντεβού (ΟΝΟΜΑΤΕΠΩΝΥΜΟ, ΥΠΗΡΕΣΙΑ, ΧΡΕΩΣΗ).'

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

    ΓΡΑΨΕ 'Δώστε ονοματεπώνυμο (ή ΤΕΛΟΣ για τερματισμό): '

    ΔΙΑΒΑΣΕ όνομα

    ΑΝ όνομα <> 'ΤΕΛΟΣ' ΤΟΤΕ

      πλήθος <- πλήθος + 1

      ΟΝ[πλήθος] <- όνομα



!     Έλεγχος εγκυρότητας υπηρεσίας

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

        ΓΡΑΨΕ 'Δώστε τον κωδικό υπηρεσίας (1-4): '

        ΔΙΑΒΑΣΕ ΥΠ[πλήθος] 

      ΜΕΧΡΙΣ_ΟΤΟΥ ΥΠ[πλήθος] >= 1 ΚΑΙ ΥΠ[πλήθος] <= 4



!     Εισαγωγή χρέωσης

      ΓΡΑΨΕ 'Δώστε τη χρέωση: '

      ΔΙΑΒΑΣΕ ΧΡ[πλήθος] 

    ΤΕΛΟΣ_ΑΝ

  ΜΕΧΡΙΣ_ΟΤΟΥ (όνομα = 'ΤΕΛΟΣ') Η (πλήθος = Ν) 





! Αναζήτηση ραντεβού πελάτη

  ΓΡΑΨΕ 'Δώστε ονοματεπώνυμο πελάτη για αναζήτηση:'

  ΔΙΑΒΑΣΕ όνομα

  βρεθηκε <- ΨΕΥΔΗΣ

  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ πλήθος

    ΑΝ ΟΝ[i] = όνομα ΤΟΤΕ

      ΓΡΑΨΕ 'Κωδικός υπηρεσίας:', ΥΠ[i], ', Χρέωση:', ΧΡ[i] 

      βρεθηκε <- ΑΛΗΘΗΣ

    ΤΕΛΟΣ_ΑΝ

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

  ΑΝ βρεθηκε = ΨΕΥΔΗΣ ΤΟΤΕ

    ΓΡΑΨΕ 'ΔΕ ΒΡΕΘΗΚΕ ΡΑΝΤΕΒΟΥ'

  ΤΕΛΟΣ_ΑΝ



! Υπολογισμός ποσοστού εσόδων από Θεραπείες Μαλλιών

  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ πλήθος

    συνολικέςΧρεώσεις <- συνολικέςΧρεώσεις + ΧΡ[i] 

    ΑΝ ΥΠ[i] = 4 ΤΟΤΕ

      χρεώσειςΘεραπειών <- χρεώσειςΘεραπειών + ΧΡ[i] 

    ΤΕΛΟΣ_ΑΝ

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



  ΑΝ συνολικέςΧρεώσεις > 0 ΤΟΤΕ

    ποσοστόΘεραπειών <- (χρεώσειςΘεραπειών/ συνολικέςΧρεώσεις)* 100

    ΓΡΑΨΕ 'Το ποσοστό εσόδων από Θεραπείες Μαλλιών είναι:', ποσοστόΘεραπειών, '%'

  ΑΛΛΙΩΣ

    ΓΡΑΨΕ 'Δεν υπήρξαν έσοδα την προηγούμενη εβδομάδα.'

  ΤΕΛΟΣ_ΑΝ

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