program ggg;
var c,a,b,x2,S:real;n:integer;
Begin
writeln('n=');
readln(n);
if (n mod 5=0) and (1000<=n) and (n<=9999) then
writeln('ydacha')
else
writeln(' ne ydacha');
readln;
end.