【求助】Manipulate函数的疑问

主要是赋值和延迟赋值的问题，你可以With[{t = 0, \[Delta] = 0}, H]感受一下，发现H根本没有计算
硬要这样的话，把最后一句改成
Manipulate[ Plot[H /. \[Delta] -> \[Delta]0, {t, 0, 24*365}], {\[Delta]0, -89, 89}]
就能画出来了，但是不推荐
建议使用下面这样的方法，虽然稍微麻烦一些，但是更清楚，不容易出Bug
$Assumptions = \[Delta] \[Element] Reals && t \[Element] Reals;
Clear[t];
\[CapitalPhi] = \[Pi]*24.5/180;
\[Phi][\[Delta]_] := \[Pi]/180 \[Delta];
\[Theta][t_] := (2 \[Pi])/24 t;
\[Alpha][t_] := (2 \[Pi])/(365*24) t;
H[\[Delta]_, t_] :=
Sqrt[(Cos[\[Phi][\[Delta]]] Cos[\[Alpha][
t]])^2 + (Cos[\[Phi][\[Delta]]] Cos[\[CapitalPhi]] Sin[\
\[Alpha][t]])^2] +
Sin[\[CapitalPhi]] Sin[\[Phi][\[Delta]]] Sin[\[Alpha][t]];
Plot3D[H[\[Delta], t], {t, 0, 24*365}, {\[Delta], -90, 90}]
Manipulate[
Plot[H[\[Delta], t], {t, 0, 24*365}, AxesOrigin -> {0, 0},
PlotRange -> {Automatic, {-1, 1}}], {\[Delta], -89, 89}]