ΠΡΟΓΡΑΜΜΑ ΠΑΡΑΓΟΝΤΙΚΟ_ΑΣΚΗΣΗ ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: χ, κ ΑΡΧΗ ΔΙΑΒΑΣΕ χ κ <- παραγοντικο(χ) ΓΡΑΨΕ κ ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ ΣΥΝΑΡΤΗΣΗ παραγοντικο(χ): ΑΚΕΡΑΙΑ ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: χ ΑΡΧΗ ΑΝ χ = 0 ΤΟΤΕ παραγοντικο <- 1 ΑΛΛΙΩΣ χ <- χ*παραγοντικο(χ - 1) παραγοντικο <- χ ΤΕΛΟΣ_ΑΝ ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ