[WaReZ_MEN]

В условиях необходима ставить скобки

...
if (X>=a[1,n]) and (X<=(a[1,n]+20)) and (Y>=a[2,n]) and (Y<=(a[2,n]+20))
...