Analise o programa Delphi abaixo:

program Project1; {$APPTYPE CONSOLE}

uses

SysUtils;

var

a: Array [1..3,1..3] of integer; i,j: integer;

begin

for i:=1 to 3 do begin

for j:=3 downto 1 do begin

a[i,j] := abs(i-j); write(‘a[‘ + inttostr(i) + ‘,’ +

inttostr(j) + ‘] := ‘ + inttostr(a[i,j]) + ‘ ‘);

end; writeln(‘’);

end;

end.

Está CORRETA a opção que corresponde à saída gerada pelo programa: