Объявить 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
Не нашли ответ?
Ответить на вопрос
Похожие вопросы