欢迎来到天天文库
浏览记录
ID:48830767
大小:133.00 KB
页数:19页
时间:2020-01-31
《VFP程序设计.doc》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、.第六章程序设计..程序设计1*----------------------------------从键盘输入三角形的边长,输入边长满足两边之和大于第三边,且为正值。计算并输出三角形的面积S;若不满足以上条件,显示输出"不能构成三角形"。其中面积公式请参看(图1)。将面积值存入变量AREA中。请按照题目要求,在下面编写程序代码。*----------------------------------INPUTTOAINPUTTOBINPUTTOC?"三角形面积为",FUN(A,B,C)RETURNFUNCTIONFUN(a,b,c)AREA=-1*******
2、***Program********************End**********RETURNAREA程序设计2*----------------------------------从键盘任意输入的三个数按从大到小排序。排序后存入变量A,B,C中请按照题目要求,在下面编写程序代码。*----------------------------------A=-1B=-1C=-1input"x="toxinput"y="toyinput"z="tozFUN(X,Y,Z)RETURNFUNCTIONFUN(X,Y,Z)**********Program*****
3、***************End**********RETURNDOYZJ10WITHOUT程序设计3*----------------------------------从键盘输入一个数,如果该数字大于0,通过子程序输出该数字作为半径的圆面积;如果该数字小于等于0,则输出"不能作为圆的半径"。(PI=3.14)将结果存入变量OUT中,请按照题目要求,在下面编写程序代码。*----------------------------------INPUTTOA?FUN(A)FUNCTIONFUN(R)OUT=-1**********Program******
4、**************End**********RETURNOUT程序设计4*----------------------------------从键盘输入3个数,然后找出其中最大值和最小值。最大值存入MA中,最小值存入MI中。本题使用IF...EndIf语句完成。*----------------------------------INPUT"请输入一个数:"TOAINPUT"请输入一个数:"TOBINPUT"请输入一个数:"TOCMa=-1Mi=-1FUN(A,B,C)?MA,MIFUNCFUN(A,B,C)..**********Program*
5、*******************End**********RETURN程序设计5*----------------------------------计算下列分段函数:如下图当输入任意X值时,显示输出Y值,要求用DoCase语句实现。*----------------------------------INPUTTOX?FUN(X)RETURNFUNCTIONFUN(X)Y=-1**********Program********************End**********RETURNY程序设计6*-------------------------
6、---------判断一个三位数是否为"水仙花数",并输出判断结果,是为1,否为0。所谓"水仙花数"是指一个3位数,其各位数字立方和等于该数本身。将结果存入变量OUT中。*----------------------------------OUT=-1n=153**********Program********************End**********程序设计7*----------------------------------编程求对某一正数的值保留2位小数,并对第三位进行四舍五入。将结果存入变量OUT中。*-------------------
7、---------------h=234.5367OUT=-1**********Program********************End**********程序设计8*----------------------------------编程求对某一正数的值保留3位小数,并对第4位进行四舍五入。将结果存入变量OUT中。*----------------------------------h=234.5367OUT=-1**********Program********************End**********11程序设计9*-----------
8、-----------------------输出1
此文档下载收益归作者所有