М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
tigranpesoz3twi
tigranpesoz3twi
31.05.2021 04:36 •  Информатика

Не знаю как решать, , где-то справа от каретки на информационной ленте находится непрерывный массив меток. написать программу для машины поста, которая передвигает каретку в сторону массив меток, проходит по массиву и останавливается в первой пустой ячейке после массива

👇
Ответ:
Каварныи
Каварныи
31.05.2021
1. >>
2. ? 1;3
3. >>
4. ? 5;3
5. !
4,7(85 оценок)
Открыть все ответы
Ответ:
актан9ша
актан9ша
31.05.2021

5 бит

Объяснение:

В палитре 32 цвета, имеющих номера от 0 до 31. Что бы найти глубину цвета, нужно узнать, сколько бит нам понадобится, что бы записать самый большой номер цвета (31). 31 в десятичной системе счислений - это 11111 в двоичной системе. Понадобилось 5 бит. Отсюда ответ - глубина цвета 5 бит.

ИЛИ, то же самое но другими словами, смотря как вам преподавали:

Что бы узнать глубину цвета для палитры из 32 цветов нужно найти, в какую степень надо возвести 2, что бы получилось 32. Это степень 5, потому что 2⁵=32 Показатель степени и будет ответом - 5 бит

4,7(61 оценок)
Ответ:

// PascalABC.NET 3.6.3

uses School;

function Divizors(n: integer): List<integer>;

begin

 var L := new List<integer>;

 L.Add(1);

 L.Add(n);

 if n > 3 then

   begin

   var k := 2;

   while (k * k <= n) and (k < 46341) do

   begin

     if n mod k = 0 then

     begin

       var t := n div k;

       L.Add(k);

       if k < t then L.Add(t)

       else break

     end;  

     Inc(k)

   end;

   L.Sort;

 end;

 Result := L

end;

begin

 // 1

 if ReadInteger.IsPrime then Println('YES')

 else Println('NO');

 // 2

 ReadInteger.Factorize.First.Println;

 // 3

 var a := Divizors(ReadInteger);

 Print(a.Count, a.Sum)

end.

4,5(15 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ