ΠΡΟΓΡΑΜΜΑ ΘΕΜΑ_Γ
ΜΕΤΑΒΛΗΤΕΣ
  ΠΡΑΓΜΑΤΙΚΕΣ: ΟΡΙΟ, Β_ΦΟΡΤ, Β_ΜΠΟΡΕΙ_ΝΑ_ΦΟΡΤ, Β_ΔΕΜ, ΚΟΣ, ΣΥΝ_ΠΟΣ
  ΑΚΕΡΑΙΕΣ: ΠΛ_ΟΧΙ, ΠΛ_1000
  ΧΑΡΑΚΤΗΡΕΣ: Απάντηση
ΑΡΧΗ
  ΠΛ_ΟΧΙ <- ....
  ΣΥΝ_ΠΟΣ <- ....
  ΠΛ_1000 <- .....
  !  Ερώτημα Γ2
  ΔΙΑΒΑΣΕ ΟΡΙΟ
  ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
    ΔΙΑΒΑΣΕ Β_ΦΟΡΤ
  ΜΕΧΡΙΣ_ΟΤΟΥ ..................
  !  Ερώτημα Γ3.α
  Β_ΜΠΟΡΕΙ_ΝΑ_ΦΟΡΤ <- .......................
  ΓΡΑΨΕ 'Βάρος που μπορεί ακόμα να φορτωθεί: ', Β_ΜΠΟΡΕΙ_ΝΑ_ΦΟΡΤ
  ΓΡΑΨΕ 'ΝΑ ΦΟΡΤΩΘΕΙ ΔΕΜΑ; (ΝΑΙ/ΟΧΙ)'
  ΔΙΑΒΑΣΕ Απάντηση
  ! Ερώτημα Γ3.β
  ΟΣΟ .................. ΕΠΑΝΑΛΑΒΕ
    ΔΙΑΒΑΣΕ Β_ΔΕΜ
    ! Ερώτημα Γ3.β
    ΑΝ Β_ΔΕΜ <= Β_ΜΠΟΡΕΙ_ΝΑ_ΦΟΡΤ ΤΟΤΕ
      Β_ΜΠΟΡΕΙ_ΝΑ_ΦΟΡΤ <- Β_ΜΠΟΡΕΙ_ΝΑ_ΦΟΡΤ - .........
      ! Ερώτημα Γ3.β συνέχεια
      ΑΝ Β_ΔΕΜ <= 500 ΤΟΤΕ
        ΚΟΣ <- 500*0.5
      ΑΛΛΙΩΣ_ΑΝ Β_ΔΕΜ <= ....... ΤΟΤΕ
        ΚΟΣ <- 500*0.5 + (Β_ΔΕΜ - 500)*0.3
      ΑΛΛΙΩΣ
        ΚΟΣ <- 500*0.5 + 1000*0.3 + (Β_ΔΕΜ - 1500)*0.1
      ΤΕΛΟΣ_ΑΝ
      !  Ερώτημα Γ4
      ΣΥΝ_ΠΟΣ <- .......................
      ΑΝ ................ ΤΟΤΕ
        ΠΛ_1000 <- ΠΛ_1000 + 1
      ΤΕΛΟΣ_ΑΝ
    ΑΛΛΙΩΣ
      ..............................
      ................................
    ΤΕΛΟΣ_ΑΝ
    ΓΡΑΨΕ 'Βάρος που μπορεί ακόμα να φορτωθεί: ', Β_ΜΠΟΡΕΙ_ΝΑ_ΦΟΡΤ
    ΓΡΑΨΕ 'ΝΑ ΦΟΡΤΩΘΕΙ ΔΕΜΑ; (ΝΑΙ/ΟΧΙ)'
    ΔΙΑΒΑΣΕ Απάντηση
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  !  Ερώτημα Γ4 σε συνέχεια από πριν
  ΓΡΑΨΕ 'Δέματα που δεν φορτώθηκαν λόγω υπέρβασης: ', ΠΛ_ΟΧΙ
  ΓΡΑΨΕ 'Συνολικό ποσό που εισπράχθηκε: ', ΣΥΝ_ΠΟΣ
  ΓΡΑΨΕ 'Δέματα με πάνω από 1000 κιλά: ', ΠΛ_1000
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ