* 求各位老大解决VFP编程问题
* 根据用户从键盘输入一个成年人的身高和体重,来判断是否是标准体型,
* 当身高低于150(CM)时,输出"特殊体型!",
* 当身高超过150CM时,再根据体重和身高来判断"过胖!"还是"过瘦!"(标准体重公式:体重(KG)=身高(CM)-105)
* 谢谢!
SET TALK OFF
CLEAR
INPUT '请输入身高(cm)' TO nHeight
INPUT '请输入体重(kg)' TO nWeight
IF TYPE('nHeight')#'N' OR TYPE('nWeight')#'N'
MESSAGEBOX('身高或体重数据类型错误')
ELSE
IF nHeight<150
MESSAGEBOX('特殊体重')
ELSE
IF nWeight>nHeight-105
MESSAGEBOX('过胖')
ELSE
MESSAGEBOX('过瘦')
ENDIF
ENDIF
ENDIF
*特别说明,总觉得判断过胖和过瘦的标准有问题