var cislo : longint;
i : integer;

begin
	readln(cislo);
	
	for i := 0 to 5 do
	begin
		write(cislo[i]);
	end;
	
	writeln(cislo);
end.