Задача на матрицу

[VNS]

Привет всем

Вот уже несколько дней не могу решить задачу.
Текст задачи:
В произвольно заданной матрице А размера 5х4 определить минимальный элемент и обнулить значение элементов, расположенных ниже и правее найденного элемента.

Минимальный элемент я нахожу, а вот как обнулить значение элементов, расположенных ниже и правее найденного элемента я не знаю

Вот что я уже сделал:
program masiv2;
var i,j:integer;
min,k:integer;
m:array [1..5,1..4] of integer;
begin
for i:=1 to 5 do
for j:=1 to 4 do
read(m[i,j]);
min:=m[i,j];
i:=1;
j:=1;
for i:=1 to 5 do
for j:=1 to 4 do
if m[i,j]<min then begin
min:=m[i,j];
end;
writeln('minimalnoe zna4enie ravno - ',min);
end.

А дальше не знаю

Помогите пожалуйста
Заранее благодарю

[Sweta]

Программировать на Паскале не умею.
При нажождении минимального элемента запоминайте номер строки и столбца. Потом в цикле, если значение столбца больше значения столбца минимального элемента или строка больше строки минимального элемента, присвойте элементу значение 0.

[Zempery]

Для 2ой задачи

организуй цикл и от min элемента и до конца, каждому элементу присваивай 0