m=0; n=0; b=50; w=0; for a=0:0.1:36 for c=0:0.1:2*pi for l=0:0.05:30 w=l; for k=-l:0.05:l z=a^2/60; t=(450+30*z-a*cos(c)*k)/(z+15); if (15-t-z)~=0 p=a*cos(c)+( 1/30*a*cos(c)*t-a*cos(c))*(25015-z)/(15-t-z); ...展开收缩

clc,clear %输入起始站点A A=input('the beginning:\nS','s'); %输入目的站点B B=input('the end:\nS','s'); %将输入的字符转数据化为数值数据 A=sscanf(A,'%d'); B=sscanf(B,'%d'); %地铁T1线,下行线是上行线原路返回 T1=[01 02 03 04 05 06 07 08 09 10 ... 11 12 13 14 15 16 17 18 19 20 21 22 23]; ...展开收缩