что такое answ в этом коде!

[Rondo]

program Matr_nxm;

{$APPTYPE CONSOLE}

uses
  SysUtils, math;

  const maxindx=10;   {максимум размерности матрицы}
Var
i,j,m,n,answ:integer;
a:array [1..maxindx,1..maxindx] of integer; // Matrix
b:array [1..maxindx] of longint; //столбец произведений

begin

writeln('V-te kol-vo n <=',maxindx);
readln(n);  if n>maxindx then n:=maxindx;
writeln('V-te kol-vo m <=',maxindx);
readln(m);  if m>maxindx then m:=maxindx;

writeln ('v-te matrix (by row)');   {ввод по строкам 1,2... }
for i:=1 to n do            {цикл по строкам}
for j:=1 to m do            {цикл по столбцам}
read(a[i,j]);

writeln;
writeln('Vasha matrix');     {Вывод массива}
for i:=1 to n do
  begin
    for j:=1 to m do
    write('   ',a[i,j]);
    writeln;
  end;

answ:=1;
for i:=1 to n do begin
b[i]:=1;
for j:=1 to m do  b[i]:=b[i]*a[i,j];
if b[i]<b[answ] then answ:=i;
end;

writeln;
writeln('Answer: ',answ);
Readln; Readln;
end.

---------------------------------------
можно поподробней что делает answ!?

[Stilet]

answ это переменка, которая получает индекс минимального элемента в массиве