ΠΡΟΓΡΑΜΜΑ Λαλαηκς
ΜΕΤΑΒΛΗΤΕΣ
  ΠΡΑΓΜΑΤΙΚΕΣ: τιμη, τιμη2, τιμη3, δοση, τελικο, προκ
  ΑΚΕΡΑΙΕΣ: δοσεις
ΑΡΧΗ
  ΓΡΑΨΕ 'Δωσε τιμη και πληθος δοσεων'
  ΔΙΑΒΑΣΕ τιμη, δοσεις
  προκ <- 0.25*τιμη
  τιμη2 <- τιμη - προκ
  ΑΝ δοσεις <= 12 ΤΟΤΕ
    τιμη3 <- (τιμη2 + 0.07*τιμη2)
    δοση <- τιμη3/δοσεις
  ΑΛΛΙΩΣ_ΑΝ δοσεις <= 36 ΤΟΤΕ
    τιμη3 <- (τιμη2 + 0.12*τιμη2)
    δοση <- τιμη3/δοσεις
  ΑΛΛΙΩΣ_ΑΝ δοσεις <= 60 ΤΟΤΕ
    τιμη3 <- (τιμη2 + 0.19*τιμη2)
    δοση <- τιμη3/δοσεις
  ΑΛΛΙΩΣ
    τιμη3 <- (τιμη2 + 0.25*τιμη2)
    δοση <- τιμη3/δοσεις
  ΤΕΛΟΣ_ΑΝ
  τελικο <- δοση*δοσεις + προκ + 200
  ΓΡΑΨΕ προκ, δοση, τελικο
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ