2ο ΓΕΛ Γέρακα - ΑΕΠΠ Οδηγός Μελέτης Μαθητών

e-ΜΑΘΗΜΑΤΑ
Ανάπτυξη Εφαρμογών σε Προγραμματιστικό περιβάλλον
Λύσεις ασκήσεων από τον Οδηγό Μελέτης Μαθητών

ΠΡΟΓΡΑΜΜΑ αναζήτηση_ονόματος

! ΑΕΠΠ - Οδηγός Μελέτης Μαθητή

! Μη λυμένες ασκήσεις 4.10.14

!

!14. Ένα εμπορικό κατάστημα εμπορεύεται 25 μάρκες και από κάθε μάρκα

!    10 διαφορετικά είδη. Σε ένα δισδιάστατο πίνακα 25x10, το κατάστημα

!    αποθηκεύει τις τιμές του κάθε είδους από την κάθε μάρκα.

!    Να γραφεί πρόγραμμα σε "ΓΛΩΣΣΑ", το οποίο :

!

!1) Να διαβάζει και να αποθηκεύει σ' ένα μονοδιάστατο πίνακα ΜΑΡΚΑ[10],

!   τα ονόματα των μαρκών.

!2) Να διαβάζει και να αποθηκεύει τα ονόματα των ειδών που εμπορεύεται

!   στον πίνακα ΕΙΔΗ[25].

!3) Να διαβάζει τη τιμή κάθε είδους ανά μάρκα και να τη καταχωρεί στον

!   πίνακα ΤΙΜΗ[25,10].

!4) Να δίνεται από το πληκτρολόγιο ένα είδος και η μάρκα του και να τυπώνεται

!   η αντίστοιχη τιμή του.



ΜΕΤΑΒΛΗΤΕΣ

  ΧΑΡΑΚΤΗΡΕΣ: ΜΑΡΚΑ[10], ΕΙΔΗ[25], Μ, ΕΙΔ

  ΠΡΑΓΜΑΤΙΚΕΣ: ΤΙΜΗ[25, 10] 

  ΑΚΕΡΑΙΕΣ: i, j

  ΛΟΓΙΚΕΣ: βρέθηκε

ΑΡΧΗ



! 1 Διάβασμα στα ονόματα από τις μάρκες

  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 10

    ΓΡΑΨΕ 'Δώστε όνομα μάρκας ', i

    ΔΙΑΒΑΣΕ ΜΑΡΚΑ[i] 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ



! 2 Διάβασμα στα ονόματα από τα είδη

  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 25

    ΓΡΑΨΕ 'Δώστε όνομα είδους ', i

    ΔΙΑΒΑΣΕ ΕΙΔΗ[i] 

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ



! 3 Διάβασμα στις τιμών των ειδών

  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 25

    ΓΡΑΨΕ ΕΙΔΗ[i] 

    ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ 10

      ΓΡΑΨΕ 'Δώστε τιμή για είδος: ', ΜΑΡΚΑ[j], ' : '

      ΔΙΑΒΑΣΕ ΤΙΜΗ[i, j] 

    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ





!4)

  ΓΡΑΨΕ 'Αναζήτηση τιμής'

  ΓΡΑΨΕ 'Δώστε Μάρκα: '

  ΔΙΑΒΑΣΕ Μ

  ΓΡΑΨΕ 'Δώστε είδος: '

  ΔΙΑΒΑΣΕ ΕΙΔ



  βρέθηκε <- ΨΕΥΔΗΣ

  i <- 1

  ΟΣΟ i <= 25 ΚΑΙ βρέθηκε = ΨΕΥΔΗΣ ΕΠΑΝΑΛΑΒΕ

    j <- 1

    ΟΣΟ j <= 10 ΚΑΙ βρέθηκε = ΨΕΥΔΗΣ ΕΠΑΝΑΛΑΒΕ

      ΑΝ ΜΑΡΚΑ[j] = Μ ΚΑΙ ΕΙΔΗ[i] = ΕΙΔ ΤΟΤΕ

        βρέθηκε <- ΑΛΗΘΗΣ

        ΓΡΑΨΕ 'Τιμή προϊόοντος :', ΤΙΜΗ[i, j] 

      ΤΕΛΟΣ_ΑΝ

      j <- j + 1

    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

    i <- i + 1

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

  ΑΝ βρέθηκε = ΨΕΥΔΗΣ ΤΟΤΕ

    ΓΡΑΨΕ 'Δεν βρέθηκε Είδος/Μάρκα που δώσατε ...'

  ΤΕΛΟΣ_ΑΝ

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