удаление строк у массиве, в Паскале я новичок, если можно помогите Опции

[faktorX]

Дан двухмерный массив. Удалить из него две строки, одна из которых расположена
перед s-й строкой, а вторая перед p-й. Вобшем я создал массив, а дальше не знаю,
если можно допишите вот текст

Код

program a1;
    uses crt;
   const n=10;
  var a:array[1..n,1..n] of integer;
  i,j: integer;
begin
clrscr;
  randomize;
  begin
  for i:=1 to n do
  begin
  for j:=1 to n do
  begin
a[i,j]:=random(99)-1;
write(a[i,j]:7);
end;
writeln
end;
readln
end;
end.