var
s : string;
i, j, len, k : integer;
begin
readln(s);
len := length(s);
for i:=1 to len do
if (ord(s[i]) >= ord('A')) and (ord(s[i]) <= ord('Z')) then
s := chr(ord(s[i]) - ord('A') + ord('a'));
for i:=1 to len do
if (ord(s[i]) < ord('X')) then
s := chr(ord(s[i]) + 3)
else
s := chr(ord(s[i]) - 23);
write(s);
write('/');
for j:=1 to 3 do
begin
i := 1;
while i <= len - j do
begin
s[i] := s[i + j];
i := i + j;
end;
end;
writeln(s);
end. 输入：ABCDEFGuvwxyz
输出：1
