Как сформировать матрицу 4х5 и найти max из второй строки - VB

Узнай цену своей работы

Формулировка задачи:

Требуется помощь...Не бесплатно) Договоримся Случайным образом формируется 20 случайных чисел (из диапозона 0-10) с помощью math.random(). Вывести их в виде матрицы 4х5 и найти max из второй строки.

Решение задачи: «Как сформировать матрицу 4х5 и найти max из второй строки»

textual
Листинг программы
Private Sub Form_Load()
    Dim i As Long, j As Long, max As Long
    Dim Arr() As Long
    Me.AutoRedraw = True
    Randomize
    ReDim Arr(1 To 4, 1 To 5)
    max = 0
    For i = 1 To UBound(Arr, 1): For j = 1 To UBound(Arr, 2)
        Arr(i, j) = Int(Rnd * 10)
        Me.Print Arr(i, j) & ", ";
        If i = 2 Then
            If Arr(i, j) > max Then max = Arr(i, j)
        End If
    Next: Me.Print:  Next
    Me.Print "Max = " & max
End Sub

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


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

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

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