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

закодировать слова «бес нәрседен қашық бол» с кодов только чтоб правильно было.

Показать ответ
Ответ:
Rafaelnodat1
Rafaelnodat1
20.09.2020 02:21

Объяснение:

1. Всего пикселей: 512*128=65536 пикселей

64 кбайта = 64*8*1024 = 524288 бит.

На каждый пиксель отводится 524288 / 65536 = 8 бит.

То есть глубина цвета равна 8 бит. Всего можно использовать 2^8 = 256 цветов.

2. 16 цветов соответствуют глубине цвета в 4 бита.

Всего пикселей: 640*480 = 307200 пикселей

Всего видеопамяти необходимо для хранения этих пикселей:

307200 пикселей * 4 бита = 1228800 бит

1228800 бит / 8 / 1024 = 150 кбайт.

Теоретиически - хватает (150 кбайт меньше 256 кбайт, значит изображение туда влезет). Но на практике видеопамять по 4 бита не адресуется. Она адресуется по 8 бит, то есть по 1 байту. А значит на пиксель не может быть отведено менее 8 бит памяти. Значит реально памяти нам потребуется в 2 раза больше: 150 * 2 = 300 кбайт. А это означает, что на практике 256 кбайт памяти нам для хранения этого изображения не хватит.

3. Палитра в 216 цветов подразумевает глубину цвета не менее 8 бит. То есть для хранения каждого пикселя нам потребуется 1 байт памяти.

Всего пикселей 256 * 256 = 65536 пикселей. Если на каждый по 1 байту, то нам потребуется 65536 байт памяти. 65536 байт / 1024 = 65 кбайт.

ответ: 65 кбайт.

0,0(0 оценок)
Ответ:
khadija2004
khadija2004
12.06.2021 09:10

const

 N = 5;

var

 B: array[1..N] of integer;

 Sum, Min, Min_i, Max, i: integer;

Begin

 WriteLn('Введите массив: ');

 For i := 1 to N do

   Read(B[i]);

 

 Sum := 0;

 Min := B[1];

 Max := B[1];

 

 For i := 1 to N do

 Begin

   if (B[i] mod 2 <> 0) then

     Sum := Sum + B[i];

   

   if (B[i] > Max) then

     Max := B[i];

   

   if (B[i] <= Min) then

   begin

     Min := B[i];

     Min_i := i;

   end;

 End;

 

 For i := 1 to Min_i - 1 do

   B[i] := (Min + Max) div 2;

 

 For i := N downto 1 do

   if ((B[i] mod 4 = 0) and (i < N)) then

   begin

     B[i+1] := 0;

     break;

   end;

 

 WriteLn('Сумма нечётных элементов: ', Sum);

 WriteLn('Получившийся массив: ', B);

End.

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