Page 157 - 4192
P. 157

б) з використанням допоміжного масиву С

                REM Перестановка рядків
                For К=1 To M
                С(К)=A(і,К)
                Next К
                For К=1 To M
                A(і,К)=A(j,К)
                Next К
                For К=1 To M
                A(j,К)=С(К)
                Next К

                Приклад. Пошук мінімального елемента матриці:

                Р=А(1,1)
                К=1 : L=1
                For i=1 To N
                For j=1 To M
                If P<=A(i,j) Then Goto metka1
                P=A(i,j)
                K=i
                L=j
                metka1:
                Next j
                Next i
                              КОНТРОЛЬНІ ЗАПИТАННЯ

                1.   Що  таке  масив?  З  якою  метою  використовуються
           масиви даних?
                2.   Що означає поняття вимірність масиву?
                3.   Як  здійснюється  введення  та  виведення  елементів
           матриці на мові Visual Basic?



                                             156
   152   153   154   155   156   157   158   159   160   161   162