Converter Pascal P/ Java

[tiago_br]

Eae galera, to precisando de uma ajudinha aqui. Achei na internet um exercício resolvido sobre a minha questão, porém é em pascal, será que alguém consegue converter em java ?

PROGRAM aeroporto;

VAR mat: array [1..100,1..100] of integer;

total,sai,cheg: array[1..100] of integer;

A,V:integer;

i,j:integer;

x,y:integer;

max: integer;

BEGIN

WRITELN('digite o n�mero de aeroportos e o n�mero de v�os');

READ(A); {ler numero de aeroportos}

READLN(V); {ler n�mero de v�os}

{zerar a matriz mat}

FOR i:=1 TO A DO BEGIN

FOR j:=1 TO A DO BEGIN

mat[j]:=0;

END;

END;

{ler x, y e acrecentar 1 na matriz se existir v�o de x para y}

Writeln('para cada v�o digite o origem e o destino na mesma linha');

FOR i:=1 to V DO BEGIN

READLN(x,y);

mat[x][y]:=mat[x][y]+1;

END;

{somar as saidas do aeroporto i}

FOR i:=1 TO A DO BEGIN

sai:=0;

FOR j:=1 TO A DO BEGIN

sai:=sai+mat[j];

END;

END;

{somar as chegadas ao aeroporto j}

FOR j:=1 TO A DO BEGIN

cheg[j]:=0;

FOR i:=1 TO A DO BEGIN

cheg[j]:=cheg[j]+mat[j];

END;

END;

{procurar o valor maximo da soma de chegadas e saidas}

max:=0;

FOR i:=1 TO A DO BEGIN

total:=cheg+sai;

IF(total>max) THEN max:=total;

END;

{imprimir os aeroportos congestionados}

WRITELN(' Os aeroportos congestionados:');

FOR i:=1 TO A DO BEGIN

IF(max=total) THEN WRITE(i, ' ');

END;

WRITELN; {quebra linha}

END.