Σάββατο 26 Φεβρουαρίου 2011

Άσκηση: συγγραφή διαδικασίας

Γράψτε διαδικασία που υπολογίζει το άθροισμα και το
γινόμενο των τιμών του πραγματικού πίνακα Α[9, 18].

Λύση

     ΔΙΑΔΙΚΑΣΙΑ ΑΘΡΓΙΝ(Α, σ, γ)
     ΜΕΤΑΒΛΗΤΕΣ
            ΠΡΑΓΜΑΤΙΚΕΣ: Α[9, 18], σ, γ
            ΑΚΕΡΑΙΕΣ: κ, λ
     ΑΡΧΗ
            σ <-- 0
            γ <-- 1
            ΓΙΑ κ ΑΠΟ 1 ΜΕΧΡΙ 9
                 ΓΙΑ λ ΑΠΟ 1 ΜΕΧΡΙ 18
                       σ <-- σ+Α[κ, λ]
                       γ <-- γ*Α[κ, λ]
                 ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
            ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
     ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
      

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

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