Παρασκευή 24 Ιανουαρίου 2014

ΘΕΜΑΤΑ ΔΙΑΓΩΝΙΣΜΑΤΟΣ ΑΕΠΠ 19-1-2014

ΛΥΣΕΙΣ ΔΙΑΓΩΝΙΣΜΑΤΟΣ ΑΕΠΠ 19-1-2014 ΘΕΜΑ Δ

ΠΡΟΓΡΑΜΜΑ ΘΕΜΑ_Δ
   ΜΕΤΑΒΛΗΤΕΣ
 ΑΚΕΡΑΙΕΣ: sum_ασθενών, sum_ασθ_γρίπη, maxangel, sum_angel, max_γριπη, πλ_ασθ_κλιν, sum_ηλ_γριπ, πλ_ασθ_γριπη, max_ηλ, min_ηλ, sum_ηλ, i, κλινική, κλινική2
    ΠΡΑΓΜΑΤΙΚΕΣ: Μο_ηλ, Μο_ηλ_γριπη, ποσ_γριπ, ποσοστό_με_γριπη, ποσoστό_angel
    ΧΑΡΑΚΤΗΡΕΣ:απ1 , απ2 , ον
ΑΡΧΗ
   sum_ασθενών  0
   sum_ασθ_γρίπη  0
   maxangel   -1
   sum_angel  0
   max_γριπη  -1
   ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 4
          πλ_ασθ_κλιν  0
          sum_ηλ_γριπ  0
          πλ_ασθ_γριπη  0
          max_ηλ  - 1 
          πλ_angel  0
          min_ηλ  200
     sum_ηλ  0
     ΓΡΑΨΕ 'δώσε όνομα ασθενή'
     ΔΙΑΒΑΣΕ ον
     ΟΣΟ  ον <> 'άδειο' ΚΑΙ πλ_ασθ_κλιν < 60 ΕΠΑΝΑΛΑΒΕ
        ΓΡΑΨΕ 'Δώσε έτος γέννησης'                   !ερώτημα β1
        ΔΙΑΒΑΣΕ έτος
                    ηλ  2013 - έτος
                    πλ_ασθ_κλιν  πλ_ασθ_κλιν + 1         !πληθος ασθενών κλινικής
        ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
      ΓΡΑΨΕ 'Νοσηλεύεται για γρίπη;'    !ερώτημα β2
      ΔΙΑΒΑΣΕ απ1
        ΜΕΧΡΙΣ_ΟΤΟΥ απ1='ναι' Ή απ1='όχι'
        ΑΝ απ1='ναι' ΤΟΤΕ
   ΓΡΑΨΕ 'Ποιας εταιρείας φάρμακο παίρνετε;'   !ερώτημα β3
   ΔΙΑΒΑΣΕ απ2
   ΑΝ απ2='ANGEL & FLU LABS' ΤΟΤΕ
          πλ_angel   πλ_angel + 1  !πληθ  ασθενών με γρίπη που παίρνουν Angel
   ΤΕΛΟΣ_ΑΝ
               πλ_ασθ_γριπη  πλ_ασθ_γριπη + 1         !πληθος ασθενών με γρίπη
                           sum_ηλ_γριπ  sum_ηλ_γριπ + ηλ      !άθροισμα ηλικιών ασθενών με γρίπη
        ΑΝ ηλ > max_ηλ ΤΟΤΕ
                                  max_ηλ  ηλ
                                  max_ηλ_γρίπη ← oν           !μεγαλύτερος σε ηλικία ασθενής με γρίπη
        ΤΕΛΟΣ_ΑΝ
        ΑΝ ηλ < min_ηλ ΤΟΤΕ
                                  min_ηλ  ηλ           
                                  min_ηλ_γρίπη  ον            !μικρότερος σε ηλικία ασθενής με γρίπη
        ΤΕΛΟΣ_ΑΝ
         ΤΕΛΟΣ_ΑΝ
         sum_ηλ  sum_ηλ + ηλ                   !άθροισμα ηλικιών όλων των ασθενών
         ΓΡΑΨΕ 'δώσε όνομα ασθενή'
                     ΔΙΑΒΑΣΕ ον
         ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
              ΑΝ πλ_ασθ_γριπη <> 0 ΤΟΤΕ                         !αν υπάρχουν ασθενείς με γρίπη
                    Μο_ηλ_γριπη  sum_ηλ_γριπ/πλ_ασθ_γριπη                        !ερώτημα β4
                    ΓΡΑΨΕ Mο_ηλ_γριπη
        ΓΡΑΨΕ max_ηλ_γρίπη , min_ηλ_γρίπη                                       !ερώτημα β6
         ΤΕΛΟΣ_ΑΝ
              ΑΝ πλ_ασθ_κλιν <> 0 ΤΟΤΕ                      !αν υπάρχουν ασθενείς στην κλινική
                     Μο_ηλ  sum_ηλ / πλ_ασθ_κλιν
         ΓΡΑΨΕ Μο_ηλ                                                                                  !ερώτημα β4
                     ποσοστό_με_γριπη  πλ_ασθ_γριπη/ πλ_ασθ_κλιν *100
         ΓΡΑΨΕ ποσοστό_με_γριπη                                                           !ερώτημα β5
         ΤΕΛΟΣ_ΑΝ
              sum_ασθενών  sum_ασθενών + πλ_ασθ_κλιν              !σύνολο ασθενών
         sum_ασθ_γρίπη  sum_ασθ_γρίπη + πλ_ασθ_γριπη !σύνολο ασθενών με γρίπη
         ΑΝ πλ_ασθ_γριπη > max_γριπη ΤΟΤΕ
                     max_γριπη  πλ_ασθ_γριπη                                                       !ερώτημα α2
                     κλινική  i
         ΤΕΛΟΣ_ΑΝ
         ΑΝ πλ_angel > maxangel ΤΟΤΕ
        maxangel ← πλ_angel                                                                      !ερώτημα α3
                    κλινική2  i
         ΤΕΛΟΣ_ΑΝ
         sum_angel  sum_angel + πλ_angel !σύνολο όσων παίρνουν angel
     ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
     ΑΝ sum_ασθενών <> 0 ΤΟΤΕ        
ποσ_γριπ  sum_ασθ_γρίπη / sum_ασθενών *100                          !ερώτημα α1
            ΓΡΑΨΕ ποσ_γρ
     ΤΕΛΟΣ_ΑΝ
     ΑΝ sum_ασθ_γρίπη <> 0 ΤΟΤΕ        
ποσoστό_angel  sum_angel / sum_ασθ_γρίπη *100
ΓΡΑΨΕ ποσoστό_angel                                                                            !ερώτημα α4
     ΤΕΛΟΣ_ΑΝ
     ΑΝ max_γριπη <> - 1 ΤΟΤΕ
ΓΡΑΨΕ κλινική                                                                                             !ερώτημα α2
     ΤΕΛΟΣ_ΑΝ
     ΑΝ maxangel <> - 1 ΤΟΤΕ
ΓΡΑΨΕ κλινική2                                                                                           !ερώτημα α3
     ΤΕΛΟΣ_ΑΝ
     ΑΝ ποσoστό_angel < 25 ΤΟΤΕ
            ΓΡΑΨΕ ‘ Απαιτείται δημιουργία νέου αντιγριπικού’
     ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

ΛΥΣΕΙΣ ΔΙΑΓΩΝΙΣΜΑΤΟΣ ΑΕΠΠ 19-1-2014 ΘΕΜΑ Γ

Αλγόριθμος ΘΕΜΑ_Γ
αθρ 
← 0
πλ 
← 0
πλΑ ← 0
max 
← -1
Εμφάνισε “Δώσε τοποθεσία ακινήτου”
Διάβασε τοπ
Όσο τοπ <> “τέλος” επανάλαβε
            Εμφάνισε “Δώσε προυπολογισμό”
            Διάβασε πρ
            Αν τοπ = “Α” τότε
                  Αν πρ <= 400000 τότε
                        ποσό 
 0.01*πρ
                  αλλιώς_αν πρ <= 900000 τότε
                        ποσό 
← 0.02*πρ
                  αλλιώς
                        ποσό 
← 0.03*πρ
                  Τέλος_αν
                  πλΑ ← πλΑ + 1        !πλήθος των ακινήτων που ενοικιάστηκαν στην τοποθεσία Α
αλλιώς
                  Αν πρ <= 400000 τότε
                        ποσό 
← 0.03*πρ
                  αλλιώς_αν πρ <= 900000 τότε
                        ποσό 
← 0.06*πρ
                  αλλιώς
                        ποσό 
← 0.09*πρ
                  Τέλος_αν
            Τέλος_αν
Εμφάνισε ποσό                               ! για το ερώτημα 1ii
            αθρ ← αθρ + ποσό                          !για το ερώτημα 2.1-i
            πλ ← πλ + 1                                       !για το ερώτημα 2.1-ii
            Αν ποσό > max τότε
                  max 
← ποσό                        !για το ερώτημα 2.2-i
                  max_τοπ ← τοπ
            Τέλος_αν
             Εμφάνισε “Δώσε τοποθεσία ακινήτου”
            Διάβασε τοπ
Τέλος_επανάληψης
Αν αθρ >= 150000 τότε                                          !ερώτημα 2
      Εμφάνισε αθρ, πλ
αλλιώς
Εμφάνισε max 
Αν πλ <> 0 τότε
                  Εμφάνισε αθρ/πλ
                  Εμφάνισε max_τοπ
            αλλιώς
                  Εμφάνισε “Καμία ενοικίαση”
            Τέλος_αν
Τέλος_αν
πλ ← πλ – πλΑ      !πλήθος των ακινήτων που ενοικιάστηκαν στην  τοποθεσία B
Αν πλΑ > πλΒ τότε
      Εμφάνισε “προτιμούν την τοποθεσία Α”
αλλιώς_αν πλΑ < πλΒ τότε
      Εμφάνισε “προτιμούν την τοποθεσία Β”                 !ερώτημα 3
αλλιώς
   Εμφάνισε “δεν υπάρχει προτίμηση”
Τέλος_αν
Τέλος ΘΕΜΑ_Γ

ΛΥΣΕΙΣ ΔΙΑΓΩΝΙΣΜΑΤΟΣ ΑΕΠΠ 19-1-2014 ΘΕΜΑ Β

ΘΕΜΑ Β:
(Β1)

κ
α
i
κß4
4


1η εξωτερική επανάληψη



    α ← 1

1

    κ <> 2, αληθής



    1η εσωτερική επανάληψη για i = 1


1
            α ← 2*α

2

             Εμφάνισε i, α

2
1
     2η εσωτερική επανάληψη για i = 2


2
             α ← 2*α

4

             Εμφάνισε i, α

4
2
     3η εσωτερική επανάληψη για i = 3


3
              α ← 2*α

8

              Εμφάνισε i, α

8
3
     4η εσωτερική επανάληψη για i = 4


4
              α ← 2*α

16

              Εμφάνισε i, α

16
4
       ii + 1 , Έξοδος από τη για


5
       κ ← κdiv 2
2


Κ <= 1 , ψευδής - 2η εξωτερική επανάληψη



    α  1

1

    κ <> 2, ψευδής



      i ← 29


29
      i> 0 , αληθής - 1η  εσωτερική επανάληψη



             i ← idiv2


14
             Εμφάνισε i,'000'


14
      i> 0 , αληθής - 2η  εσωτερική επανάληψη



             i ← idiv2


7
             Εμφάνισε i,'000'


7
      i> 0 , αληθής - 3η  εσωτερική επανάληψη



             i ← idiv2


3
             Εμφάνισε i,'000'


3
      i> 0 , αληθής - 4η  εσωτερική επανάληψη



             i ← idiv2


1
             Εμφάνισε i,'000'


1
      i> 0 ,αληθής - 5η  εσωτερική επανάληψη



             i ← idiv2


0
             Εμφάνισε i,'000'


0
      i> 0 ,  ψευδής – έξοδος από την Όσο



      κ  ← κ div 2
1


Κ <= 1 , αληθής - έξοδος από την Μέχρις_ότου





(Β3)1 – Θ    2 – Δ   3 – Π          4 – Ι       5 – Σ


(Β4)
1. Αρχή_επανάληψης
              Διάβασε Κ
     Μέχρις_ότου Κ mod 9 ≠ 0 και Κ mod 2 = 0

2. Αρχή_επανάληψης
             Διάβασε ΑΠ
             Αν ΑΠ ≠ 'Ναι' και ΑΠ ≠ 'Όχι' τότε
                   Εμφάνισε 'Δώσε ξανά την επιλογή σου'
             Τέλος_αν
    Μέχρις_ότου ΑΠ = 'Ναι' ή  ΑΠ = 'Όχι'

ή με Όσο

Διάβασε ΑΠ
Όσο όχι(ΑΠ = 'Ναι' ή  ΑΠ = 'Όχι') επανάλαβε
            Εμφάνισε 'Δώσε ξανά την επιλογή σου'
            Διάβασε ΑΠ
Τέλος_επανάληψης


3. Μ  0
Αρχή_επανάληψης
         Διάβασε Χ
         Μ  Μ + 1
Μέχρις_ότου Χ >= ‘Α’ και Χ < ‘Η’
Εμφάνισε 
Μ – 1

ή με Όσο

Μ ← 0
Διάβασε Χ
Όσο όχι(Χ >= ‘Α’ και Χ < ‘Η’) επανάλαβε
            Μ  Μ + 1
            Διάβασε Χ
Τέλος_επανάληψης
Εμφάνισε Μ

(Β5)
i]


ΣΕ ΌΣΟ
Χ  3
i  5
Όσο i>= 0 επανάλαβε
         Χ ← Χ + 1 
         Αν Χ > 4 τότε
               Υ ← Χ
         αλλιώς
               Υ  - Χ
         Τέλος_αν
         Ζ← Χ*Υ
          i  i – 2
Τέλος_επανάληψης

ΣΕ ΜΕΧΡΙΣ_ΟΤΟΥ
Χ  3
 i 5
Αρχή_επανάληψης
         Χ ← Χ + 1
         Αν Χ > 4 τότε
               Υ ← Χ
         αλλιώς
               Υ  - Χ
         Τέλος_αν
         Ζ ← Χ*Υ
          i  i - 2
Μέχρις_ότου i < 0



ii


ΣΕ ΓΙΑ
Y← 2
Για X από 1 μέχρι 25 με_βήμα 3
        ΥΧ+4
        ΖΥ+(Χ+3)^2
Τέλος_επανάληψης
Εμφάνισε Ζ

ΣΕ ΜΕΧΡΙΣ_ΟΤΟΥ
Y2
Αρχή_επανάληψης
          ΥΧ+4
          Χ  Χ + 3
          ΖΥ+Χ^2
Μέχρις_ότου X> 25
Εμφάνισε Ζ



iii]  Διάβασε ρ
      Αν ρ mod 3 = 0 τότε
ρ ßρ + 11
Όσο ρ<= 52 επανάλαβε
         ρ ← ρ + 11
Τέλος_επανάληψης
       Αλλιώς
            θ  10
Όσο θ>= 2 επανάλαβε
          ρ ← ρ + θ
                      θ  θ - 3
Τέλος_επανάληψης
       Τέλος_αν

iv]
Διάβασε π
θ 1
Όσο θ <= 2 επανάλαβε
            Εμφάνισε θ
             ι   1
Αρχή_επανάληψης
          Εμφάνισε ι *θ
                       ι  ι + 1
Μέχρις_ότου ι >2
Εμφάνισε ι*π
             θ  θ + 1
Τέλος_επανάληψης
Εμφάνισε (θ + ι + π)^1/2