Создать массив из n (n>2) чисел, в котором первые два элемента задаются с клавиатуры, а все последующие равны сумме двух предыдущих элементов

Ответы:

КРИС ЛОПУХОВА

03-12-2015 03:42

Sub z()Dim a() As Integern = InputBox("Сколько чисел?")ReDim a(n)For i = 1 To 2a(i) = InputBox("Введите число")Next is = a(1) & " " & a(2)For i = 3 To na(i) = a(i - 2) + a(i - 1)s = s & " " & a(i)Next iMsgBox ("Массив: " & s)End Sub

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Румия Степанова

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Создать массив из n (n>2) чисел, в котором первые два элемента задаются с клавиатуры, а все последующие равны сумме двух предыдущих элементов» от пользователя Румия Степанова в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!