Αλγόριθμος πλ
Σ<-0
πλοία <-0
ΔΙΑΒΑΣΕ ΟΝΠ
ΟΣΟ ΟΝΠ <> 'ΤΕΛΟΣ' ΕΠΑΝΑΛΑΒΕ
	ΔΙΑΒΑΣΕ ΑΡΕΠ
	πλοία <- πλοία +1
	Σ<-Σ+ΑΡΕΠ
	ΔΙΑΒΑΣΕ ΟΝΠ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
Γράψε πλοία, ' πλοία αναχώρησαν'
Αν πλοία <> 0 Τότε
	ΜΟ<-Σ/πλοία
	Γράψε ΜΟ
Τέλος_αν
Τέλος πλ

Αλγόριθμος ΘΔ ! ενδεικτική λύση από 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
Τέλος ΘΔ