AcademiaXXI

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 13.5. Пример 2 >    restart:   >    read «ris.m»:                Подписи точек на рисунке nam:=[«O1″,A,B,D,»O3»,C]:Nnam:=[1,2,3,4,11,7]: R1:=40: r1:=20: R3:=30: r4:=20: R4:=41:a:=pi/9: h:=99: stok:=95: b:=1.5:sna:=sin(a): csa:=cos(a):              Угловая  скорость        >      omeg:=2:                      Координаты >      x[11]:=0:        y[11]:=0:   x[4]:=0:          y[4]:=-R3:   x[6]:=-R3*csa:    y[6]:=R3*sna:   x[5]:=x[6]-h*sna: y[5]:=y[6]-h*csa:   x[1]:=x[5]-R1*csa: y[1]:=y[5]+R1*sna: …

Кирсанов М.Н. Решебник.Теоретическая механика. М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 13.8. Задача 1 >    restart:   >    read «ris.m»:   >    R:=3: a:=6:                     Координаты >      y[1]:=R:             Количество кадров K   >    K:=12: with(plots):with(plottools):            Создаем все кадры >    for i from 0 to K do   >    …

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 12.2. Задача 1   restart:read «ris.m»;                Подписи шарниров на рисунке   nam:=array(0..3,[O,A,B,C]):              Начальные значения и размеры         ( м)   OA:=1.5: AB:=OA: BC:=7:R:=1:r:=0.1:a:=0.1:     Угловая  скорость  OA и период обращения          omegaOA:=2: T:=2*pi/omegaOA:                    Координаты опоры O   x[0]:=0:y[0]:=0:   with(plots):with(plottools): Warning, the name changecoords has …

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 12.2. Задача 2   restart:                Подписи шарниров на рисунке   nam:=array(0..4,[O,A,B,C,D]):               Считываем библиотеку стандартных программ для рисования   read «ris.m»;              Начальные значения и размеры         ( м)   OA:=2: a:=0.15: b:=3: BC:=10:R:=1:r:=0.1:     Угловая  скорость  OA и период обращения          omegaOA:=2: T:=2*pi/omegaOA:                    Координаты опоры O …

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 12.2. Задача 10   restart:                Подписи шарниров на рисунке   nam:=array(0..3,[O,A,D,C]):               Считываем библиотеку стандартных программ для рисования   read «ris.m»;              Начальные значения и размеры         ( м)   OA:=2: L:=3: a:=0.15: R1:=1.2:R2:=1:r:=0.1:     Угловая  скорость  OA и период обращения          omegaOA:=1: T:=2*pi/omegaOA:   with(plots):with(plottools):                  Количество …

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 13.2. Задача 8 >    restart:   >    read «ris.m»;                Подписи шарниров на рисунке >    nam:=[O,A,B,C,D]:            Pазмеры ( cм) OA:=33: DB:=63:   >    AB:=30: BC:=23:                 Координаты опоры O >      x[1]:=0:y[1]:=0:                Координаты опоры D >      x[5]:=AB*cos(pi/6)+DB:   >      y[5]:= …

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 13.4. Задача 6 >    restart:read «ris.m»; 1. Вычисление ускорений с помощью уравнений Лагранжа 2-го рода Массы (кг) ma:=5: mb:=4: mc:=3: Обобщенные координаты — смещение   x   тела А  и s  центра цилиндра  B       Кинетическая энергия      T:=1/2*ma*x^2+3/4*mb*s^2+1/2*mc*(x+s)^2/4:     Инерциальные коэффициенты          a11:=coeff(diff(T,s),s): …

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 12.2. Задача 6   restart:read «ris.m»;                Подписи шарниров на рисунке   nam:=array(0..4,[O,A,B,C,D]):              Начальные значения и размеры         ( м)   OA:=1.5: AB:=OA: L:=5:BC:=7:R:=1:r:=0.1:a:=0.12:     Угловая  скорость  OA и период обращения           omegaOA:=2: T:=2*pi/omegaOA:       with(plots):with(plottools):                  Количество кадров K   K:=12:                 Создаем все кадры   for …

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 12.2. Задача 5   restart:                Подписи шарниров на рисунке   nam:=array(0..3,[O,A,D,C]):               Считываем библиотеку стандартных программ для рисования   read «ris.m»;              Начальные значения и размеры         ( м)    OA:=6: L:=3: a:=0.15: b:=0.5:  BC:=10:R1:=1.2:R2:=1:r:=0.1:     Угловая  скорость  OA и период обращения          omegaOA:=1: T:=2*pi/omegaOA:    with(plots):with(plottools): …

Кирсанов М.Н. Решебник.Теоретическая механика.  М.:ФИЗМАТЛИТ, 2002. Иллюстрации и программы к книге 12.2. Задача 4   restart:                Подписи шарниров на рисунке   nam:=array(0..3,[O,A,D,C]):               Считываем библиотеку стандартных программ для рисования   read «ris.m»;              Начальные значения и размеры         ( м)   pi:=evalf(Pi):   OA:=2: L:=3: a:=0.15: b:=0.5: BC:=10:R1:=1.2:R2:=1:r:=0.1:     Угловая  скорость  OA и период обращения          omegaOA:=1: T:=2*pi/omegaOA: …