Объявить 2-х мерный массив 3 на 4, заполнить случайными целыми числами от -10 до 10, с помощью операторов цикла и Print вывести их на поле Formбейсик
Объявить 2-х мерный массив 3 на 4, заполнить случайными целыми числами от -10 до 10, с помощью операторов цикла и Print вывести их на поле Form
бейсик
Ответ(ы) на вопрос:
Попробуй так:
Sub z()
cls
Dim a(3, 4)
For i = 1 To 3
For j = 1 To 4
a(i, j) = Int(Rnd * 31) - 10
Print a(ij); " ";
Next j
Print
Next i
End Sub
Не нашли ответ?
Похожие вопросы