Καταμέτρηση και Ποσοστό μιας ιδιότητας:
Να γραφεί αλγόριθμος ο οποίος θα διαβάζει 8 ακέραιους αριθμούς και θα εμφανίζει το πλήθος των θετικών μη μηδενικών και το ποσοστό τους επί του συνόλου.
Εργαστηριακή Άσκηση
Αντιγράψτε και επικολλήστε το πρόγραμμα στον συντάκτη του προγραμματιστικού περιβάλλοντος.
Στη συνέχεια επιλέξτε Εκτέλεση ή Βηματική Εκτέλεση.
ΠΡΟΓΡΑΜΜΑ Μέσος
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: k, i, x
ΠΡΑΓΜΑΤΙΚΕΣ: ποσ
ΑΡΧΗ
k <-- 0
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 8
ΓΡΑΨΕ 'Δώσε έναν αριθμό : '
ΔΙΑΒΑΣΕ x
ΑΝ x > 0 ΤΟΤΕ
k <-- k + 1
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ποσ <-- k*100/8
ΓΡΑΨΕ 'Πλήθος : ', k
ΓΡΑΨΕ 'Ποσοστό : ', ποσ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
