Задача 1 Птички Прилетела птичка и села на провод. Через две минуты прилетела еще одна и их стало две одна минута и птичек стало три. А еще через минуту на проводе уже стало сидеть пять птичек. Сколько будет птичек сидеть на проводе через N минут после того как прилетела первая птичка?

Формат входных данных

На вход программе подается одно натуральное число N - количество минут после первой того как прилетела первая птичка(0
Формат выходных данных

На выход нужно вывести количество птичек

Пример

Конъюнкция - логическое умножение

в естественном языке соответствует союзу «И»;в алгебре высказываний обозначение «&»;в языках программирования обозначение «And».

Дизъюнкция - логическое сложение

в естественном языке соответствует союзу «ИЛИ»;в алгебре высказываний обозначение «V» или «+»;в языках программирования обозначение «Or».

Инверсия - отрицание (от латинского disjunctio - разобщение, различие):

в естественном языке соответствует словам «неверно, что...» и частице «не»;в алгебре высказываний обозначение «¬» или «-»;в языках программирования обозначение «Not».

Подробнее - на -

Объяснение:

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