Учебные пакеты

Кирсанов М.Н. Решебник.Теоретическая механика. М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге Применение принципа возможных скоростей  для определения реакций опор составной конструкции >    restart: with(linalg):   >    read «kine.m»: read «ris.m»:    Размеры >    a:=0.3:b:=0.55:c:=0.4:d:=0.3:al:=pi/4:bt:=pi/3:    Нагрузки   >    F:=  [[0,0,0],[0,0,0],[20,0,0],[0,0,0],[0,0,0],         [0,-5.5,0],[0,-3,0],[0,-4,0],[0,-3,0]]:    Момент >    Mom:=30:    Координаты узлов >    X:=[[0,0,0],                      #O       [0,a,0],                    #A …

Кирсанов М.Н. Решебник.Теоретическая механика. М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге Скорости точек механизма >    restart: with(linalg):   >    read «kine.m»:      Размеры >    AB:=30.:BC:=60.:CD:=30:DE:=20.: EF:=20.:FG:=10.:EH:=30.:F0:=20.:CK:=25.: al:=evalf(Pi/4):bt:=evalf(Pi/6):     Координаты узлов >    X:=[[AB*cos(al),-AB*sin(al),0],#A-1       [0,0,0],#B-2         [BC,0,0],# C-3       [BC+CD,0,0],# D-4       [BC+CD,-DE,0],# E-5       [BC+CD,-DE-EF,0],# F-6       [BC+CD,-DE-EF-FG,0],# G-7       [BC+CD+EH*cos(bt),-DE-EH*sin(bt),0],# H-8       [BC+CK*cos(bt),CK*sin(bt),0],# K-9       [BC+CD+FO,-DE-EF,0]]:# O-10    Задаем …

Кирсанов М.Н. Решебник.Теоретическая механика. М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге Механизм с двумя степенями свободы (Программа 4, манипулятор)             Начальные значения и размеры    restart: OB1:=1.:AB:=0.9:  pi:=evalf(Pi):   OA:=0.8: AC:=0.5: phi0:=pi/6:                   Скорость ползуна В и угловая скорость  руки АС    VB:=-0.7:    omega:=3*pi/4:                   Закон движения ползуна В и  руки АС        phi:=phi0+t*omega:  OB:=OB1+t*VB:     cosp:=cos(phi):   sinp:=sin(phi):                   Определение тригонометрических функций …

Кирсанов М.Н. Решебник.Теоретическая механика. М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге  Кинематика точки (Программа 3.  Скорость и ускорение точки. Радиус кривизны траектории.)   restart: Количество кадров анимации N:=50:k:=1.2:     Закон движения      x:=3*sin(t/2):y:=2*(1-3/4*sin(t))*cos(t/2):     Время движения   T:=evalf(4*Pi):   r:=vector([x,y,0]):      Вектора скорости и ускорения   v:=map(diff,r,t);W:=map(diff,r,t$2);       with(plots):      Параметры стрелок на рисунке   pv:=0.02,0.2,0.2:   with(plottools):   for i to N do …

Кирсанов М.Н. Решебник.Теоретическая механика. М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге   Скорости точек плоского механизма >    restart:  with(linalg):    Угловые скорости звеньев w:=Matrix(1..10,1..10,shape=symmetric):   Подпрограмма 1 вычисления скорости средней точки   ib  двузвенника     с опорой ic  и известной скоростью конца ia   >    СХЕМА1:=proc(ia,ib,ic) local w1,w2,Wcb,Wba,eq,s:  global w,V: Wcb:=[0,0,w1]:Wba:=[0,0,w2]:  eq:=evalm(-V[ia]+crossprod(Wcb,X[ib]-X[ic])+crossprod(Wba,X[ia]-X[ib])):   s:=solve({eq[1],eq[2]},{w1,w2}); assign(s); w[ib,ic]:=w1:w[ib,ia]:=w2: …

Кирсанов М.Н. Решебник.Теоретическая механика. М.:ФИЗМАТЛИТ, 2002. Определение координат центра тяжести и моментов инерции плоской фигуры (Задача 4.6 из книги А.В.Александров, В.Д.Потапов,Б.П.Державин «Сопроивление материалов»)      restart:     Число  угловых точек   N:=12:     Размеры швеллера №27(мм)         h:=270: ts:=10.5: bs:=95: s:=6:     Размеры уголка 100х10(мм)     tu:=10: bu:=100:      Матрица координат   X:=0,-bs,-bs,-s,-s,-bs,-bs,bu,bu,tu,tu,0:   Y:=0,0,ts/2,1.55*ts,h-1.55*ts,h-ts/2,h,h,h-tu,h-tu,h-bu,h-bu:     Матрица координат      T:=matrix(2,N,[X,Y]):    with(plots):polygonplot(T,scaling=constrained); Warning, the name changecoords has been redefined      Площадь    Z:=T[2,i]*T[1,i+1]-T[1,i]*T[2,i+1]: …

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 8.4. Задача 6 >    restart:   >    read «ris.m»;                Подписи шарниров на рисунке >    nam:=array(1..6,[‘O’,’A’,’B’,’D’,’E’,’C’]):                 Начальные значения и размеры ( cм) OA:=22: BC:=21: AB:=22: BD:=19:  DE:=10:               Угловой размах и время        >      phi_max:=pi/50: T:=pi/18:                      Координаты опоры C >      x[6]:=0:y[6]:=0: …

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 8.3. Задача 2 >    restart:   >    read «ris.m»;                Подписи шарниров на рисунке >    nam:=array(1..4,[‘O’,’A’,’B’,’C’]):                 Начальные значения и размеры ( cм) Замечание:  OC уменьшено с 87см  для того,  чтобы механизм делал полный оборот   >    OA:=29: BC:=47: AB:=41:               Угловая  скорость …

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 8.1. Задача 8 >    restart:   >    read «ris.m»;                Подписи шарниров на рисунке >    nam:=array(1..11,[‘O’,’A’,’C’,’D’,’B’,’N’,’F’,’E’,»G»,»K»,’H’]):                 Начальные значения и размеры ( cм) Замечание:   OA уменьшено с 20см и CD увеличено с 15см                       для того, чтобы механизм делал полный оборот   >    …

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 8.2. Задача 2 >    restart:   >    read «ris.m»;                Подписи шарниров на рисунке >    nam:=array(1..5,[‘O’,’A’,’B’,’C’,’D’]):                 Начальные значения и размеры ( cм) Замечание:   DB уменьшено с 16см и угол 60 заменен на 30 для того,                       чтобы механизм делал полный оборот   > …