Напишите программку на Паскале вывода значения true, если точка с

Напишите программу на Паскале вывода значения true, если точка с данными координатами (х,у) лежит снутри заштрихованной области и false, если не лежит

Задать свой вопрос
2 ответа
Var x,y:real;
begin
write('x, y: ');
readln(x,y);
if (ylt;=0)and(ygt;=1.5*x-6)and(ygt;=-1.5*x-6)
 then writeln('Да') else writeln('Нет');
end.

Пример:
x, y: 1 -2
Да
Var
x,y:real;
Begin
Write('x = ');ReadLn(x);
Write('y = ');ReadLn(y);
if ylt;=0 then
   Begin
   if xlt;0 then Write(ygt;=1.5*x-6)
   else Write(ygt;=-1.5*x-6)
   End
else Write(false);
End.
Софья
x=1, y=2 ?
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт