Var k, m: integer; dat: array[1..11] of integer; begin dat[1] : = 20; dat[2] : = 25; dat[3] : = 19; dat[4] : = 25; dat[5] : = 26; dat[6] : = 22; dat[7] : = 24; dat[8] : = 28; dat[9] : = 26; dat[10] : = 21; dat[11] : = 27; m : = 0; for k : = 1 to 11 do if dat[k] > 22 then begin m : = m + 1 end; writeln(m) end.

Число 113: для него прямой, обратный и дополнительный коды совпадают, так как оно положительное.

113(10)=01110001(2)

Число (-36):

Прямой код: 36(10)=00100100(2)

Обратный код (код, в котором меняем 0 на 1, а 1 на 0 в прямом коде):

-36(10) - обратный код 11011011(2)

Дополнительный код (к младшему разряду обратного кода прибавляем 1):

-36(10) - дополнительный код 11011100(2) - это число -36 в доп.коде

Сложим 113+(-36) в двоичных кодах:

01110001(2)+11011100(2)=1 0100 1101(2). Старшую единицу отбрасываем, получаем:

01001101(2)=77(10)

Проверим: 113-36=77 в десятичной с/с

1.Я неуверен на 100% в 1 задаче.

Если весь текст состоит из К символов, то приалфавитном подходе размер содержащийся в ней информации I определяется по формуле:
I=K*x,
где х—информационный вес одного символа в используемом алфавите.

РЕШЕНИЕ:
Всего у нас 10 символов: 0,1,2,3,4,5,6,7,8,9.
I=K*x, 10*8=80 бит
80*80=6400 бит
ответ:6400 бит.

2.Пусть в некотором сообщении содержатся сведения о том, что произошло одно из N равновероятных событий. Тогда кол-во информации x, заключенное в этом сообщении, и число событий N связаны формулой:
2^х=N

РЕШЕНИЕ:
2^x=8
2^3=8
ответ: 3 бит.