Page 131 - 4192
P. 131

Рисунок  8.7 –           Рисунок 8.8 – Розроблений
               Пошук суми всіх               інтерфейс  та  результат

              елементів масиву                 виконання програми



                Програмний код:
                Private Sub Command1_Click()
                Dim A25(1 To 12) As Single
                Dim S As Single
                Dim i As Integer
                For i = 1 To 12



                                             130
   126   127   128   129   130   131   132   133   134   135   136