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

Αλγόριθμος Κατανάλωση_νερού

Αρχή_επανάληψης

Εμφάνισε 'Δώστε τη μηνιαία κατανάλωση νερού:'

Διάβασε ΜΚ

Μέχρις_ότου ΜΚ>=0

Αν ΜΚ<=5 τότε

Αξία<--0.1*ΜΚ

αλλιώς_αν ΜΚ<=10 τότε

Αξία<--0.1*5+0.4*(ΜΚ-5)

αλλιώς_αν ΜΚ<=20 τότε

Αξία<--0.1*5+0.4*5+0.7*(ΜΚ-10)

αλλιώς

Αξία<--0.1*5+0.4*5+0.7*10+1.0*(ΜΚ-20)

Τέλος_αν

ΦΠΑ<--(Αξία+2)*0.18

Τελικό_Ποσό<--Αξία+2+ΦΠΑ+5

Εκτύπωσε Τελικό_Ποσό

Τέλος Κατανάλωση_νερού