Const nx=30; mx=30; var r: array[1..nx,1..mx] of integer; b: array[1..mx] of integer; i,j,n,m,k,sum,min: integer; begin min: =40; randomize; write('введите n,m: '); readln(n,m); writeln('исходная матрица: '); for j: =1 to m do begin for i: =1 to n do begin r[i,j]: =random(20)-10; sum: = sum + r[i,j]; end; b[j]: =sum; sum: =0; end; for i: =1 to n do begin for j: =1 to m do begin write(r[i,j]: 4); end; writeln; end; writeln; for j: =1 to m do begin write(b[j]: 4); if min > b[j] then begin min: = b[j]; k: = j; end; end; writeln; writeln; for i: =1 to n do begin for j: =1 to m do begin if j=k then write(r[i,j]: 4); end; writeln; end; end.
Nertman45
02.05.2020
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 бита