4 байта = 32 бита
Ответ: максимально ячейка может хранить 32 бита
А) 20*0,6 = 12мб. (после сжатия).
12мб = 12 * 2^23 бит.
Теперь находим время на передачу.
12 * 2^23 бит/2^20 = 12 * 8 = 96.
96 + 10 + 2 = 108.
Б) 20мб = 20 * 2^23 бит.
20 * 2^23/2^20 = 20 * 8 = 160.
160 - 108 = 52.
Ответ: А52.
Const
N = 10;
Var
X:array[1..N] of integer;
i,k:integer;
S:real;
Begin
k:=0;
S:=0;
WriteLn('Введите массив A[',N,']:');
For i:= 1 to N do
Begin
Read(X[i]);
if X[i]>1 then k:=k+1
else if X[i]<0 then S:=S+X[i];
End;
WriteLn('k = ',k);
WriteLn('S = ',S);
End.