|
Что
будет напечатано на форме в результате
выполнения программы, записанной на объектно-ориентированном
языке программирования Visual
Basic? |
Dim bytA(1 To 100), M, I,
N
As Byte
Sub Command1_Click()
For I = 1
To 100
bytA(I) = Int(Rnd*100)
Next I
M = bytA(1)
For I = 2
To 100
If bytA(I)< M Then M
= bytA(I): N = I
Next I
Form1.Print M
End Sub |