Составить программу, которая формирует массив а из 85 случайных целых чисел, принадлежащих промежутку [4; 14]. параметром цикла является переменная s. нумерация начинается с 1

Sub cikl()
Dim A(85) As Integer
K = 85
For s = 1 To K
A(s) = Int(11 * Rnd() + 4)
Next s
End Sub