e-ΜΑΘΗΜΑΤΑ
Ανάπτυξη Εφαρμογών σε Προγραμματιστικό περιβάλλον

Λύσεις ασκήσεων από τον Οδηγό Μελέτης Μαθητών


ΠΡΟΓΡΑΜΜΑ κύρια_δευτερεύουσα_διαγώνιος_πίνακα
! ΑΕΠΠ - Οδηγός Μελέτης Μαθητή
! Μη λυμένες ασκήσεις 4.10.11
!
!11. Να γραφεί πρόγραμμα σε "ΓΛΩΣΣΑ", το οποίο να:
!    1) Γεμίζει έναν πίνακα 5x5 με ακέραιους αριθμούς, που δίνονται από το πληκτρολόγιο.
!    2) Υπολογίζει και να εμφανίζει:
!       i.Το μέγιστο στοιχείο της κύριας και της δευτερεύουσας διαγωνίου.
!       ii. Τον μέσο όρο των στοιχείων της κύριας και της δευτερεύουσας διαγωνίου.

ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: i, j, A[5, 5], max, sum

ΑΡΧΗ

! 1 Διάβασμα
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 5
    ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ 5
      ΔΙΑΒΑΣΕ A[i, j] 
    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ


! max κύριας διαγωνίου
  max <- A[1, 1] 
  ΓΙΑ i ΑΠΟ 2 ΜΕΧΡΙ 5
    ΑΝ A[i, i] > max ΤΟΤΕ
      max <- A[i, i] 
    ΤΕΛΟΣ_ΑΝ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΓΡΑΨΕ 'μέγιστο στοιχείο της κύριας διαγωνίου: ', max

! max δευτερεύουσας διαγωνίου
  max <- A[1, 5] 
  ΓΙΑ i ΑΠΟ 2 ΜΕΧΡΙ 5
    ΑΝ A[i, 5 - i + 1] > max ΤΟΤΕ
      max <- A[i, 5 - i + 1] 
    ΤΕΛΟΣ_ΑΝ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΓΡΑΨΕ 'μέγιστο στοιχείο της δευτερεύουσας διαγωνίου:', max


! άθροισμα κύριας διαγωνίου
  sum <- 0
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 5
    sum <- sum + A[i, i] 
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΓΡΑΨΕ 'Μέσος όρος της κύριας διαγωνίου: ', sum/5

! άθροισμα δευτερεύουσας διαγωνίου
  sum <- 0
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 5
    sum <- sum + A[i, 5 - i + 1] 
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΓΡΑΨΕ 'Μέσος όρος της δευτερεύουσας διαγωνίου: ', sum/5





ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

 

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