Можно перевести программу с Pascal в Java, пожалуйста

Можно перевести программу с Pascal в Java, пожалуйста
var s1,s2:string;
m1,m2:set of char;
i:integer;
c:char;
begin
writeln('Введите 1 строку');
readln(s1);
m1:=[ ];
for i:=1 to length(s1) do
if not(s1[i] in m1) then include(m1,s1[i]);
writeln('Введите 2 строку');
readln(s2);
m2:=[ ];
for i:=1 to length(s2) do
if not(s2[i] in m2) then include(m2,s2[i]);
m1:=m1*m2;
if m1=[ ] then write('В строках нет одинаковых символов')
else
begin
writeln('Символы, которые есть в обеих строках');
for c:=#0 to #255 do
if c in m1 then write(c);
end;
end.