编写分支结构的程序:已知三角形的三条边是a,b,c.判断三角形的形状

不知要求用什么语言。假设是VFP。其他语言可作相应改变。
input "请输入三角形三边长" to a,b,c
max=iif(iif(a>b,a,b)>c,iif(a>b,a,b),c)
sum=a*a+b*b+c*c
do case
case 2*max*maxsum
"是钝角三角形"
endcase