杭州交通信息网如何汽车2s店:BASLC程序编辑
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/07 18:09:05
题目：编一个程序，输出你的家庭成员中最高者的身高（单位：米）
我：1.53米
妈：1.55米
爸：1.67米
我：1.53米
妈：1.55米
爸：1.67米
5 DIM A(3),N$(3)
6 N$(1)="我":N$(2)="妈妈"":N$(3)="爸爸"
10 INPUT "请输入自己的身高";A(1)
20 INPUT "请输入妈妈的身高";A(2)
30 INPUT "请输入爸爸的身高";A(3)
40 IF A(1)>A(2) THEN A(0)=A(1):T=1 ELSE A(0)=A(2):T=2
50 IF A(3)>A(0) THEN A(0)=A(3):T=3
60 PRINT "最高的人是:";N$(T),"身高为";A(0)
70 END