Надо написать программу в abcpaskal.

Попробуй так: const   nmax=100; var   a: array[1..nmax,1..nmax] of integer;   i,j,m,n,min,max,i_max,j_max,i_min,j_min,tmp: integer; begin   randomize;   write('введите размеры массива m, n: ');   readln(m,n);   writeln('исходная матрица: ');   for i: =1 to m do   begin     for j: =1 to n do     begin       a[i,j]: =random(99)+1;       write(a[i,j]: 4);     end;     writeln;   end;   writeln;     min: =a[1,1]; max: =a[1,1];   i_min: =1; j_min: =1; i_max: =1; j_max: =1;     for i: =1 to m do     for j: =1 to n do     begin       if a[i,j]> max then       begin         max: =a[i,j];         i_max: =i;         j_max: =j;       end;       if a[i,j]< min then       begin         min: =a[i,j];         i_min: =i;         j_min: =j;       end;     end;     writeln('максимальный элемент: ',max,'[',i_max,',',j_max,']');   writeln('минимальный элемент: ',min,'[',i_min,',',j_min,']');   tmp: =a[i_min,j_min];   a[i_min,j_min]: =a[i_max,j_max];   a[i_max,j_max]: =tmp;     writeln('полученная матрица: ');   for i: =1 to m do   begin     for j: =1 to n do       write(a[i,j]: 4);     writeln;   end;   readln; end.

Выполнение - активное состояние процесса, во время которого процесс обладает всеми необходимыми ресурсами и непосредственно выполняется процессором; ожидание - пассивное состояние процесса, процесс заблокирован, он не может выполняться по своим внутренним причинам, он ждет осуществления некоторого события, например, завершения операции ввода-вывода, получения сообщения от другого процесса, освобождения какого-либо необходимого ему ресурса; готовность - также пассивное состояние процесса, но в этом случае процесс заблокирован в связи с внешними по отношению к нему обстоятельствами: процесс имеет все требуемые для него ресурсы, он готов выполняться, однако процессор занят выполнением другого процесса.