Задача№ 2 Жители планеты Мури используют алфавит из 512 знаков, а жители планеты Клок — из 8 знаков. Для жителей какой планеты сообщение из 22 знаков несет больше информации и НА сколько? *

Для формирования сводного отчета по документооборотам выполните действия:

1. Выберите в главном меню «Действия – Сформировать отчет».

Откроется окно «Формирование отчета».

2. Укажите период, за который необходимо сформировать отчет по документооборотам. Для этого воспользуйтесь встроенным календарем или ссылками:

за все время - автоматически проставляется период с начала использования программы по текущую дату.

за месяц - автоматически проставляется период за месяц от текущей даты.

за неделю - автоматически проставляется период за дней от текущей даты.

3. Выберите документообороты, которые необходимо отобразить в сводном отчете при чекбоксов.

4. Укажите при необходимости для каждого направления документооборота дополнительные параметры, нажав на значок .

5. Развернется форма <Название направления документооборота> , например «Налоговая служба».

6. После того как все необходимые параметры отчета заполнены, нужно нажать на кнопку «Сформировать отчет». Начнется процесс формирования отчета, по окончании которого откроется окно просмотра отчета.

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