люди уважающие паскаль отзовитесь!

[Минька]

Привет! СПАСИБО за отзыв!
В матрице удалить строку по указанному номеру.
{4 строки,3 столбика,запрос строки,удаление по номеру}
Пожалуйста! помогите!
СПАСИБО!www.7luc-MuwymkuH@rambler.ru

[Virtson]

procedure DeleteLine(n: integer; var m: matrix);
var i, j: integer;
begin
  dec(nnn); // кол -во строк
  for i:= n to nnn do
    for j:= 1 to 3 do
      m[i,j]:= m[i+1,j];
end;