填空题
求一个三角形的面积,程序时先输入三角形的一条边长,其他两边比输入的边长长1倍和2倍,求计算面积前先要检查边长是否合理。
CLEAR MEMO
INPUT”请输入三角形一边长”T0 B
{{U}} [12] {{/U}}
?”B=” ,B
{{U}} [13] {{/U}}
D0 AREA{{U}} [14] {{/U}}
?‘三角形面积:’S1
PROCEDURE ABC &&过程ABC
IF B+B+DB+2
RETURN
ELSE
WAIT “输入的三角形边长值不合格!”
CANCEL
ENDIF
RETURN
PROCEDURE AREA SA过程AREA
{{U}} [15] {{/U}}
SS=(X+Y+Z)/2
S1=SQRT(SS*(SS-X)*(SS-Y)*(SS-Y))
RETURN
【正确答案】
1、[12] DO ABC
【答案解析】[13] S1=0
[14] WITH B,B+1,Sr
[15] PARAMETERS X,Y,Z,S1