既然英尺是标准
用数组存储英尺与其他量度单位之间的转换比例。
根据条件与下标运算就是了。

我是因为需要将此编程  ,我不懂QBASIC程序 ,能帮我完成吗?

defdbl a-z
dim s(9)
s(1)=0.0833
s(2)=6
s(3)=1
s(4)=660
s(5)=3281.5
s(6)=3.2815
s(7)=5280
s(8)=16.5
s(9)=3
do
input "Convert from:",T1
input "Convert to:",T2
if T1>9 or T1<0 or T2>9 or T2<0 then exit do
input "Length to be converted:",T3
print "Converted length:"; T3*s(T1)/s(T2)
print "Do you want to continue? Y or N:"
loop while ucase$(input$(1))="Y"

十分感谢  
[em40]辛苦了