program raize;
var
x,d,e :integer;
begin
readln(x);
e := x mod 10;
x := x div 10;
d := x mod 10;
if d >e then
write('Да!')
else
write('Нет!')
end.
program raize;
var
x,d,e :integer;
begin
readln(x);
e := x mod 10;
x := x div 10;
d := x mod 10;
if d >e then
write('Да!')
else
write('Нет!')
end.