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