Работа 3.3 Упр.12 Задание 2 ГДЗ Семакин 10 класс (Информатика)

Задача

Совет дня! Чтобы не спалиться на списывании, сайт решак.ру рекомендует максимально изменять тексты сочинений «под себя», изменять имена собственные, города, подбирать синонимы.

Подробный ответ

В программе проверяется, принадлежит ли точка области, заданной условиями:

$$x \ge 0,\quad y \ge 0,\quad x^2+y^2 \le 36$$

или

$$x \ge 0,\quad y \ge 0,\quad x \le 6-y.$$

То есть точка должна лежать в первой четверти и удовлетворять хотя бы одному из двух неравенств.

Var x,y : real;
begin
  writeln(‘Введите координаты точки x, y’);
  read(x, y);
  if ((x>=0) and (y>=0) and (x*x + y*y<=36)) or ((x>=0) and (y>=0) and (x<=6-y))
  then Writeln(‘Да’)
  else Writeln(‘Нет’)
end.

Программа выводит «Да», если точка принадлежит указанной области, и «Нет» — если не принадлежит.