Παρασκευή 15 Ιουνίου 2012

Μετατροπές


Δίνεται το παρακάτω σύνολο εντολών
    Διάβασε Χ
    Α <-- Χ
    Κ <-- 1
    Όσο Κ ≤ 100 επανάλαβε
        Αν Κ <= 30 τότε
             Κ <-- Κ+1
        αλλιώς
             Κ <-- Κ+2
        Τέλος_αν
        Α <-- Α+1/Κ
    Τέλος_επανάληψης
    Εμφάνισε Α
Ξαναγράψτε το με ισοδύναμο τρόπο, χρησιμοποιώντας Μέχρις_ότου αντί για Όσο..επανάλαβε και απλές Αν..τότε αντί για την Αν..τότε..αλλιώς


Απάντηση

    Διάβασε Χ
    Α <-- Χ
    Κ <-- 1
    Αρχή_επανάληψης
        Αν Κ <= 30 τότε
             Κ <-- Κ+1
        Τέλος_αν        
        Αν Κ > 30 τότε
             Κ <-- Κ+2
        Τέλος_αν
        Α <-- Α+1/Κ
    Μέχρις_ότου Κ > 100
    Εμφάνισε Α

Δεν υπάρχουν σχόλια:

Δημοσίευση σχολίου