1.var a:array[1..100] of integer;
n,s,i:integer;
begin
write('Количество элементов=');
readln(n);
for i:=1 to n do begin
readln(a[i]);
end;
for i:=1 to n do begin
if a[i]>0 then a[i]:=-a[i]
else a[i]:=abs(a[i]);
end;
for i:=1 to n do begin
write(a[i]:3);
end;
end.
1. 8 КБ = 8 * 1024 Байт = 8192 Байт
2. 248 бит = 248 / 8 Байт = 31 Байт.
3. 9216 МБ = 9216 * 1024 КБ = 9437184 Байт
4. 8 Гб = 8 * 2^10 МБ = 8 * 2^20 КБ = 8 * 2^30 Байт = 2^33 Байт
5. 32768 Бит = 4096 байт = 4 Кб = 4 / 1024 Мб = 0,00390625 Мб ~ 0,004 МБ
Число бит информации определяется как log 2 (N/N') где N - число возможных вариантов ДО получения информации, а N' - после.
Т.е. нам надо посчитать сколько существует комбинаций из 11 подбрасываний всего (2^11 = 2048) и сколько таких, где 4 орла идут подряд (таких очевидно 8 - 11110000000, 01111000000, 00111100000, 00011110000, 00001111000, 00000111100, 00000011110, 00000001111).
Имеем log 2 (2048 / 8) = log 2 (2^11 / 2^3) = log 2 (2^8) = 8 бит
Ответ 8 бит