program mn;
uses crt;
var a,b:longint;
aa,bb,c:set of 1..9;i,k:integer;
l:string;
BEGIN ClrScr;
Write('a,b:');readln(a,b);
While a>=1 do begin aa:=aa+[a mod 10];
a:=a div 10;
end;
While b>=1 do begin bb:=bb+[b mod 10];
b:=b div 10;
end;
c:=bb*aa;
l:='net';
for i:=1 to 9 do if i in c then l:='da';
writeln(l);
readln;
END.