Как вставить в массив эллемент - VB
Формулировка задачи:
День добрый.
Помогите решить задачу:
Составить программу вставки в массив А(N) третьего эллемента с конца массива равного 7ми
Решение задачи: «Как вставить в массив эллемент»
textual
Листинг программы
Option Explicit Dim i As Double Dim x As Double Dim a() As Double Private Sub Form_Load() AutoRedraw = True x = InputBox("Vvedite kol-vo ýëåìåГ*òîâ Г¬Г*Г±Г±ГЁГўГ*") ReDim a(1 To x) For i = 1 To x a(i) = Int(Rnd * 10 - 2.2) Print a(i); Next i Print vbLf For i = 1 To x If i = x - 2 Then a(i) = 7 Print a(i); Next i End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д