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

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

ΠΡΟΓΡΑΜΜΑ εκτοκισμός_ΤΘ_30206

!ΘΕΜΑ 4

!Μια τράπεζα στο τέλος του έτους φροντίζει να ενημερώνει τους λογαριασμούς

!των πελατών της και να προσθέτουν τους νόμιμους τόκους. Το ποσοστό με το οποίο

!τοκίζεται κάθε λογαριασμός εξαρτάται από το υπόλοιπο που υπάρχει τη δεδομένη χρονική στιγμή:

!

!α) Εάν το ποσό αυτό είναι μικρότερο ή ίσο με 500 ευρώ,

!   τότε ο πελάτης πληρώνει έξοδα διαχείρισης λογαριασμού 8 ευρώ

!β) Εάν το ποσό είναι μεγαλύτερο από 500 ευρώ και μικρότερο από 5.000 ευρώ,

!   τότε τοκίζεται με ποσοστό 0,5%

!γ) Εάν το ποσό είναι μεγαλύτερο από 5.000 ευρώ, τότε τοκίζεται με 1,25%

!

!Η ενημέρωση αυτή γίνεται για κάθε πελάτη της τράπεζας.

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



!4.1  Να διαβάζει τα ονοματεπώνυμα και τα υπόλοιπα των λογαριασμών 2000 πελατών

!της τράπεζας και να τα αποθηκεύει σε αντίστοιχους μονοδιάστατους πίνακες.

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

!Μονάδες 5

!4.2  Να υπολογίζει και να ενημερώνει τους λογαριασμούς με τους νόμιμους τόκους

!Μονάδες 6

!4.3  Να υπολογίζει και να τυπώνει το πλήθος των πελατών που ανήκουν σε κάθε μια

!από τις τρεις ανωτέρω κατηγορίες

!Μονάδες  5

!4.4 Να εμφανίζει μια λίστα των πελατών και των υπολοίπων των λογαριασμών

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

!Μονάδες  9





ΠΡΟΓΡΑΜΜΑ Τραπεζα

ΣΤΑΘΕΡΕΣ

    Ν = 2000



ΜΕΤΑΒΛΗΤΕΣ

  ΧΑΡΑΚΤΗΡΕΣ: ΟΝΟΜΑΤΕΠΩΝΥΜΟ[Ν]

  ΠΡΑΓΜΑΤΙΚΕΣ: ΥΠΟΛΟΙΠΟ[Ν]

  ΑΚΕΡΑΙΕΣ: i, μικρα, μεσαια, μεγαλα, j

  ΠΡΑΓΜΑΤΙΚΕΣ: temp

  ΧΑΡΑΚΤΗΡΕΣ: tempΟνομα

ΑΡΧΗ

  μικρα <- 0

  μεσαια <- 0

  μεγαλα <- 0



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

     ΓΡΑΨΕ 'Δώσε ονοματεπώνυμο πελάτη ', i, ': '

     ΔΙΑΒΑΣΕ ΟΝΟΜΑΤΕΠΩΝΥΜΟ[i]

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

        ΓΡΑΨΕ 'Δώσε υπόλοιπο λογαριασμού: '

        ΔΙΑΒΑΣΕ ΥΠΟΛΟΙΠΟ[i]

     ΜΕΧΡΙΣ_ΟΤΟΥ ΥΠΟΛΟΙΠΟ[i] >= 0



     ! Ενημέρωση λογαριασμού ανάλογα με την κατηγορία

     ΑΝ ΥΠΟΛΟΙΠΟ[i] <= 500 ΤΟΤΕ

        ΥΠΟΛΟΙΠΟ[i] <- ΥΠΟΛΟΙΠΟ[i] - 8

        μικρα <- μικρα + 1

     ΑΛΛΙΩΣ_ΑΝ ΥΠΟΛΟΙΠΟ[i] < 5000 ΤΟΤΕ

        ΥΠΟΛΟΙΠΟ[i] <- ΥΠΟΛΟΙΠΟ[i] * 1.005

        μεσαια <- μεσαια + 1

     ΑΛΛΙΩΣ

        ΥΠΟΛΟΙΠΟ[i] <- ΥΠΟΛΟΙΠΟ[i] * 1.0125

        μεγαλα <- μεγαλα + 1

     ΤΕΛΟΣ_ΑΝ

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



  ! Εκτύπωση στατιστικών

  ΓΡΑΨΕ 'Πελάτες με υπόλοιπο <= 500 ευρώ: ', μικρα

  ΓΡΑΨΕ 'Πελάτες με υπόλοιπο μεταξύ 500 και 5000 ευρώ: ', μεσαια

  ΓΡΑΨΕ 'Πελάτες με υπόλοιπο > 5000 ευρώ: ', μεγαλα



  ! Ταξινόμηση κατά φθίνουσα σειρά υπολοίπου 

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

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

        ΑΝ ΥΠΟΛΟΙΠΟ[j-1] < ΥΠΟΛΟΙΠΟ[j] ΤΟΤΕ

           temp <- ΥΠΟΛΟΙΠΟ[j]

           ΥΠΟΛΟΙΠΟ[j] <- ΥΠΟΛΟΙΠΟ[j-1]

           ΥΠΟΛΟΙΠΟ[j-1] <- temp



           tempΟνομα <- ΟΝΟΜΑΤΕΠΩΝΥΜΟ[j]

           ΟΝΟΜΑΤΕΠΩΝΥΜΟ[j] <- ΟΝΟΜΑΤΕΠΩΝΥΜΟ[j-1]

           ΟΝΟΜΑΤΕΠΩΝΥΜΟ[j-1] <- tempΟνομα

        ΤΕΛΟΣ_ΑΝ

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

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



  ! Εκτύπωση λίστας πελατών

  ΓΡΑΨΕ '--- Λίστα πελατών κατά φθίνουσα σειρά υπολοίπου ---'

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

     ΓΡΑΨΕ ΟΝΟΜΑΤΕΠΩΝΥΜΟ[i], '  ', ΥΠΟΛΟΙΠΟ[i]

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



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