Расчет кривошипно-шатунного механизма (delphi)

[AuToDreY]

Здравствуйте, прошу помощи в написании программы.
Есть механизм:

Есть значения которые даны:

И так, нужно написать программу для расчёта вот этих формул:

Она должна выглядеть просто и незамысловато, примерно так:

+ ко всему нужно в эту программу добавить построение графиков:
- Скорости ползуна
- Ускорения ползуна
- Перемещения ползуна
+ кнопку которая будет ссылаться на изображение механизма.

На скрине программы верхние 2 поля вводятся руками, остальные рассчитываются по нажатию кнопки вычислить. "Укажите угловую частоту это Омега1" "Укажите начальный угол это 45 градусов"

Заранее огромное спасибо за помощь!