Question

помогите перевести этот код 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.

Answer 1

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.