ΧΡΙΣΤΟΥΓΕΝΝΙΑΤΙΚΗ ΕΡΓΑΣΙΑ ΜΕΡΟΣ Β' (7-9)

7.
ΠΡΟΓΡΑΜΜΑ ασκ7χρ
ΜΕΤΑΒΛΗΤΕΣ
    ΑΚΕΡΑΙΕΣ: i, max, min, επιβ, πλ100
    ΧΑΡΑΚΤΗΡΕΣ: πλ, πλmax, πλmin
ΑΡΧΗ
    πλ100 ← 0
    max ← -1
    min ← 1001
    ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 150
            ΓΡΑΨΕ 'Δώσε όνομα πλοίου και αριθμό επιβατών'
            ΔΙΑΒΑΣΕ πλ, επιβ
            ΑΝ επιβ < 100 ΤΟΤΕ
                   πλ100 ← πλ100 + 1
            ΤΕΛΟΣ_ΑΝ
            ΑΝ επιβ > max ΤΟΤΕ
                   max ← επιβ
                   πλmax ← πλ
            ΤΕΛΟΣ_ΑΝ
            ΑΝ επιβ < min ΤΟΤΕ
                   min ← επιβ
                   πλmin ← πλ
            ΤΕΛΟΣ_ΑΝ
      ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
      ΓΡΑΨΕ πλ100, πλmax, πλmin
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

8.
ΠΡΟΓΡΑΜΜΑ ασκ8χρ
ΜΕΤΑΒΛΗΤΕΣ
    ΑΚΕΡΑΙΕΣ: i, αμ, μισθ
    ΧΑΡΑΚΤΗΡΕΣ: ον, κατ
ΑΡΧΗ
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 150
          ΓΡΑΨΕ 'Δώσε όνομα εργαζομένου, αριθμό μητρώου και κατηγορία'
          ΔΙΑΒΑΣΕ ον, αμ, κατ
          ΑΝ κατ = 'ΕΡΓΑΤΗΣ' ΤΟΤΕ
                 μισθ ← 1000
                 ΓΡΑΨΕ αμ, μισθ
          ΑΛΛΙΩΣ_ΑΝ κατ = 'ΠΡΟΙΣΤΑΜΕΝΟΣ' ΤΟΤΕ
                 μισθ ← 2000
                 ΓΡΑΨΕ αμ, μισθ
          ΑΛΛΙΩΣ
                 μισθ ← 3000
                 ΓΡΑΨΕ ον, αμ, μισθ
          ΤΕΛΟΣ_ΑΝ
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

9.
Αλγόριθμος ασκ9χρ
συνφορ ← 0
Για i από 1 μέχρι 18000
       Δεδομένα //κώδφορ, ονεπ, εισ //
       Αν εισ ≤ 10000 τότε
             φ ← 0
       αλλιώς_αν εισ ≤ 15000 τότε
             φ ← (εισ-10000)*0.05
       αλλιώς_αν εισ ≤ 20000 τότε
             φ ← 5000*5/100+(εισ-15000)*10/100
       αλλιώς
             φ ← 5000*5/100 + 5000*10/100 + (εισ-20000)*20/100
       Τέλος_αν
       Εμφάνισε ονεπ , φ
       συνφορ ← συνφορ + φ
Τέλος_επανάληψης
Εμφάνισε συνφορ
μο ← συνφορ/18000
Εμφάνισε μο
Τέλος ασκ9χρ