Информатика кто может составить программу срочно
Pascal ABC

var x,y:real;begin writeln('Введите координаты через пробел : '); read(x,y); if(x<2) and (x>0) and (y<5) and (y>-3) then writeln('Да') else writeln ('Нет');end.