Page 106 - 4617
P. 106

Приклад 5. ВИМУШЕНІ КОЛИВАННЯ МЕХАНІЧНОЇ СИСТЕМИ
                                         ПІД ДІЄЮ ЗБУРЮВАЛЬНОЇ СИЛИ


                                                                                                     від   швидкість
                                                                                                     відхилення   (м),






                           Очищення значень всіх змінних  Підключення пакета "Лінійна алгебра"  Підключення підпрограми "oscil_point"   Сили ваги вантажа і пружності   Закон руху штока   Рівняння статичної рівноваги тягарця   Динамічне рівняння руху тягарця   довжина шатуна (м)   умови   статичної
                        Пояснення                Головний вектор сил, прикладених до тягарця   Положення статичної деформації пружини   Прискорення вільного падіння (м/с 2 ), маса тяга- рця (кг), коефіцієнт жорсткості пружини (Н/м),   тягарця:   руху   рівноваги

                                    1. Динамічне рівняння руху тягарця відносно положення статичної рівноваги
                    Текст програми “Вимушені коливання без урахування сил опору”










                                                    Положення статичної рівноваги тягарця


                                                                                   sin         t     Початкові   положення   (м/с)
                                                                                   OAk



                                                              mg  k     :    }        yt  

                                                                 Динамічне рівняння руху тягарця відносно положення статичної рівноваги   ,{St  k 2. Закони руху і зміни швидкості тягарця  Вихідні дані
                                                 :                      Eq
                                                                                   
                                                 ,Rn                    simplify        yt    

                                                 Py    ,i             :       2  d  2  dt

                        Текст програми           F  add  :  i  :       ,RF  Eq    :  m     





                                read"C:\\watcom – 1.3\\oscil_point";


                                          :     RFy   0                yt
                                        s        :
                                                                     y
                                        y    :         0,RF                                     9.81,0.5,128,0.15 :
                                              ,Fpr                 subs  
                                        k   ,t  P  0,OA    ''
                                        ,       ,i     :               yt                       0.02,0.08 :
                                        mg    :  sin    F  add  i    y  ,  St  2  d    2  dt    Eq  :  ,OA



                           restart:   with(linalg):   ,F  F  Fpr  P  OA  :  ,  .  RF  :  subs  :  St  solve    :  Eq  m  combine  ,k  ,m  g  0 :  yv  0,



                        №     1.          2.   s  3         4.          :    5.                    6.


                                                          106
   101   102   103   104   105   106   107   108   109   110   111