Πίνακες Τιμών (14.12 και 14.5)

 

Άσκηση 13.12

 Αλγόριθμος cityTel_13_12

Εμφάνισε "Δώσε τον χρόνο σε δευτερόλεπτα"
Διάβασε χρονος
μισόλεπτα ← χρονος div 30
Αν χρονος mod 30 ≠ 0 τότε   !182 δευτερ. = 6 misolepta  + 2 δευτερ.
  μισόλεπτα ← μισόλεπτα + 1 !σε τέτοιες περιπτώσεις,χρεώνω συν 1 μισόλεπτο
Τέλος_αν
Αν χρονος ≤ 180 τότε
  χρεωση ← μισόλεπτα* 0.09 ! μία τιμή για όλα τα μισόλεπτα
αλλιώς
  χρεωση ← 6* 0.09 + (μισόλεπτα - 6)* 0.065 ! για χρόνο > 3 λεπτών, διαφορετική χρεωση
Τέλος_αν
χρέωση ← χρεωση + (19/100)*χρεωση ! υπολογισμός τελικής χρέωσης, με 19% ΦΠΑ
Εμφάνισε "Χρέωση: ", χρεωση
Τέλος cityTel

Άσκηση 13.9

 Αλγόριθμος ασκ_13_9

Εμφάνισε "Πληκτρολόγησε τα χιλιόμετρα."
Διάβασε απόσταση
Αν απόσταση > 500 τότε
  χρέωση ← 0.40*απόσταση
αλλιώς
  χρέωση ← 0.50*απόσταση
Τέλος_αν
χρέωση2 ← χρέωση + 0.3*απόσταση + 40!προσθέτω βενζίνη και ασφάλεια
τελ_χρέωση ← χρεωση2 + χρέωση2*19/100  ! πρασαύξηση ΦΠΑ
Εμφάνισε "Η χρέωση είναι", τελ_χρέωση

Τέλος ασκ_13_9

Άσκηση 13.10

Αλγόριθμος Ασκ_13_10
Εμφάνισε "Πληκτρολόγησε Όνομα και ημέρες"
Διάβασε Ονομα, ημέρες
μικτές ← ημέρες* 70
Αν μικτές > 1200 τότε
  καθαρές ← μικτές - μικτές*(11 + 8.5)/100
αλλιώς
  καθαρές ← μικτές - μικτές* 11/100
Τέλος_αν
Εμφάνισε "Οι καθαρές αποδοχές είναι: ", καθαρές
Τέλος Ασκ_13_10

Άσκηση 13.8

 Αλγόριθμος ασκ_13_8

Εμφάνισε "Πληκτρολόγησε απόσταση "
Διάβασε απόσταση

Αν απόσταση < 40 τότε
  χρεωση ← απόσταση* 0.18
αλλιώς
  χρεωση ← 5 + απόσταση* 0.14
Τέλος_αν

τελ_χρέωση ← χρεωση + 1.5 !η κλήση χρεώνεται ανεξαρτήτως απόστασης

Εμφάνισε "Η τελική χρέωση είναι ", τελ_χρέωση
Τέλος ασκ_13_8

Άσκηση 13.7

Αλγόριθμος ασκ_13_7
Εμφάνισε "Πληκτρολόγησε χρονική διάρκεια στάθμευσης"
Διάβασε χρ_διάρκεια

Αν χρ_διάρκεια > 4 τότε
  χρεωση ← χρ_διάρκεια* 8.5
αλλιώς
  χρεωση ← χρ_διάρκεια* 9.5
Τέλος_αν

Τελ_χρεωση ← χρεωση + (19/100)*χρεωση !υπολογισμος ΦΠΑ

Εμφάνισε "Η τελική χρέωση είναι ", Τελ_χρεωση

Τέλος ασκ_13_7 

Άσκηση 12.22

 Αλγόριθμος ασκ_12_22 (α' Τρόπος)

Εμφάνισε "Πληκτρολογήστε τις 3 θερμοκρασίες "
Διάβασε θ1, θ2, θ3
ΜΟ ← (θ1 + θ2 + θ3)/3
Αν ΜΟ < 12 ή θ1 < 10 ή θ2 < 10 ή θ3 < 10 τότε 
  Εμφάνισε "Ενεργοποιήστε Κλιματισμό"
αλλιώς
  Εμφάνισε "Μην Ενεργοποιήσετε Κλιματισμό"
Τέλος_αν
Τέλος ασκ_12_22

(β' Τρόπος, Πολυαναγνωστάκης Κ.)