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
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

 

© 2016 - 2ο Γενικό Λύκειο Γέρακα - Βασίλειος Αναστόπουλος