! 3ο ΘΕΜΑ Πανελλαδικών Ημερησίων 2012
! Μια λύση από Γιώργο Κατσαούνο.  Κατά τη γνώμξ μου πρέπει να
! σταματά όταν ένα μικρό έργο δεν μπορεί να χρηματοδοτηθεί
! (δεν συνεχίζει μέχρι να δοθεί έργο με επιδότηση 200000*60/100)
! ή όταν δοθεί όνομα "ΤΕΛΟΣ", οπότε έχει και περισσότερο νόημα
! η εμφάνιση του διαθέσιμου ποσού που περίσσεψε

Αλγόριθμος Ήλιος
πλ1 ← 0
πλ2 ← 0
Σ1 ← 0
Σ2 ← 0

Αρχή_επανάληψης
  Διάβασε ΔΠ
Μέχρις_ότου ΔΠ > 5000000

ΣΤΑΜΑΤΑ ← Ψευδής
Διάβασε ΟΝ
Όσο ΟΝ ≠ "ΤΕΛΟΣ" και ΣΤΑΜΑΤΑ = Ψευδής επανάλαβε
  Διάβασε ΠΡΟΥΠ
  Αν ΠΡΟΥΠ ≥ 200000 και ΠΡΟΥΠ < 300000 τότε
    ΕΠΙΔ ← ΠΡΟΥΠ*60/100
    Αν ΕΠΙΔ ≤ ΔΠ τότε
      πλ1 ← πλ1 + 1
      Σ1 ← Σ1 + ΕΠΙΔ
      Εμφάνισε ΟΝ, ΕΠΙΔ
      ΔΠ ← ΔΠ - ΕΠΙΔ
    αλλιώς
      ΣΤΑΜΑΤΑ ← Αληθής   ! Σταματά μόνο όταν δεν χρηματοδοτηθεί ένα μικρό έργο
    Τέλος_αν              ! ανεξάρτητα από τον προϋπολογισμό του
  αλλιώς_αν ΠΡΟΥΠ ≥ 300000 και ΠΡΟΥΠ < 400000 τότε
    ΕΠΙΔ ← ΠΡΟΥΠ*70/100
    Αν ΕΠΙΔ ≤ ΔΠ τότε
      πλ2 ← πλ2 + 1
      Σ2 ← Σ2 + ΕΠΙΔ
      Εμφάνισε ΟΝ, ΕΠΙΔ
      ΔΠ ← ΔΠ - ΕΠΙΔ
    Τέλος_αν
  Τέλος_αν
  Αν ΣΤΑΜΑΤΑ = Ψευδής τότε
    Διάβασε ΟΝ
  Τέλος_αν
Τέλος_επανάληψης

Εμφάνισε πλ1, Σ1, πλ2, Σ2
Αν ΔΠ > 0 τότε                 ! Αν δεν έφτασαν τα χρήματα δεν ζητάω τον επόμενο
  Εμφάνισε "Περίσσεψαν", ΔΠ
Τέλος_αν

Τέλος Ήλιος