fy4y » 23 фев 2007, 08:34
вот собственно нужно задать массив l(4, 6) и найти наибольший элемент.
кстати все элементы интеджер...
вот нарешал тут но почему у меня массив рисуется одномерно?? помогите плиз..
CLS
Randomize Timer
Dim l(1 to 4, 1 to 6) As Integer
For i = 1 to 4
For j = 1 to 6
l(i, j) = int(Rnd * 20)
print " "; l(i, j)
Next j
Next i
For i = 1 to 4
For j = 1 to 6
if l(i, j) > max Then
max = l(i, j)
End if
Next j
Next i
Print
Print max
End
собственно он выбирает максимальный элемент но вод надо чтоб массив выводился двумерный а не одномерный!!!!!
вот собственно нужно задать массив l(4, 6) и найти наибольший элемент.
кстати все элементы интеджер...
вот нарешал тут но почему у меня массив рисуется одномерно?? помогите плиз..
CLS
Randomize Timer
Dim l(1 to 4, 1 to 6) As Integer
For i = 1 to 4
For j = 1 to 6
l(i, j) = int(Rnd * 20)
print " "; l(i, j)
Next j
Next i
For i = 1 to 4
For j = 1 to 6
if l(i, j) > max Then
max = l(i, j)
End if
Next j
Next i
Print
Print max
End
собственно он выбирает максимальный элемент но вод надо чтоб массив выводился двумерный а не одномерный!!!!!