e-ΜΑΘΗΜΑΤΑ |
Λύσεις ασκήσεων από τον Οδηγό Μελέτης Μαθητών |
ΠΡΟΓΡΑΜΜΑ ΚΛΗΣΗ_ΥΠΟΠΡΟΓΡΑΜΜΑΤΟΣ
! ΑΕΠΠ - Οδηγός Μελέτης Μαθητή
! Μη λυμένες ασκήσεις 5.4.4.2
!
! 2. Να γραφεί διαδικασία η οποία να διαβάζει ακέραιους αριθμούς
! και να επιστρέφει το πλήθος των θετικών, το πλήθος των αρνητικών
! και το πλήθος των μηδέν. Το πλήθος των ακέραιων που θα διαβαστούν
! θα ορίζεται σαν παράμετρος της διαδικασίας.
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: πλήθος, θετικοί, αρνητικοί, μηδενικά
ΑΡΧΗ
! το κύριο πρόγραμμα δεν το ζητάει η εκφώνηση, αλλά χρειάζεται
! για την κλήση της διαδικασίας.
ΓΡΑΨΕ 'Δώστε πλήθος αριθμών : '
ΔΙΑΒΑΣΕ πλήθος
ΚΑΛΕΣΕ διάβασμα_αριθμών (πλήθος, θετικοί, αρνητικοί, μηδενικά)
ΓΡΑΨΕ 'θετικοί :', θετικοί, ' αρνητικοί: ', αρνητικοί, ' μηδενικά:', μηδενικά
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΔΙΑΔΙΚΑΣΙΑ διάβασμα_αριθμών (πλήθος, θετικοί, αρνητικοί, μηδενικά)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: πλήθος, θετικοί, αρνητικοί, μηδενικά, i, x
ΑΡΧΗ
θετικοί <- 0
αρνητικοί <- 0
μηδενικά <- 0
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ πλήθος
ΓΡΑΨΕ 'Δώστε αριθμό : '
ΔΙΑΒΑΣΕ x
ΑΝ x > 0 ΤΟΤΕ
θετικοί <- θετικοί + 1
ΑΛΛΙΩΣ_ΑΝ x < 0 ΤΟΤΕ
αρνητικοί <- αρνητικοί + 1
ΑΛΛΙΩΣ
μηδενικά <- μηδενικά + 1
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
|