var s: string; i: integer; b: boolean;
begin
readln(s);
b:=false;
for i:=1 to length(s) do
if (s[i] >= '0')and(s[i] <= '9') then b:=true;
writeln(b);
end.
var s: string; i: integer; b: boolean;
begin
readln(s);
b:=false;
for i:=1 to length(s) do
if (s[i] >= '0')and(s[i] <= '9') then b:=true;
writeln(b);
end.