х(i)=Int(101*Rnd()-30)
Text1.Text=Text1.Text&x(i)&","
Next i
For i=nTo k +2 Step-1
ReDim a(i=1 To m,j=1 To n)
For i =1 To m
min=a(i,1)
Пожалуйста помогите кто может.Очень надо Не могу прочитать правильно.(((