Σειριακή αναζήτηση ενός στοιχείου σε δισδιάστατο πίνακα

Να γραφεί πρόγραμμα το οποίο θα εισάγει 8 ακέραιους αριθμούς σε έναν πίνακα Π[2,4] και στην συνέχεια αφού δώσουμε μια τιμή προς αναζήτηση να ελέγχει αν υπάρχει αυτή η τιμή μέσα στον πίνακα.

ΠΡΟΓΡΑΜΜΑ ΣΕΙΡΙΑΚΗ_ΑΝΑΖΗΤΗΣΗ
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: Ι,Κ,Χ,Π[2,4]
  ΛΟΓΙΚΕΣ: FOUND
ΑΡΧΗ
  ΓΙΑ Ι ΑΠΟ 1 ΜΕΧΡΙ 2      
    ΓΙΑ Κ ΑΠΟ 1 ΜΕΧΡΙ 4
      ΔΙΑΒΑΣΕ Π[Ι,Κ]             
    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ 
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΓΡΑΨΕ 'ΠΑΡΑΚΑΛΩ ΔΩΣΤΕ ΤΙΜΗ ΠΡΟΣ ΑΝΑΖΗΤΗΣΗ'
  ΔΙΑΒΑΣΕ Χ
  FOUND <-- ΨΕΥΔΗΣ      
  Ι <-- 1
  ΟΣΟ Ι<=2 ΚΑΙ FOUND=ΨΕΥΔΗΣ ΕΠΑΝΑΛΑΒΕ
    Κ <-- 1
    ΟΣΟ Κ<=4 ΚΑΙ FOUND=ΨΕΥΔΗΣ ΕΠΑΝΑΛΑΒΕ
      ΑΝ Π[Ι,Κ]=Χ ΤΟΤΕ
        ΓΡΑΨΕ 'ΒΡΕΘΗΚΕ Η ΤΙΜΗ ΣΤΗΝ ΘΕΣΗ:', 'ΓΡΑΜΜΗ ', Ι, 'ΣΤΗΛΗ ', Κ
        FOUND <-- ΑΛΗΘΗΣ
      ΑΛΛΙΩΣ
        Κ <-- Κ+1
      ΤΕΛΟΣ_ΑΝ
    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
    Ι <-- Ι+1
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  ΑΝ FOUND=ΨΕΥΔΗΣ ΤΟΤΕ
    ΓΡΑΨΕ 'Η ΤΙΜΗ ΔΕΝ ΒΡΕΘΗΚΕ ΣΤΟΝ ΠΙΝΑΚΑ'
  ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ