/////////////////<u>Pascal abc</u>/////////////////
Программа во вложении
16=2^i
i=4 бит(на один символ)
V=50*4=200 бит=25 байт
var hour: integer;
minute: string;
begin
writeln('Введите время суток');
read(hour,minute);
if (hour>=6) and (hour<12) then writeln('Доброе утро');
if (hour>=12) and (hour<18) then writeln('Доброго дня');
if (hour>=18) and (hour<00) then writeln ('Доброго вечера');
if (hour>=00) and (hour<6) then writeln ('Спокойной ночи');
end.
Тут единственный недостаток: после ввода часов нужно нажать enter и минуты вводить на новой строке
15. Чтобы определить объем записи (в битах) необходимо умножить частоту дискретизации (Гц или 1/с) на глубину кодирования (бит) и на время записи (с). Так как запись четырехканальная, полученный результат умножаем еще на 4.В итоге получим:
32000*32*60*4= 245760000 бит= 30720000 байт = 30000 КБ = 29,3 МБ
16. Аналогично предыдущей задаче (только здесь двухканальная запись):
48000*24*36*2= 82944000 бит = 10368000 байт = 10125 КБ = 9,89 МБ
17. Чтобы определить время звукозаписи (в сек.) необходимо размер полученного файла (в битах) разделить на частоту дискретизации (Гц), глубину кодирования (бит) и количесто каналов записи.
(30*1024*1024*8)/32000*24*4= 81,92 с.
18.Аналогично предыдущей задаче:
(3*1024*1024*8)/16000*32*4= 12,29 с.
19. Вероятность того что достанется черный шар: P = 10/20= 1/2
Вероятность того, что достанется белый шар : P = 5/20 = 1/4
Количество информации, что достали черный шар вычислим из формулы: 2^i=1/P, 2^i=2, соответственно i=1. Ответ: 1 бит
Количество информации, что достали белый шар: 2^i=1/P, 2^i=4, i=2
Ответ: 2 бита