标题:请教几个VFP数据库的问题
只看楼主
lanbaoshi
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2008-12-4
 问题点数:0 回复次数:2 
请教几个VFP数据库的问题
1、编写程序求1~100之间的偶数的和,并输出结果。


2、使用FOR循环,计算以下算式的值。
       S=11+22+33+44+55

3、已知三角形的三边长分别为a、b、c。编写一sjmj函数求三角形的面积s,并返回面积s。


请各位高手帮帮忙。谢谢!
搜索更多相关主题的帖子: 数据库 
2008-12-04 14:58
qjbzjp
Rank: 13Rank: 13Rank: 13Rank: 13
来 自:尧的故乡
等 级:贵宾
威 望:48
帖 子:1914
专家分:4397
注 册:2007-3-14
得分:0 
***1、编写程序求1~100之间的偶数的和,并输出结果。
s=0
FOR i=2 to 100 step 2
    s=s+i
NEXT
?s

****2、使用FOR循环,计算以下算式的值: S=11+22+33+44+55
s=0
FOR i=1 to 5
    s=s+i*11
NEXT
?s

***3、已知三角形的三边长分别为a、b、c。编写一sjmj函数求三角形的面积s,并返回面积s。
**设△ABC中,a,b是边长,∠C是a,b边的夹角。
FUNCTION jsmj
PARAMETERS x,y,z
    RETURN 0.5*x*y*SIN(z)
ENDFUNC

相互学习,互相交流,共同提高。
2008-12-04 18:17
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
得分:0 
Function sjmj
Parameters a,b,c
If Type('a')#'N' or Type('b')#'N' or Type('c')#'N' or a<=0 Or b<=0 or c<0 or a+b<=c or a+c<=b or b+c<=a
Return -1
EndIf
private p
p=(a+b+c)/2
return sqrt(p*(p-a)*(p-b)*(p-c))&&海伦公式

感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2008-12-05 01:14



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-247757-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.081135 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved