Задание: составить программу, которая печатает true если точка с координатами x y принадлежит заданным закрашенным областям показанным на рисунках по таблице 5.1
30 секунд в поиске, результат готов, иди тести var x, y: real; begin Write('Введите через пробел координаты точки (x,y): '); Readln(x, y); Writeln((x >= 0) and (y >= x - 6) and (sqr(x) + sqr(y) <= 36)) end. Код var x, y: real; begin Write('Введите через пробел координаты точки (x,y): '); Readln(x, y); Writeln((x >= 0) and (y >= x - 6) and (sqr(x) + sqr(y) <= 36)) end.