переведите с pascal в java

for i := 1 to 9 do readln(w[i]);

for i := 11 to 19 do readln(w[i]);

for i := 1 to 9 do readln(w[10*i]);

{строим полный словарь}

for i := 2 to 9 do begin

for j := 1 to 9 do begin

w[10*i + j] := w[10*i]+ ' ' + w[j];