function reserve(n :integer) :integer; var digit, i :integer; sign :boolean; begin digit:= 0; if n < 0 then begin sign:= false; n *= -1; end else sign:= true; while n > 0 do begin i:= n mod 10; digit:= digit*10 + i; n:= n div 10; end; if sign then reserve:= digit else reserve:= digit * -1; end; var n :integer; begin readln(n); writeln(reserve(n)); end.