Решить () 1) текст длиной 24576 символов закодирован с алфавита, содержащего 1024 символа. сколько килобайт занимает в памяти этот текст? 2) сообщение длиной 7168 символов занимает в памяти 7 кбайт. найдите мощность алфавита, который использовался при кодировании. 3) рисунок размером 64 на 272 пикселей закодирован в режиме истинного цвета (true color). сколько килобайт занимает в памяти рисунок без учёта сжатия? 4) рисунок размером 768 на 160 пикселей занимает в памяти 75 кбайт (без учёта сжатия). найдите максимально возможное количество цветов в палитре изображения. 5) звук длительностью 1 минута оцифрован с частотой 22000 гц. разрядность кодирования - 24 бита. определите размер полученного файла в мбайтах. peзультат округлите до двух цифр после запятой.

1) 1024 символа это 10 бит на символ (1024 = 2^10). значит текста занимает 24576*10 = 245760 бит = 245760/8 байт = 245760/8/1024 кбайт = 30 кбайт

2) 7кбайт = 7168 байт -> у нас 1 байт на символ = 8 бит. с 8 бит можно закодировать алфавит мощностью 2^8 = 256 символов

3) truecolor - это цвет глубиной 24 бита = 3 байта. рисунок 64*272 с такой глубиной занимает 64*272*3 байт = 64*272*3/1024 кбайт = 51 кбайт

4) 75 кбайт = 75*1024 байт = 75*1024*8 бит = 614400 бит

всего пикселей в рисунке: 768*160 = 122880

находим глубину цвета каждого пикселя: 614400/122880 = 5 бит

с 5 бит можно закодировать максимум 2^5 = 32 цвета

5) частота 22000 гц и разрядность 24 бита означают, что на каждую секунду звука приходится 22000 замеров уровня и каждый кодируется 24 битами = 3 байтами, т.е. одна секунда занимает 22000*3 = 66000 байт.

тогда минута звучания занимает 66000*60 байт = 66000*60/1024 кбайт = 66000*60/1024/1024 мбайт = 3,78 мбайт

//pascalabc.net //версия 3.3, сборка 1634 (14.02.2018) begin   var (cost, t, k) : = (arr(15, 70, 125, 230, 440), arr(1, 5, 10, 20, 60), new integer[5]);   var n : = readinteger('n-> ');   for var i : = 4 downto 0 do   begin     k[i] : = n div t[i]; n : = n mod t[i];   end;     if k[0] * cost[0] > = cost[1] then begin k[0] : = 0; inc(k[1]); end;   if k[0] * cost[0] + k[1] * cost[1] > = cost[2] then    begin     k[0] : = 0; k[1] : = 0; inc(k[2]);     end;   if k[0] * cost[0] + k[1] * cost[1] + k[2] * cost[2] > = cost[3] then    begin     k[0] : = 0; k[1] : = 0; k[2] : = 0; inc(k[3]);   end;   if k[0] * cost[0] + k[1] * cost[1] + k[2] * cost[2] + k[3] * cost[3] > = cost[4] then    begin     k[0] : = 0; k[1] : = 0; k[2] : = 0; k[3] : = 0; inc(k[4]);     end;       for var i : = 0 to 4 do writelnformat('{0} билет(ов)- {1} штук(а)', t[i], k[i]); end. пример(1): n-> 37 1 билет(ов)- 0 штук(а) 5 билет(ов)- 0 штук(а) 10 билет(ов)- 0 штук(а) 20 билет(ов)- 0 штук(а) 60 билет(ов)- 1 штук(а) пример(2): n-> 35 1 билет(ов)- 0 штук(а) 5 билет(ов)- 1 штук(а) 10 билет(ов)- 1 штук(а) 20 билет(ов)- 1 штук(а) 60 билет(ов)- 0 штук(а)