В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
yourname7
yourname7
24.03.2020 13:52 •  Информатика

Вопрос про RGB яркость и насыщенность. Всем привет! Сегодня у меня появилась одна проблема — мне нужно изменить яркость и насыщенность RGB цвета.

Так как, я недавно познакомился с этими RGB цветами могу где-то, что-то назвать неправильно)))

Вот моя задача:
Мне дано 2 цвета, и нужно проверить их равенство. Например вот этих цветов:
5783584 и 4732944
(идеально белый цвет 16316656)
(идеально черный цвет 0)

Но почему мне это нужно? Так как, с камеры картинка немного барахлит, яркость отдельных пикселей постоянно меняется и мне нужно каждый пиксель сделать максимально ярким, что-бы точно удостоверится в их равенстве.

Может, кто нибудь знает формулу?
(Желательно оптимизированную)
Наверное это не совсем RGB... Но вопрос остаётся вопросом!

Показать ответ
Ответ:
777496
777496
28.06.2020 19:23

вот 3 варианта решения задачи:

1. с временной целочисленной переменной вместо булеан.

var

   a, f : integer;

begin

   write('введите число: ');

   readln(a);

   while a div 10 > 0 do begin

       if (a mod 10) >= ((a mod 100) div 10) then f := 1;

       a := a div 10;

   end;

   if f = 0 then writeln('ДА') else writeln('НЕТ');

end.

2. с строчной переменной которой присваивается текст ответа.

var

   a : integer;

   f : string := 'ДА';

begin

   write('введите число: ');

   readln(a);

   while a div 10 > 0 do begin

       if (a mod 10) >= ((a mod 100) div 10) then f := 'НЕТ';

       a := a div 10;

   end;

   writeln(f);

end.

3. без дополнительных переменных но с оператором break.

var

   a : integer;

begin

   write('введите число: ');

   readln(a);

   while a div 10 > 0 do begin

       if (a mod 10) >= ((a mod 100) div 10) then begin

           writeln('НЕТ');

           break;

       end;

       a := a div 10;

       if a < 10 then writeln('ДА');

   end;

end.

0,0(0 оценок)
Ответ:
nysha046
nysha046
06.11.2022 20:32

<body>

<p>

<font color="blue"> Декабрь, январь, и февраль – зимние месяцы.</font>

</p>

<p>

<font color="green"> Март, апрель и май – весенние месяцы. </font>

</p>

<p>

<font color="yelow"> Июнь, июль и август – летние месяцы. </font>

</p>

<p>

<font color="orange"> Сентябрь, октябрь, ноябрь – осенние месяцы. </font>

</p>

Объяснение:

<font color="..."> Вместо троиточия код цвета можешь поставить </font>

<p>Это абзац</p>

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота