program sytringes;
var s:string;
    h:byte absolute s;
begin
     readln(s);
     writeln(h);
     readln
end.