Записать массив. Перевести с Pascal - C (СИ)

Формулировка задачи:

program pr_5;
 
var
  min, max: integer;
  A: array[1..5, 1..10] of integer;
  i, j, n, m, Nmin, Mmin, Nmax, Mmax: byte;
 
begin
  n := 5;
  m := 10;
  for i := 1 to n do
    for j := 1 to m do
      A[i, j] := random(50);
  min := A[i, j];
  Nmin := 1;
  Mmin := 1;
  for i := 1 to 5 do
    for j := 1 to 10 do
      if A[i, j] < min then
      begin
        min := A[i, j];
        Nmin := i;
        Mmin := j;
      end;
  max := A[i, j];
  Nmax := 1;
  Mmax := 1;
  for i := 1 to n do
    for j := 1 to m do
      if A[i, j] > max then
      begin
        max := A[i, j];
        Nmax := i;
        Mmax := j;
      end;
  A[Nmax, Mmax] := min;
  A[Nmin, Mmin] := max;
  for i := 1 to 5 do
  begin
    for j := 1 to 10 do
      write(A[i, j]:5);
    writeln;
  end;
end.

Решение задачи: «Записать массив. Перевести с Pascal»

Листинг программы

  for i := 1 to n do
    for j := 1 to m do
      A[i, j] := random(50);
  min := A[i, j];

Объяснение кода листинга программы

Объявляется два вложенных цикла, первый цикл идет от i=1 до n, второй от j=1 до m.
В каждой итерации циклов, значение переменной A[i, j] присваивается случайное число от 0 до 49.
После завершения циклов, в переменной min хранится минимальное значение из всех элементов массива A.
min представляет собой одно из значений массива A.
Возможно, после выполнения данного кода, в переменной min будет храниться наименьшее значение из всех элементов массива A.