Г=1/с; 1 мин 20с =80 с
1) F=256 000 бит/с * (2*60+45) секунд =256 000*165 бит - весь файл
2) (256 000 * 165 бит ) / (80 с *44 000 Г) = (256*165)/(80*44)=
=(16*15)/(5*4) = 4*3 = 12 бит - количество уровней квантования
Ответ:
38, тогда 38 человек критиковали одного, его и не взяли
1 ---> 15 1)+1 2)+2 3)+4
---------------------------------------
1 начало
2 1+1 1
3 1+2; 2+1 2
4 3+1; 2+2 3
5 1+4; 3+2; 4+1 6
6 5+1; 4+2;2+4 10
7 6+1;5+2;3+4 18
8 7+1;6+2;4+4 31
9 8+1;7+2;5+4 55
10 9+1;8+2;6+4 96
11 10+1;9+2;7+4 169
12 11+1;10+2;8+4 296
13 12+1;11+2;9+4 520
14 13+1;12+2;10+4 912
15 14+1; 13+3;11+4 1601 ответ 1601
Program abc;
Const
n=3;
m=3;
Var a:array[1..n,1..m] of integer;
b,y,i,j,sum:integer;
srd:real;
Begin
Writeln('Введите числа массива: ');
For i:=1 to n do
For j:=1 to m do
Begin
Write('a[',i,',',j,']= ');
Readln(a[i,j]);
if a[i,j]>0 then
begin
sum:=sum+a[i,j];
inc(b);
end
else
If a[i,j]<0 then
Inc(y);
End;
If sum>0 then
begin
srd:=sum/b;
Writeln('Среднее =',srd);
end
else
Writeln('Нет положительных членов массива');
If y>0 then
begin
Writeln('Количество отрицательных элементов =',y);
end
else
Writeln('Нет отрицательных членов массива');
End.