Ну, примерно так. можно решить и по-другому
<span>Цвет в модели HSB описывается при помощи трех параметров: тона, насыщенности и яркости. Тон — это конкретный оттенок цвета. Насыщенность характеризует его интенсивность, или чистоту. Яркость же зависит от количества черной краски, добавленной к данному цвету.
Эту модель для наглядности можно представить в виде цилиндра, где длина окружности, образующей основание, соответствует параметру тона, радиус основания — оси изменения насыщенности, а высота боковой поверхности — оси изменения яркости (рис. 7.3). </span><span>Рис. 7.3. Представление цветовой модели HSB</span><span>
Значение цвета задается вектором, выходящим из центра окружности. Точка в центре соответствует белому цвету, а точки на границе окружности — чистым цветам. Направление вектора определяет цветовой оттенок и указывается в угловых градусах. Длина вектора определяет насыщенность цвета. Яркость цвета задается на отдельной оси. Таким образом, значение тона измеряется в градусах от 0 до 360, а значения насыщенности и яркости — в процентах от 0 до 100. Эта модель более удобна, чем другие, так как она хорошо согласуется с принципом восприятия цвета человеком, и наиболее проста для понимания: сначала можно определить цветовой тон, а затем задать ему насыщенность и яркость. Но, к сожалению, эта модель не самая удобная для использования в издательских системах, поэтому на практике она применяется мало. Вместе с тем цвет в Photoshop вы выбираете, используя модель HSB, при этом можете видеть в соответствующих полях и цифровые значения моделей RGB и CMYK. </span>
<span />
Ответ:
float x, y;
cout << "Input x: "; cin >> x;
cout << "Input y: "; cin >> y;
if(x >= -2 && x <= 0 && y <= 2 - x && y >= x * x ||
x > 0 && x <= 2 && y <= 2 - x && y >= 0)
{
cout << "point enters area";
}
else
{
cout << "point does not enter the area";
}
using System;
namespace ConsoleApp1
{
class Program
{
static void Main(string[] args)
{
double x;
Console.WriteLine("Введите X");
x = double.Parse(Console.ReadLine());
if (x <= 3) x = x * x - 3 * x + 9;
else if (x > 3) x = 1 / (x * x * x + 6);
Console.WriteLine(x);
}
}
}
Sub maxZn()
'заполнение массива
Dim mas(20)
S = ""
Randomize
For i = 1 To 20
mas(i) = Round(Rnd(100) * 100)
S = S + Str(mas(i)) + ","
Next i
'поиск максимального числа и количества его повторений
qty = 1
max = mas(1) 'предполагаем, что максимальное число в первом элементе массива
For i = 2 To 20
If mas(i) = max Then
qty = qty + 1
End If
If mas(i) > max Then
max = mas(i)
qty = 1
End If
Next i
MsgBox "последовательность чисел " + S
MsgBox "максимальное число " + Str(max) + "число повторений " + Str(qty)
End Sub
<span>Sub test()
Call maxZnEnd
Sub</span>