ΠΡΟΓΡΑΜΜΑ ΑΡΙΘΜΟΜΗΧΑΝΗ
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: Α,Β,Γ
ΧΑΡΑΚΤΗΡΕΣ: Δ, Ψ
ΑΡΧΗ
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'ΤΙ ΠΡΑΞΗ ΘΑ ΘΕΛΑΤΕ ΝΑ ΚΑΝΕΤΕ? (+ , - , * , /)'
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΔΙΑΒΑΣΕ Δ
ΑΝ Δ <> '+' ΚΑΙ Δ <> '-' ΚΑΙ Δ <> '*' ΚΑΙ Δ <> '/' ΤΟΤΕ
ΓΡΑΨΕ 'Η ΠΡΑΞΗ ΠΟΥ ΕΙΣΑΓΑΤΕ ΔΕΝ ΕΙΝΑΙ ΕΓΚΥΡΗ. ΠΑΡΑΚΑΛΩ ΕΙΣΑΓΕΤΕ ΕΓΚΥΡΗ ΠΡΑΞΗ. (+ , - , * , /)'
ΤΕΛΟΣ_ΑΝ
ΜΕΧΡΙΣ_ΟΤΟΥ Δ = '+' Ή Δ = '-' Ή Δ = '*' Ή Δ = '/'
ΓΡΑΨΕ 'ΠΕΙΤΕ ΜΟΥ ΤΟΝ ΠΡΩΤΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Α
ΓΡΑΨΕ 'ΠΕΙΤΕ ΜΟΥ ΤΟΝ ΔΕΥΤΕΡΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Β
ΑΝ Δ = '+' ΤΟΤΕ
Γ <-- Α + Β
ΓΡΑΨΕ ' ΤΟ ΑΠΟΤΕΛΕΣΜΑ ΕΙΝΑΙ:' , Γ
ΑΛΛΙΩΣ_ΑΝ Δ = '-' ΤΟΤΕ
Γ <-- Α - Β
ΓΡΑΨΕ ' ΤΟ ΑΠΟΤΕΛΕΣΜΑ ΕΙΝΑΙ:' , Γ
ΑΛΛΙΩΣ_ΑΝ Δ = '*' ΤΟΤΕ
Γ <-- Α * Β
ΓΡΑΨΕ ' ΤΟ ΑΠΟΤΕΛΕΣΜΑ ΕΙΝΑΙ:' , Γ
ΤΕΛΟΣ_ΑΝ
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΑΝ Δ = '/' ΚΑΙ Β = 0 ΤΟΤΕ
ΓΡΑΨΕ 'ΔΙΑΙΡΕΣΗ ΜΕ ΤΟ ΜΗΔΕΝ. Η ΠΡΑΞΗ ΔΕΝ ΕΙΝΑΙ ΕΓΚΥΡΗ ΠΑΡΑΚΑΛΩ ΕΙΣΑΓΕΤΕ ΕΓΚΥΡΟ ΝΟΥΜΕΡΟ.'
ΓΡΑΨΕ 'ΠΕΙΤΕ ΜΟΥ ΞΑΝΑ ΤΟΝ ΔΕΥΤΕΡΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Β
ΤΕΛΟΣ_ΑΝ
ΑΝ Δ = '/' ΚΑΙ Β <> 0 ΤΟΤΕ
Γ <-- Α / Β
ΓΡΑΨΕ ' ΤΟ ΑΠΟΤΕΛΕΣΜΑ ΕΙΝΑΙ:' , Γ
ΤΕΛΟΣ_ΑΝ
ΜΕΧΡΙΣ_ΟΤΟΥ Β <> 0
ΓΡΑΨΕ 'ΘΕΛΕΤΕ ΝΑ ΚΑΝΕΤΕ ΚΑΠΟΙΑ ΑΛΛΗ ΠΡΑΞΗ? (Υ/Ν)'
ΔΙΑΒΑΣΕ Ψ
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΑΝ Ψ <> 'Ν' ΚΑΙ Ψ <> 'Υ' ΤΟΤΕ
ΓΡΑΨΕ 'Η ΑΠΑΝΤΗΣΗ ΠΟΥ ΕΙΣΑΓΑΤΕ ΔΕΝ ΕΙΝΑΙ ΕΓΚΥΡΗ. ΠΑΡΑΚΑΛΩ ΕΙΣΑΓΕΤΕ ΕΓΚΥΡΗ ΑΠΑΝΤΗΣΗ. (Υ/Ν)'
ΔΙΑΒΑΣΕ Ψ
ΤΕΛΟΣ_ΑΝ
ΜΕΧΡΙΣ_ΟΤΟΥ Ψ = 'Ν' Ή Ψ = 'Υ'
ΜΕΧΡΙΣ_ΟΤΟΥ Ψ = 'Ν'
ΓΡΑΨΕ
ΓΡΑΨΕ ' ΕΥΧΑΡΙΣΤΩ ΠΟΥ ΧΡΗΣΗΜΟΠΟΙΗΣΑΤΕ ΤΟ ΠΡΟΓΡΑΜΜΑ ΜΟΥ'
ΓΡΑΨΕ
ΓΡΑΨΕ ' ΕΠΙΜΕΛΕΙΑ: ΖΑΓΟΡΑΚΗΣ ΔΗΜΗΤΡΗΣ'
ΓΡΑΨΕ ' © 2013 - 2014'
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ