ΛΥΣΗ ΕΠΑΝΑΛΗΠΤΙΚΗΣ ΑΣΚΗΣΗΣ 16

ΠΡΟΓΡΑΜΜΑ 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_σταθερή