Нахождение функции Лагранжа системы и частоты малых колебаний
После того как подключен пакет plottools, процедуру arrow () из пакета plots вызвать все же можно, но для этого следует явно указать пакет.
Результат выполнения этой команды будет таким же, как и в самом первом случае.
Определим процедуру body() для отображения тела (бруска) на горизонтальной плоскости.
Параметр процедуры х задает горизонтальную координату центра симметрии бруска относительно граничной левой стенки. В этой процедуре используются две глобальные переменные Н и L, определяющие высоту и ширину бруска соответственно.
Следующей командой формируется изображение пружины, которое затем присваивается переменной s.
