перевод программы с Pascal на Java

[christa]

Здравствуйте! Помогите, пожалуйста, перевести программу с Pascal на JAVA!

Сама задача: пользователь вводит целое число, надо его проверить на наличие хотя бы двух одинаковых цифр и вывести результат работы на экран. Само число вводит пользователь.

                    uses crt;
                    var c:char; st:string; k,s,i:byte;
                    begin clrscr;
                    k:=0;
                    writeln('vvedite chislo');
                    while c<>#13 do begin
                     read(c); st:=st+c; end;
                    s:=length(st);
                    for i:=1 to s do
                        if st[i]=st[i+1] then k:=k+1;
                    if k>0 then writeln('est') else writeln('net');
                          readkey end.

[christa]

кто поможет - небольшое денежное вознаграждение, стучать в ICQ 3119819