Cod sursa(job #636275)

Utilizator RaileanuCristian Raileanu Raileanu Data 19 noiembrie 2011 18:14:57
Problema ChatNoir Scor 100
Compilator fpc Status done
Runda .com 2011 Marime 0.56 kb
Program chat_noir;
var t,n,m,x,y, i,dmin : longint;
    f1,f2: text;

Begin
     assign(f1, 'chatnoir.in');
     assign(f2, 'chatnoir.out');
     reset(f1); rewrite(f2);
     readln(f1, t);
     for i:=1 to t do
         Begin
              readln(f1,n,m,x,y);
              dmin:=x;
              if y<dmin then dmin:=y;
              if (n-x+1)<dmin then dmin:=n-x+1;
              if (m-y+1)<dmin then dmin:=m-y+1;
              if dmin>=6 then writeln(f2, 'NU')
              else writeln(f2,'DA');
         end;
     close(f1); close(f2);
end.