Malenkyavlastnyazenh

5 - 9 классы Информатика 18+9 б создать сайт на тематику истории создания барабанов

Самый банальный,пропишите код с такими тегами не используйте другие тэги

БУДУ ОЧЕНЬ БЛАГОДАРНА

ЗАРАНЕЕ те кто разбирается

1. множество символов для записи текста называют алфавитом

2 полное количество символов в алфавите называют мощностью

3 за единицу информации при алфавитном подходе принято считать вес 1 символа алфавита

4 2

5 это вес 1 символа в двухбитном алфавите

6 информационный объем определяется по формуле I=K*i, где к-количество символов в тексте, а i - вес одного символа

7 8 бит

8 256 символов

9 потому, что он строится только на мощности алфавита

10 N- мощность алфавита, i -вес одного символа

11 алфавитный подход к измерению информации позволяет определить количество информации, заключенной в тексте

12 N=2^i

13 I=K*i, где К -количество символов в тексте, а i - вес одного символа

14 при алфавитном подходе смысл сообщения не учитывается, важно только какой алфавит использовался

15 количество информации, заключенное в сообщении, определяется объемом знаний, который несет это сообщение получающему его человеку. Сообщение содержит информацию для человека, если заключенные в нем сведения являются для этого человека новыми и понятными и, следовательно пополняют его знания.

16 сообщение, уменьшающее неопределенность знаний в два раза, несет для него 1 бит информации.

17

Const heigth = 10
Const width = 10

Sub Ìàêðîñ1()
    Dim Sum(heigth - 1, width - 1)
    Dim Product(heigth - 1, width - 1)
    
    For i = 0 To heigth - 1
        For j = 0 To width - 1
            Sum(i, j) = i + j
            Product(i, j) = i * j
        Next j
    Next i
    
    Call Show(Sum, 0, 0)
    Call Show(Product, 0, 12)
End Sub

Sub Show(ByRef m, dx, dy)
    For i = 0 To heigth - 1
        For j = 0 To width - 1
            ActiveSheet.Cells(dx + i + 1, dy + j + 1).Value = Hex(m(i, j))
        Next j
    Next i
End Sub