program z16_58;
const n=7;
var a,b:string;
i:integer;
c:array[1..n] of integer;
begin
readln(a) ;
b:=' ';
c[1]:=1;
c[2]:=2;
for i:=1 to n do if (i=1) or (i=2) then b:=b+a[i]
else begin c[i]:=c[i-2]+c[i-1]; b:=b+b[c[i]];end;
writeln(b);
end.