Перевести этот код pascal на java const n=20; var x: array[1..100] of integer; i,w,l,d: integer; begin for i: =1 to n do begin readln(x[i]); if x[i]=1 then inc(d); if x[i]=2 then inc(l); if x[i]=3 then inc(w); end; writeln('��ë-�î ��������é: ',w); writeln('��ë-�î ���������é: ',l); writeln('��ë-�î �����õ: ',d); readln end.

Pascal на Java%0AConst%0An=20;%0AVar%0Ax: Array[1..100] of Integer;%0Ai,w,l,d: Integer;%0ABEGIN%0AFor i:=1 to n do%0Abegin%0A  Readln(x[i]);%0A  If x[i]=1 Then Inc(d);%0A  If x[i]=2 Then Inc(l);%0A  If x[i]=3 Then Inc(w);%0Aend;%0AWriteln('��ë-�î ��������é: ',w);%0AWriteln('��ë-�î ���������é: ',l);%0AWriteln('��ë-�î �����õ: ',d);%0AReadln%0AEND.