Μετατροπές

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

Απάντηση

    Διάβασε Χ

    Α <-- Χ

    Κ <-- 1

    Αρχή_επανάληψης

        Αν Κ <= 30 τότε

             Κ <-- Κ+1

        Τέλος_αν        

        Αν Κ > 30 τότε

             Κ <-- Κ+2

        Τέλος_αν

        Α <-- Α+1/Κ

    Μέχρις_ότου Κ > 100

    Εμφάνισε Α