! =========================================================================================
! ΕΣΠΕΡΙΝΟ ΙΟΥΝΙΟΣ 2002 - ΘΕΜΑ 1Δ
! =========================================================================================
! Να γράψετε τα τμήματα αλγορίθμου, που αντιστοιχούν στα τμήματα των διαγραμμάτων ροής
! (α) και (β), που ακολουθούν.
!
! =========================================================================================
ΠΡΟΓΡΑΜΜΑ ES_2002_06_1Δ
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: m1 , x , Α , Β
ΑΡΧΗ
ΓΡΑΨΕ '===== (α) ====='
m1 <-- 0
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε αριθμό'
ΔΙΑΒΑΣΕ x
ΑΝ x >= 0 ΤΟΤΕ
m1 <-- m1 + 1
ΤΕΛΟΣ_ΑΝ
ΜΕΧΡΙΣ_ΟΤΟΥ x < 0
ΓΡΑΨΕ m1
ΓΡΑΨΕ '===== (β) ====='
Α <-- 20
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
Β <-- Α^2
ΓΡΑΨΕ Β
Α <-- Α -3
ΜΕΧΡΙΣ_ΟΤΟΥ Α < 0
ΓΡΑΨΕ Α , Β
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ