частин, кожна з яких описується системою нерівностей. p align="justify">-а частина:
х <0; л; 2 +. у 2 <9; у> - х-3.
-а частина:
х> 0; х 2 + у 2 <25.
Точка з координатами (х, у) лежить в заштрихованої області, якщо вона належить 1-й або 2-ї частини.
Програма вводить координати точки, обчислює логічне вираз, що визначає приналежність точки області, і виводить отриману логічну величину на екран.
Program Point;
var X, Y: real; L: boolean; ('Введіть X:'); readln (X); ('Введіть Y:'); readln (Y);: = (X <= 0) and (Sqr (X) + Sqr (Y) <= 9) and (Y> =-X-3) (X> = 0) and (Sqr (X) + Sqr ( Y) <= 25) ('Точка лежить в заданій області?', L)
end.