ΠΡΟΓΡΑΜΜΑ προσπάθειες_αθλητών
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: αθλ
ΠΡΑΓΜΑΤΙΚΕΣ: αρ_προσπ, προσπ, μαξ, μιν, συν_προσπ_μεγ1
ΧΑΡΑΚΤΗΡΕΣ: απ
ΑΡΧΗ
αθλ <- 0
ΓΡΑΨΕ ' υπάρχει αθλητής για να διαγωνιστεί; (ναι-οχι)'
ΔΙΑΒΑΣΕ απ
ΟΣΟ απ <> 'ναι' ΚΑΙ απ <> 'όχι' ΕΠΑΝΑΛΑΒΕ
ΔΙΑΒΑΣΕ απ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΟΣΟ απ <> 'όχι' ΕΠΑΝΑΛΑΒΕ
αρ_προσπ <- 1
αθλ <- αθλ + 1
συν_προσπ_μεγ1 <- 0
ΓΡΑΨΕ 'δώσε μου την προσπάθεια του αθλητή '
ΔΙΑΒΑΣΕ προσπ
ΑΝ προσπ <= 1 ΤΟΤΕ
ΓΡΑΨΕ ' βγάινεις εκτός, '
ΤΕΛΟΣ_ΑΝ
μαξ <- προσπ
μιν <- προσπ
ΟΣΟ αρ_προσπ < 6 ΚΑΙ προσπ > 1 ΕΠΑΝΑΛΑΒΕ
ΓΡΑΨΕ ' δώσε μου την επόμενη προσπάθεια του αθλητή '
ΔΙΑΒΑΣΕ προσπ
ΑΝ προσπ <= 1 ΤΟΤΕ
ΓΡΑΨΕ ' βγάινεις εκτός, '
ΤΕΛΟΣ_ΑΝ
αρ_προσπ <- αρ_προσπ + 1
συν_προσπ_μεγ1 <- συν_προσπ_μεγ1 + 1
ΑΝ προσπ > μαξ ΤΟΤΕ
μαξ <- προσπ
ΤΕΛΟΣ_ΑΝ
ΑΝ προσπ < μιν ΤΟΤΕ
μιν <- προσπ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ ' αριθμός προσπαθειών: ', αρ_προσπ
ΓΡΑΨΕ ' συνολικές προσπάθειες μεγαλύτερες του 1: ', συν_προσπ_μεγ1
ΓΡΑΨΕ ' μεγιστη προσπάθεια: ', μαξ
ΓΡΑΨΕ ' ελάχιστη προσπάθεια: ', μιν
ΓΡΑΨΕ ' υπάρχει άλλος αθλητής; ( ναι-όχι) '
ΔΙΑΒΑΣΕ απ
ΟΣΟ απ <> 'ναι' ΚΑΙ απ <> 'όχι' ΕΠΑΝΑΛΑΒΕ
ΓΡΑΨΕ 'δεκτές απαντήσεις μόνο ναι-όχι '
ΔΙΑΒΑΣΕ απ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ ' αριθμός αθλητών που διαγωνίστηκαν: ', αθλ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ