ΠΡΟΓΡΑΜΜΑ ΥψωσηΣεΔυναμη ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: υ, ι ΠΡΑΓΜΑΤΙΚΕΣ: γινομενο, χ ΑΡΧΗ ΓΡΑΨΕ "δωσε τα χ,υ" ΔΙΑΒΑΣΕ χ, υ ΟΣΟ (χ = 0 ΚΑΙ υ = 0) Η (χ = 0 ΚΑΙ υ < 0) ΕΠΑΝΑΛΑΒΕ ΓΡΑΨΕ "δεν ισχυει η πραξη ", χ, " στην ", υ ΔΙΑΒΑΣΕ χ, υ ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ γινομενο <- 1 ΓΙΑ ι ΑΠΟ 1 ΜΕΧΡΙ Α_Τ(υ) γινομενο <- γινομενο*χ ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΑΝ υ < 0 ΤΟΤΕ γινομενο <- 1/γινομενο ΤΕΛΟΣ_ΑΝ ΓΡΑΨΕ χ, "^", υ, "=", γινομενο ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ