restart;
l:
A:=242.5:
E:=55000:
alpha:=2.3*10^(-5):
G:=6.57:
upsilon[0]:=25:
H[0]:=5000:
upsilon[x]:
equ := H[x]^2*(H[x]-H[0]+E*A*G^2*l^2/(24*H[0]^2)+E*A*alpha*(upsilon[x]-upsilon[0])) = (1/24)*G^2*l^2*E*A;
for l from 20 by 5 to 60 do
for upsilon[x] from -30 by 10 to 80 do solve(equ)
end do;
end do;
这是对线张力的简单计算,必须对从20米到60米的l(线跨度以'm'为单位)以及从-30摄氏度到80的所有温度升高时的每个跨度进行计算。度,增加10度。
如果我删除了内循环,则一切正常(假设我为upsilon [x]设置了一个值)。如果您也能告诉我如何将结果放入表格(如所附表格)中,我将非常高兴。