Помогите с задачей на Паскале

Приложения:

Ответы

Ответ дал: roookky
0
var x,y:real;
begin
readln(x,y);
if (y<2) and (y>0) and (x>0) and (y>sin(x)/cos(x)) then writeln('Принадлежит')
else writeln('Не принадлежит')
end.
Ответ дал: ghj134
0
это к 17 варианту?
Ответ дал: roookky
0
да
Похожие вопросы