L由最小的開始，利用while迴圈判斷何時Tab或Tac會大於2000，若同時都小於2000就停下來，併記錄j，也就是L的最小長度L(j)
L=3:0.1:6.7;
th = acos((45-L.^2)/36);
ph = asin((6*sin(th))./L);
Tab = 2000./(sin(th)+cos(th).*tan(ph));
Tac = (2000.*cos(th))./((sin(th)+cos(th).*tan(ph)));
j=1;
while Tab(j)>=2000 | Tac(j)>=2000
j=j+1;
end
L(j)
執行結果
L =
3.4000
>> j
j =
5
|