program A;
var c,b,d:real; F:file;
begin
assign (F,'count.in');
reset (F);
seek (F,0);
readln (c);
seek (F,1);
readln (b);
if c:=b then
d:=1;
writeln (' ',d:1:0);
readln;
end.