Вот: Разработайте алгоритм и напишите программу которая определяет, принадлежность точки с координатами х и у заштрихованной части плоскости
Напишите,пожалуйста в паскале
Заранее большое спасибо!
Напишите,пожалуйста в паскале
Заранее большое спасибо!
Answers & Comments
Verified answer
var
x, y: Real;
begin
WriteLn ('Введите координаты точки x, y: ');
ReadLn (x, y);
if (x >= -1) and (x <= 1) and (y >= 0) and (y <= 1) then
WriteLn ('Точка принадлежит заштрихованной области')
else
WriteLn ('Точка не принадлежит заштрихованной области');
ReadLn;
end.
Program n_1;
var x,y:real;
begin
read(x, y);
if (x>=-1) and (x<=1) and (y>=0) and (y<=1) then write('Yes')
else write('No');
end.