Εύρεση μέγιστου στοιχείου ανά γραμμή σε δισδιάστατο πίνακα

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

ΠΡΟΓΡΑΜΜΑ ΜΕΓΙΣΤΟ_ΓΡΑΜΜΗΣ
ΜΕΤΑΒΛΗΤΕΣ 
ΑΚΕΡΑΙΕΣ: Ι,Κ,Π[3,4],ΜΑΧ
ΑΡΧΗ
ΓΙΑ Ι ΑΠΟ 1 ΜΕΧΡΙ 3 ! Ι ο δείκτης των γραμμών
   ΓΡΑΨΕ 'ΔΩΣΤΕ ΤΑ ΣΤΟΙΧΕΙΑ ΤΗΣ ΓΡΑΜΜΗΣ', Ι
   ΓΙΑ Κ ΑΠΟ 1 ΜΕΧΡΙ 4 ! Κ ο δείκτης των στηλών
       ΔΙΑΒΑΣΕ Π[Ι,Κ]
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ Ι ΑΠΟ 1 ΜΕΧΡΙ 3
   ΜΑΧ <-- Π[Ι,1] !θέτουμε ως max το 1ο στοιχείο κάθε γραμμής
   ΓΙΑ Κ ΑΠΟ 2 ΜΕΧΡΙ 4 !συγκρίνουμε το max με τα υπόλοιπα στοιχεία της γραμμής
       ΑΝ Π[Ι,Κ]>ΜΑΧ ΤΟΤΕ
         ΜΑΧ <-- Π[Ι,Κ] !κάθε μεγαλύτερη τιμή την θέτουμε max 
      ΤΕΛΟΣ_ΑΝ
   ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
   ΓΡΑΨΕ 'ΜΕΓΙΣΤΟ ΣΤΟΙΧΕΙΟ ΤΗΣ ΓΡΑΜΜΗΣ', Ι, ':', ΜΑΧ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ