Сделать массив из n (namp;gt;2) чисел, в котором первые два элемента

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

Задать свой вопрос
Kasareckij Vasek
язык программирования?
Aljona Sharoburko
Visual Basic
1 ответ
Sub z()
Dim a() As Integer
n = InputBox("Сколько чисел?")
ReDim a(n)
For i = 1 To 2
a(i) = InputBox("Введите число")
Next i
s = a(1) amp; " " amp; a(2)
For i = 3 To n
a(i) = a(i - 2) + a(i - 1)
s = s amp; " " amp; a(i)
Next i
MsgBox ("Массив: " amp; s)
End Sub
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт