! ===============================================================================================
! ΗΜΕΡΗΣΙΟ - ΜΑΙΟΣ 2007 - ΘΕΜΑ 2Α
! ===============================================================================================
! Δίνεται παρακάτω ένα πρόγραμμα καιένα υποπρόγραμμα :
!
! ΠΡΟΓΡΑΜΜΑ Υπολογισμοί
! ΜΕΤΑΒΛΗΤΕΣ
! ΠΡΑΓΜΑΤΙΚΕΣ : α, β, γ
! ΑΡΧΗ
! ΔΙΑΒΑΣΕ α , β
! γ <-- α + Πράξη(α,β)
! ΓΡΑΨΕ γ
! ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
!
! ΣΥΝΑΡΤΗΣΗ Πράξη(χ,ψ): ΠΡΑΓΜΑΤΙΚΗ
! ΜΕΤΑΒΛΗΤΕΣ
! ΠΡΑΓΜΑΤΙΚΕΣ : χ, ψ
! ΑΡΧΗ
! ΑΝ χ >= ψ ΤΟΤΕ
! Πράξη <-- χ – ψ
! ΑΛΛΙΩΣ
! Πράξη <-- χ + ψ
! ΤΕΛΟΣ_ΑΝ
! ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ
!
! Να ξαναγράψετε το πρόγραμμα, ώστε να επιτελεί την ίδια λειτουργία χρησιμοποιώντας διαδικασία
! αντί συνάρτησης.
! ===============================================================================================
!
ΠΡΟΓΡΑΜΜΑ ΗΜ_2007_05_2Α
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: α, β, γ
ΑΡΧΗ
ΔΙΑΒΑΣΕ α , β
ΚΑΛΕΣΕ Πράξη(α , β , γ)
γ <-- α + γ
ΓΡΑΨΕ γ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΔΙΑΔΙΚΑΣΙΑ Πράξη(χ , ψ , ω)
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ : χ , ψ , ω
ΑΡΧΗ
ΑΝ χ >= ψ ΤΟΤΕ
ω <-- χ - ψ
ΑΛΛΙΩΣ
ω <-- χ + ψ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ