Для начала переведем все числа в одну систему счисления, например в десятичную:
<span>1)
111101</span>₂=61₁₀
AF₁₆=175₁₀
36₈=30₁₀
(61+175)/30=7.8(6)₁₀
2)
125₈=85₁₀
101₂=5₁₀
2A₁₆=42₁₀
141₈=97₁₀
85+5+42-97=35₁₀
Ответ:
2,0,334
Объяснение:
Задаем две пользовательские функции в VBA
Function newstr(str As String, n As Integer) As String
Dim i As Integer
For i = 1 To n
str = Replace(str, "a", "ab")
str = Replace(str, "bb", "c")
Next
newstr = str
End Function
Function chrcount(str1 As String, str2 As String) As Integer
Dim str() As String
str = Split(str1, str2)
chrcount = UBound(str, 1)
End Function
В ячейках рабочего листа вставляем формулы.
Для вычисления числа символов "a":
=chrcount(newstr("abab";333);"a")
Для вычисления числа символов "b":
=chrcount(newstr("abab";333);"b")
Для вычисления числа символов "c":
=chrcount(newstr("abab";333);"c")
Получаем следующий результат:
a,b,c
2,0,334
Дано:
Объем сообщения = 450 байт
Количество символов = 150
Решение:
1. Вес одного символа:
450/150 = 3 (бита)
2. Мощность алфавита:
2^3 = 8
Ну ты просто выдумал себе сложности, при вызове F она выведет 9, паскаль не знаю, но точно утверждаю, что это так.
Сначала идёт вывод переменной а потом операции с ней, ничего додумывать не нужно.
150 байт = 150*8 бит = 1200 бит
Количество информации на один символ = 1200/400 = 3 бита
Количество символов в алфавите = 2^3 = 8