program mn;
uses crt;
var n:integer;
function del(var a:integer):string;
var s:integer;
begin
s:=0;
While a>=1 do
begin
s:=s+a mod 10;
a:=a div 10;
end;
if s mod 9 =0
then del:='delitsja'
else del:='net';
end;
BEGIN
ClrScr;
Write('N:');readln(n);
writeln(del(n));
readln;
END.