Άσκηση 21.16

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

χ ← 100                              !αρχική τιμή χ
πλ_αριθμών ← 0              ! αρχικοποίηση πλήθους
αθρ ← 0             ! αρχικοποίηση αθροίσματος αριθμών
Όσο χ ≤ 600 επανάλαβε
  Αν χ mod 3 = 0 και χ mod 5 ≠ 0 τότε  !"φιλτράρισμα αριθμών"
    αθρ ← αθρ + χ              ! υπολογισμός αθροίσματος
    Εμφάνισε χ
    πλ_αριθμών ← πλ_αριθμών + 1   ! υπολογισμός πλήθους
  Τέλος_αν
  χ ← χ + 1       ! επόμενο χ...
Τέλος_επανάληψης
Μ_Ο ← αθρ/ πλ_αριθμών        ! υπολογισμός μέσου όρου
Εμφάνισε "Ο μέσος όρος των δεκτών αριθμών είναι ", Μ_Ο, "."
Τέλος ασκ_21_16

Άσκηση 21.21

Αλγόριθμος ασκ_21_21
χρημα ← 6500 !αρχικό κεφάλαιο
ετη ← 0
Όσο χρημα ≤ 11000 επανάλαβε
  ετη ← ετη + 1
  χρημα ← χρημα + χρημα*(5.4/100) ! τόκος 5,4%
  Εμφάνισε "Έτος: ", ετη, " Χρήματα --> ", χρημα, " €"
Τέλος_επανάληψης
Εμφάνισε "Το ποσό θα ξεπεράσει τα 11000 ευρώ σε ", ετη, " έτη."
Τέλος ασκ_21_21