Разбиваем заштрихованную область на контуры, ограниченные линиями, уравнения которых мы можем написать. Считаем, что сами линии (границы области) тоже входят в нее. Если это не так, все неравенства, указанные ниже, должны быть строгими.
В I четверти:
Контур - окружность. Уравнение окружности x² + y² = r².
Из графика видно, что r = 6, поэтому все, что лежит внутри круга и на нем, удовлетворяет уравнению x² + y² ≤ 6² или x² + y² ≤ 36
Принадлежность I четверти определяется условием (x ≥ 0) и (y ≥ 0).
Получаем логическое выражение (x² + y² ≤ 36) ∧ (x ≥ 0) ∧ (y ≥ 0)
В IV четверти:
Контур - прямоугольный треугольник. В соответствии с графиком уравнение его гипотенузы y = x - 6.
Принадлежность IV четверти определяется условием (x ≥ 0) и (y ≤ 0).
Получаем логическое выражение (y ≥ x - 6) ∧ (x ≥ 0) ∧ (y ≤ 0)
Точка, принадлежащая заштрихованной области или её контуру, может находиться в одной из рассмотренных выше четвертей, поэтому полученные логические выражения объединяем через ИЛИ:
[(x² + y² ≤ 36) ∧ (x ≥ 0) ∧ (y ≥ 0)] ∨ [(y ≥ x - 6) ∧ (x ≥ 0) ∧ (y ≤ 0)]
Сделаем упрощение:
(x ≥ 0) ∧ { [ (x² + y² ≤ 36) ∧ (y ≥ 0) ] ∨ [ (y ≥ x - 6) ∧ (y ≤ 0) ] }
С учетом старшинства логических операций можно часть скобок опустить
(x ≥ 0) ∧ [ (x² + y² ≤ 36) ∧ (y ≥ 0) ∨ (y ≥ x - 6) ∧ (y ≤ 0) ]
В языке Паскаль это выражение запишется так:
(x>=0) and ((x*x+y*y<=36) and (y>=0) or (y>=x-6) and (y<=0))
Теперь несложно написать саму программу.
<em>// PascalABC.NET 3.3, сборка 1576 от 16.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var (x,y):=ReadReal2('Введите через пробел x и y:');
Writeln((x>=0) and ((x*x+y*y<=36) and (y>=0) or (y>=x-6) and (y<=0)))
end.
<u>Примеры</u>
Введите через пробел x и y: 3 2.5
True
Введите через пробел x и y: 6 0
True
Введите через пробел x и y: 5.8 3
False
Введите через пробел x и y: 3 -2
True
Введите через пробел x и y: 4 -3
False
2) Правильный треугольник.
Если бы задание было
Повтори 6 [Направо 60 Вперед 20]
тогда был бы ответ (1).
В данном случае черепашка:
первый повтор -
повернёт на 60°
пройдёт 20
повернёт на 60°
второй повтор -
повернёт на 60° <-- Это и последний поворот предыдущего повтора вместе дают 120°
пройдёт 20
повернёт на 60°
третий повтор -
повернёт на 60° <-- Это и последний поворот предыдущего повтора вместе дают 120°
пройдёт 20 <-- Вот точка, из которой черепашка отправилась в путь
повернёт на 60°
четвёртый повтор -
повернёт на 60° <-- Это и последний поворот предыдущего повтора вместе дают 120°
пройдёт 20 <-- Вот точка, в которой была черепашка после того, как прошла 20 шагов в первый раз!
повернёт на 60°
Один цвет по сути есть символ, а всё сообщение есть просто 3-буквенное слово. Из M = 3 различных символов можно сосатвить Q = MN<span> слов длиной N = 3, т. е. 3</span>3<span> = 27 слов.
Ответ: 27</span>
Признак деления числа на 10, если натуральное число оканчивается на 0, значит число делится на 10
