Допустим, проблемы довольно просты - что-то, что может решить студент-теоретик физики.И студент выполняет самую сложную часть задачи - функциональное чтение: анализ текста в свободной от языка форме, получение входных и выходных переменных и значений входных переменных.
Например: задача о кинематических уравнениях, где есть переменные {a,d,t,va,vf}
и несколько функций, которые описывают, как они зависят друг от друга.Таким образом, используя навыки, полученные при игре в подходящие блоки, где вы подходите, вы играете с уравнениями, чтобы получить выходную переменную, которую вы ищете.
В любом случае, есть ровно 2 возможных выхода, которые вы могли бы пожелать, и ваши (с рабочим примером):
1) Уравнение для этой переменной
Physics[have_, find_] := Solve[Flatten[{
d == vf * t - (a * t^2) /2, (* etc. *)
have }], find]
Physics[True, {d}]
{{d -> (1/2)*(2*t*vf - a*t^2)}}
2) Точное или общее числовое значение для этой переменной
Physics[have_, find_] := Solve[Flatten[{
d == vf * t - (a * t^2) /2, (* etc. *)
have }], find]
Physics[{t == 9.7, vf == -104.98, a == -9.8}, {d}]
{{d->-557.265}}
Я не уверен, что правильно подхожу к проблеме.