Как вставить в массив эллемент - 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

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

6   голосов , оценка 4.333 из 5
Похожие ответы