Дана программа, нужно написать код на паскале ABC

Определить, попадает ли точка с координатами (x, y) в заштрихованную область.

(заштрихованая область треугольник с координатами а (-3,0), в (3,0), с (0,2))

Question

Дика

18 октября, 15:55

+5

Ответы (1)

Знаете ответ на вопрос?

Марга · Answer 1

Var x, y:real;

begin

readln (x, y) ;

x:=abs (x) ;

if (x0) and (3*y<6-2*x) then

writeln ('попадает')

else

writeln ('не попадает') ;

end.