Пограммирование
енавориммаргоп
пграммироване
еавориммаргп
праммировае
евориммарп
паммирове
еориммап
пммирое
ериммп
пмире
еимп
пие
еп
п
Ответ: П
1) log(2)128 = 7 бит (2^7 = 128)
2) Для хранения одного символа необходимо log(2)32 = 5 бит. Объем сообщения = 60*5 = 300 бит
Для хранения текста объёмом 5120 символов при 8 битном кодировании потребуется 5 килобайт
Код доделанный (исправленна куча русских букв) и немного переделанный под VBScript, потому что <span>BASIC </span>у меня нет
<span>Sub Zadanie()
D = 0
M = 1
FOR A = -1 to 0
FOR B = -1 to 0
FOR C = -1 to 0
D = D - ((A AND C) EQV NOT (B IMP (A OR C))) * M
M = M * 2
NEXT
NEXT
NEXT
Msgbox "D="& D
End Sub
Вывод
D=218
</span>