Αλγόριθμος ασκ ΠΕ ← 0 Για i από 1 μέχρι 1000 Διάβασε ΟΝ,Βαθ Αν Βαθ > 90 τότε Εμφάνισε ' ΕΠΙΛΕΧΘΗΚΕ ',ΟΝ ΠΕ ← ΠΕ + 1 Τέλος_αν Τέλος_επανάληψης ΠΑ ← 1000 - ΠΕ ! εναλλακτικά μπορούμε να χρησιμοποιήσουμε 2ο μετρητή στην επανάληψη Εμφάνισε 'πλήθος επιλεχθέντων ',ΠΕ,' απέτυχαν: ', ΠΑ Τέλος ασκ
Αλγόριθμος ΘΔ ! ενδεικτική λύση από http://introcsprinciples.wordpress.com/ Για i από 1 μέχρι 10 ! λύση για 10 επαναλήψεις Διάβασε ΟΝ[i], B[i] Τέλος_επανάληψης Π <- 0 Για i από 1 μέχρι 10 Αν B[i] > 60 τότε Π <- Π + 1 Τέλος_αν Τέλος_επανάληψης Εμφάνισε Π Σ <- 0 Για i από 1 μέχρι 10 Σ <- Σ + B[i] Τέλος_επανάληψης MO <- Σ / 100 Εμφάνισε MO Τέλος ΘΔ