ΕΚΦΩΝΗΣΗ

Η CityTel Telephony χρεώνει κλιμακωτά τους πελάτες της για τις υπηρεσίες σταθερής τηλεφωνίας σύμφωνα με τον πίνακα:
Μονάδες         Χρέωση (€ ανά μονάδα)
0 – 120          0.10
121 – 260      0.08
261 – 400      0.06
401 και άνω   0.03
Το πάγιο τέλος χρήσης των υπηρεσιών είναι 10€ μηνιαίως, ενώ το συνολικό ποσό υπόκειται σε φόρο 2% για τέλη τηλεπικοινωνιών και 19% ΦΠΑ. Να αναπτυχθεί πρόγραμμα που θα διαβάζει το όνομα ενός συνδρομητή, τις τηλεφωνικές μονάδες που κατανάλωσε και να εκτυπώνει το ποσό του λογαριασμού

ΛΥΣΗ

ΠΡΟΓΡΑΜΜΑ CityTel_σταθερή
ΣΤΑΘΕΡΕΣ
πάγιο = 10
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: μονάδες
ΠΡΑΓΜΑΤΙΚΕΣ: χρέωση, φόρος, ΦΠΑ
ΧΑΡΑΚΤΗΡΕΣ: όνομα
ΑΡΧΗ
ΔΙΑΒΑΣΕ όνομα, μονάδες
ΑΝ μονάδες <= 120 ΤΟΤΕ
χρέωση <- πάγιο + 0.10 * μονάδες
ΑΛΛΙΩΣ_ΑΝ μονάδες <= 260 ΤΟΤΕ
χρέωση <- πάγιο + 0.10 * 120 + 0.08 * (μονάδες – 120)
ΑΛΛΙΩΣ_ΑΝ μονάδες <= 400 ΤΟΤΕ
χρέωση <- πάγιο + 0.10 * 120 + 0.08 * 140 + 0.06 * (μονάδες – 260)
ΑΛΛΙΩΣ ! μονάδες > 400
χρέωση <- πάγιο + 0.10 * 120 + 0.08 * 140 + 0.06 * 140 + 0.03 * (μονάδες – 400)
ΤΕΛΟΣ_ΑΝ
φόρος <- χρέωση * 0.02
ΦΠΑ <- χρέωση * 0.19
χρέωση <- χρέωση + φόρος + ΦΠΑ
ΓΡΑΨΕ 'Ο πελάτης ', όνομα, ' οφείλει ', χρέωση
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ CityTel_σταθερή