Требовалось написать программу, которая вводит с клавиатуры координаты точки на плоскости (x, y – действительные числа) и определяет принадлежность точки заштрихованной области, включая ее границы. программист торопился и написал программу неправильно. вот она: var x, y: real; begin readln(x, y); if x > = 0 then if y < = 1 then if (x*x + y*y < = 1) and (y > = x-1) then write('принадлежит') else write('не принадлежит'); end. надо ёё зделать правильно