Укажите панель инструментов "Подписи"                                             [3 б] Верных ответов: 3 Название программы
Легенда
Отрезать
Таблица данных Названия осей

ответ:

1.личный код имеет 14 символов кожен с которых может иметь 36 значений(26 значений букв и 10 цифр).

36 значений можно закодировать в 6 бит (2^6=64 - входит и значение 36)

личный код имеет 14 символов значит

6 бит * 14 = 84бит=8.5байт

код подразделений имеет 8 значений 5 первых которые буквы от а до f (6 значений)

6 значений это 3 бита(2^3=8 - входит 6)

код имеет 5 первых букв

5*3=15бит=1.9байт

и трьохзначное число по три значения кожное з которых может быть максимум 9

9 значений это 4 бита,таких значений есть 3

3*4=12бит=1.5байт

сумируем 1.5+1.9+8.5=11.9≈12байт

30-12=18байт

2.v=m*l*t

звукозапись двухканальная, значит еще умножаем на 2.

v=m*l*t*2

v  =  120 мбайт = 125829120 байт

l= 24 бита = 3 байта

m = 64 кгц = 64000 гц

t=v/(m*l*2)=125829120/(64000*3*2) ≈ 5 (мин)

ответ: 5 минут.

3.v - объем

n - количество каналов

v2 = (56 / 2) * 4 / 3.5 = 32

4.пусть объём 1го файла - 2х (2 т.к. стереозапись),

тогда пропускная способность первого канала - 2х/18.

после второй оцифровки файл был записан в формате моно (то есть уменьшился вдвое) и стал просто х, после улучшения разрешения увеличился вдвое и стал 2х, после увеличения частоты дискретизации увеличился вдвое еще раз и стал наконец 4х (объём второго файла).

пропускная способность 2го канала в 5 ниже т.е (2х/18)/5= 2х/90= х/45.

чтобы узнать сколько времени затратилось на передачу файла объёмом 4х с пропускной способностью х/45, разделим объём на пропускную способность:

4х/(х/45)= 4*45=180 секунд

Const
  m1 = 10;
  n1 = 8;
var
  x: array[1..m1, 1..n1] of integer;
  i, j, m, n, t: integer;
begin
  Write('Введите через пробел число строк и столбцов матрицы: ');
  Read(m,n);
  Randomize;
  Writeln('Исходная матрица');
  for i:= 1 to m do begin
    for j:=1 to n do begin
      x[i,j]:= Random(50)+1;
      Write(x[i,j]:3)
    end;
    Writeln
  end;
  { простая обменная сортировка первого столбца }
  for i:=1 to m-1 do
    for j:=1 to m-1 do
      if x[j,1]>x[j+1,1] then
      begin t:=x[j,1]; x[j,1]:=x[j+1,1]; x[j+1,1]:=t end;
  Writeln('Результирующая матрица');
  for i:= 1 to m do begin
    for j:=1 to n do Write(x[i,j]:3);
    Writeln
  end
end.

Тестовое решение:
Введите через пробел число строк и столбцов матрицы: 10 8
Исходная матрица
 44 28 35 45 28 21 24 31
 39 10  1 27 33  3  7 39
 22  8 45  4 33 11 23 37
 18 50 48 12 45 28  1 32
  3 25 45 11 40 49 47 17
 28 16 46 43 11 13 22 18
 27 24 45 33 44 44 34 34
  6 49 27 28 24 13 37 12
  9 19 25  8  8 47 49 24
 11 29 26 18 16 30 27  6
Результирующая матрица
  3 28 35 45 28 21 24 31
  6 10  1 27 33  3  7 39
  9  8 45  4 33 11 23 37
 11 50 48 12 45 28  1 32
 18 25 45 11 40 49 47 17
 22 16 46 43 11 13 22 18
 27 24 45 33 44 44 34 34
 28 49 27 28 24 13 37 12
 39 19 25  8  8 47 49 24
 44 29 26 18 16 30 27  6