Тачпад встроен он удобнее но если он сломается его просто так не купишь
надо комп в ремонт нести и ждать долго плюс это дорого.
Мышка попроще но не удобна в перевозке но если она сломается то её спокойно можно купить в магазине.
Программа работает в следующем виде:
n = InputBox(vbLf & "Напиши значение ""n"" (количество расчетов)")
ReDim X(n)
ReDim Y(n)
Randomize
For i = 1 To n
X(i) = 5 - 10 * Rnd
Next
S = 0
For Each b In X
S = S + X(1) / i
Next
MsgBox "S=" & S
Нижние строки я убрал, потому что не понял, зачем они и что должны выводить: в задании про них ничего не сказано.
35 = 2^i
i = 6 бит - 1 символ
10*6 = 60 бит информации
Решение во вложении
------------------------------------
Чуть кривовато, может, но, вроде, понятно должно быть.