Άθροισμα στοιχείων ανά στήλη σε δισδιάστατο πίνακα

Να γραφεί πρόγραμμα το οποίο θα εισάγει σε έναν πίνακα 3 γραμμών και τεσσάρων στηλών τις παρακάτω τιμές και στην συνέχεια θα υπολογίζει και θα εμφανίζει το άθροισμα ανά στήλη.

ΠΡΟΓΡΑΜΜΑ ΑΘΡΟΙΣΜΑ_ΣΤΟΙΧΕΙΩΝ_ΑΝΑ_ΣΤΗΛΗ
ΜΕΤΑΒΛΗΤΕΣ 

 ΑΚΕΡΑΙΕΣ: Ι,Κ, Π[3,4],SUM 

ΑΡΧΗ 

 ΓΙΑ Ι ΑΠΟ 1 ΜΕΧΡΙ 3 ! Ι ο δείκτης των γραμμών 

    ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΑ ΣΤΟΙΧΕΙΑ ΤΗΣ ΓΡΑΜΜΗΣ', Ι 

    ΓΙΑ Κ ΑΠΟ 1 ΜΕΧΡΙ 4 ! Κ ο δείκτης των στηλών 

       ΔΙΑΒΑΣΕ Π[Ι,Κ] 

    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ 

 ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ 

 ΓΙΑ Κ ΑΠΟ 1 ΜΕΧΡΙ 4 ! Κ ο δείκτης των στηλών 

    SUM <-- 0 !σε κάθε στήλη αρχικοποιούμε την μεταβλητή SUM 

    ΓΙΑ Ι ΑΠΟ 1 ΜΕΧΡΙ 3 ! Ι ο δείκτης των γραμμών 

       SUM <-- SUM+Π[Ι,Κ] !υπολογίζουμε το άθροισμα της γραμμής 

    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ 

 ΓΡΑΨΕ 'ΤΟ ΑΘΡΟΙΣΜΑ ΤΗΣ ΣΤΗΛΗΣ', Κ,':',SUM !εμφανίζουμε το άθροισμά ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ 

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ