Page 97 - 6852
P. 97

Додаток Е

                                   Приклад виконання програм GWP.bas , RKM2.bas,
                            KOR.bas, PCH.bas з такими  вхідними даними :
                                        0           1              . 0  00088  
                               А                         , В                ,     15  . 7 .
                                      . 0  000141   . 0  04837      . 0  000028566 


                                                        GWP.bas
                            Параметри послiдовностi N,m.k заданi в 80 операторi
                            Будемо мiняти параметри послiдовностi?:
                            1-так,0-нi
                            Лiчильник циклiв -  1023
                            Будемо формувати файл?
                              1-так; 0-нi
                            Кiнець
                            Ok_
                                                       RKM2.bas
                            МЕТОД РУНГЕ-КУТТА-МЕРСОТА РОЗВ'ЯЗКУ
                            ДИФЕРЕНЦIАЛЬНОГО РIВНЯННЯ dx/dt=Ax+Bu
                             (моделювання стохастичного процесу)
                            Введiть розмiрнiсть вектора X? 2
                            Вводимо матрицю коефiцiєнтiв A
                            Вводимо  1 рядок
                            ? 0
                            ? 1
                            Вводимо  2 рядок
                            ? -0.000141
                            ? -0.04837
                            Вводимо матрицю коефiцiєнтiв B
                            Вводимо 1 рядок
                            ? 0.00088
                            Вводимо 2 рядок
                            ? -0.000028566
                            Вводимо початковий крок iнтегрування h? 15.7
                            ВИВОДИМО ДАНI НА ЕКРАН ДИСПЛЕЯ?
                                                                                           78
   92   93   94   95   96   97   98   99   100   101