ΑΣΚΗΣΗ 32-33 ΣΕΛΙΔΑ 53 ΒΙΒΛΙΟΥ
ΑΣΚΗΣΗ 32 ΣΕΛΙΔΑ 53
Να αναπτύξετε αλγόριθμο ο οποίος θα διαβάζει γράμματα μέχρι να βρει τρεις φορές το γράμμα Α. Όταν σταματήσει το διάβασμα γραμμάτων. Ο αλγόριθμος θα εκτυπώνει πόσα συνολικά γράμματα διαβάστηκαν
Αλγόριθμος Α
μετρητής ← 0
πόσα_γράμματα ← 0
Όσο μετρητής < 3 επανάλαβε
Εμφάνισε 'ΔΩΣΕ ΕΝΑ ΓΡΑΜΜΑ Η Α ΓΙΑ ΤΕΛΟΣ'
Διάβασε ΓΡΑΜΜΑ
Αν ΓΡΑΜΜΑ = "Α" τότε
μετρητής ← μετρητής + 1
Τέλος_αν
πόσα_γράμματα ← πόσα_γράμματα + 1
Τέλος_επανάληψης
Εμφάνισε πόσα_γράμματα
Τέλος
ΑΣΚΗΣΗ 33 ΣΕΛΙΔΑ 53
Να αναπτύξετε αλγόριθμο ο οποίος θα διαβάζει αριθμούς, μέχρι να διαβαστεί ο αριθμός μηδέν. Ο αλγόριθμος θα εκτυπώνει το άθροισμα και το πλήθος των αριθμών που δόθηκαν και ήταν μεγαλύτεροι του 50.
Αλγόριθμος ΑΡΙΘΜΟΙ
ΠΛΗΘΟΣ ← 0
ΑΘΡΟΙΣΜΑ ← 0
Εμφάνισε 'ΔΩΣΕ ΕΝΑΝ ΑΡΙΘΜΟ Η 0 ΓΙΑ ΤΕΛΟΣ'
Διάβασε ΑΡ
Όσο ΑΡ ≠ 0 επανάλαβε
Αν ΑΡ > 50 τότε
ΠΛΗΘΟΣ ← ΠΛΗΘΟΣ + 1
Σ ← Σ + ΑΡ
Τέλος_αν
Εμφάνισε 'ΔΩΣΕ ΕΝΑΝ ΑΡΙΘΜΟ Η 0 ΓΙΑ ΤΕΛΟΣ'
Διάβασε ΑΡ
Τέλος_επανάληψης
Εμφάνισε ΠΛΗΘΟΣ, ΑΘΡΟΙΣΜΑ
Τέλος