Question

(PASCAL) написать программу которая вводит с клавиатуры координаты точки(x,y) И ОПРЕДЕЛЯЕТ ПОПАДАЕТ ЛИ ТОЧКА В ЗАШТРИХОВАННУЮ ОБЛАСТЬ НА РИСУНКЕ(8)

Answer 1

var x,y: real;

begin

readln(x,y);

if (y>=2)and(x*x+y*y>=4*4)and(x*x+y*y<=6*6)

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

else writeln('Не попадает');

end.

Пример:

2 5

Попадает