Segrif
Задание Е ведь, верно? Это логическое выражение на паскале, истинное, если точка (x,y) принадлежит к фигуре Саму фигуру можно разбить, как видите, на 2 уравнения. |2y| <= x+2 при x<0 и x^2 + y^2 <= 1 при x >= 0 Я просто не стал писать условие (x >= 0), т.к. результат тот же
Segrif
Я не знаю, какая требуется программа. Можете написать что-нибудь вроде
if x < 0 then if 2*abs(y) <= x + 2 then writeln('Принадлежит') else writeln('Не принадлежит') else if sqr(x) + sqr(y) <= 1 then writeln('Принадлежит') else writeln('Не принадлежит')
или
if x < 0 then t := 2*abs(y) <= x + 2 else t := sqr(x) + sqr(y) <= 1; if t then writeln('Принадлежит') else writeln('Не принадлежит')
Answers & Comments
Саму фигуру можно разбить, как видите, на 2 уравнения. |2y| <= x+2 при x<0 и x^2 + y^2 <= 1 при x >= 0
Я просто не стал писать условие (x >= 0), т.к. результат тот же
if x < 0 then
if 2*abs(y) <= x + 2 then
writeln('Принадлежит')
else
writeln('Не принадлежит')
else
if sqr(x) + sqr(y) <= 1 then
writeln('Принадлежит')
else
writeln('Не принадлежит')
или
if x < 0 then
t := 2*abs(y) <= x + 2
else
t := sqr(x) + sqr(y) <= 1;
if t then
writeln('Принадлежит')
else
writeln('Не принадлежит')