上机任务七VFP上机任务七:顺序结构
程序设计 1.编写程序“公式.prg”,求表达式的值,变量x、y、z(y≠0,z≠0)的值由键盘输入。
CLEARINPUT”请输入X的值:”TOXINPUT”请输入Y的值(Y≠0)TOY:”INPUT”请输入Z的值(Y≠0)TOZ:”A=(ABS(X-Y)+SQRT(ABS(X*Y*Z))+Y/Z)B=EXP(ABS(X+Y))C=LOG(ABS(Y*Z))*SIN(3.1415926/6)S=A*B+C?”表达式的值是:”,S&;&;验证时,分别输入X=1,Y=1,Z=1,S的结果应是14.77812常见数值型函数ABS(<数值表达式>)EXP(<数值表达式>)INT(<数值表达式>)LOG(<数值表达式>)LOG10(<数值表达式>)MAX(<表达式1>,<表达式2>)MIN(<表达式1>,<表达式2>)MOD(<数值表达式1>,<数值表达式2>)RAND([<数值表达式1>])绝对值对基E的幂取整(舍尾)自变量自变量的自然对数自变量的普通对数两个值的最大值两个值的最小值求余数返回伪随机数也可用%lnxlgx|x|e=2.71828
ROUND(<数值表达式1>,<数值表达式2>)四舍五入第一个自变量SIGN(<数值表达式>)SQRT(<数值表达式>)自变量的符号平方根(正根)
2.
编写程序“综合
查询.prg”,从键盘输入专业名称、出生日期和入学总分,分别存放于变量ZY、RQ和ZF中,查询STUDENT表中指定专业、在指定日期及以后出生且入学总分大于等于指定分数的学生名单(和)。
CLEARUSESTUDENTINPUT"请输入专业名称:"TOINPUT"请输入出生日期:"TOINPUT"请输入学总分:"TOZYRQZF
SELECT,FROMSTUDENT;&;&;在程序中的SQL语句如需换行,加上分号表示,SQL之外的语句换行无需加分号在程序中的语句如需换行,加上分号表示,WHERE专业=ZYAND出生日期>=RQAND入学总分>=ZF
3.
编写程序“男女人数.prg”统计STUDENT表中的男生人数、,女生数,并输出结果:“男生人数是:
”
“女生人数是:
CLEARUSESTUDENTCOUNTTO
”
AFOR性别="男"FOR性别="女"&;&;?“男生人数:",&;&;?“女生人数:",
&;&;或者:select性别=&;&;或者:selectcount(*)fromstudentwhere性别="男"int
oarrayA1或者COUNTTOB&;&;或者:select性别=&;&;或者:selectcount(*)fromstudentwhere性别="女"intoarrayB1或者?“男生人数:",?"女生人数:",RETURNABA1(1)B1(1)
4.
编写程序“交换.prg”,从键盘接收两个数存入变量X、Y,使X、Y交换后输出新的X、Y。
INPUT"请输入X的值:"TOXINPUT"请输入Y的值:"TOYT=XX=YY=T?"X=",X?"Y=",YRETURN
5.
编写程序“圆面积.prg”,从键盘接收圆的半径R,然后计算圆面积、球体积,并输出。
CLEARINPUT"请输入球的半径:"TORPI=3.1415926S=PI*R^2V=(4/3)*PI*R^3?"圆的面积为:",S?"球的体积为:",VRETURN
6.
根据课本p124,熟悉MESSAGEBOX的使用。xy=2x-13x-11x<11≤x<10≤<x≥10≥
上机任务八选择结构程序设计VFP上机任务八:选择结构程序设计
2.函数见右图,编程,输入x,输出y的值。
CLEARINPUT"X="TOXDOCASECASEX<1Y=XCASEX<10Y=2*X-1OTHERWISEY=3*X-11ENDCASE&;&;错误:1<=X<10&;&;错误:Y=2X-1
?"Y=",Y*?"F(",X,")=",YRETURN