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