! ===============================================================================================
! ΠΡΟΣΟΜΟΙΩΣΗ 2007 - ΘΕΜΑ 2
!================================================================================================
! Δίνεται το ακόλουθο πρόγραμμα :
!
! ΠΡΟΓΡΑΜΜΑ ΘΕΜΑ2
! ΜΕΤΑΒΛΗΤΕΣ
! ΑΚΕΡΑΙΕΣ : i , j , Α , Β , D
! ΑΡΧΗ
! Α <-- 4
! Β <-- 10
! ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 2
! ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ i
! ΚΑΛΕΣΕ ΔΙΑΔ(Α , Β)
! Α <-- Α + 3
! Β <-- Β - 4
! ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
! ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
! D <-- Α DIV Β
! ΓΡΑΨΕ d
! ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
!
! ΔΙΑΔΙΚΑΣΙΑ ΔΙΑΔ(Β , Γ)
! ΜΕΤΑΒΛΗΤΕΣ
! ΑΚΕΡΑΙΕΣ : Α , Β , Γ
! ΑΡΧΗ
! B <-- B + 1
! A <-- A + 2
! Γ <-- FUN(Γ , Α)
! ΓΡΑΨΕ Α , Β , Γ
! ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
!
! ΣΥΝΑΡΤΗΣΗ FUN( Χ , Υ) : ΑΚΕΡΑΙΑ
! ΜΕΤΑΒΛΗΤΕΣ
! ΑΚΕΡΑΙΕΣ : Χ , Υ
! ΑΡΧΗ
! FUN <-- Υ mod Χ
! ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ
!
! Να εκτελέσετε το παραπάνω πρόγραμμα και να γράψετε :
! Α. Τις τιμές των μεταβλητών Α , Β , Γ όπως αυτές εκτυπώνονται από τη διαδικασία σε κάθε επανάληψη.
! Β. Την τιμή της μεταβλητής D που εκτυπώνεται.
!
!================================================================================================
ΠΡΟΓΡΑΜΜΑ PR_07_2
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : i , j , Α , Β , D
ΑΡΧΗ
Α <-- 4
Β <-- 10
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 2
ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ i
ΚΑΛΕΣΕ DIAD(Α , Β)
Α <-- Α + 3
Β <-- Β - 4
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
D <-- Α DIV Β
ΓΡΑΨΕ D
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
! ---------------------------
ΔΙΑΔΙΚΑΣΙΑ DIAD(Β , Α)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : Α , Β , Γ
ΑΡΧΗ
Β <-- Β + 1
Α <-- Α + 2
Γ <-- FUN(Α , Β)
ΓΡΑΨΕ Α , Β , Γ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
! ---------------------------
ΣΥΝΑΡΤΗΣΗ FUN(x,y): ΑΚΕΡΑΙΑ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : x , y
ΑΡΧΗ
FUN <-- y MOD x
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ