vb怎么编程求五边形面积
来源:学生作业帮助网 编辑:作业帮 时间:2024/04/30 09:00:07
Dimn,x,r,sAsSinglen=2s=0DoWhilen再问:能说一下算法的思路吗?再答:首先1不是素数,就用枚举将2到1000的每个数列举出来,再逐个检验,即从2到n/2一一举例,判断是否能
是没有思路,还是不会编程?至少有一位数字是5用以下的子函数boolIsInclude5(intnum){while(num!=0){if(num%10==5)returntrue;num=num/10
判断素数的原理是:素数是只能被1和本身整除的数.例如3只能被1和3整除,17只能被1和17整除等等,想9就不是素数(能被1,3,9整除).编程的算法是:穷举法,就是将需要判断的数除2、除3.一直除到这
PrivateSubCommand1_Click()Dima#,b#,c#,p#Me.AutoRedraw=Truea=3:b=4:c=5Doa=Val(InputBox("请输入三角形第一条边","
PrivateSubForm_Click()DimnAsIntegern=Val(InputBox("请输入N:"))Dima,bAsLonga=1:b=1Fori=1TonPrinta&""&b&"
把边加起来啊~任意一个五边形,我觉得可能没有公式了.五边形面积公式:a+b+c+d+e相信我没错哦~
简单就是不会再问:....再答:不是不会是好久没做了差不多都忘了呵呵
PrivateSubForm_Load()DoDimaAsSingle,bAsSingle,cAsSingle,pAsSingle,sAsSinglea=Val(InputBox("请输入三角形第1条
PrivateSubForm_Load()Fori=1To50n=1Forj=2Toin=n*jNexts=s+1/nNextMsgBoxsEndSu
PrivateSubCommand1_Click()DimaAsLongDimiAsLongDimsAsBooleans=Truea=InputBox("请输入一个自然数","输入")'-------
楼主sanjiaoxing这个类里面的Trianglele类没有被执行到,可以把Trianglele类里面的内容写在sanjiaoxing这个类的构造方法里,这样就在NEW这个sanjiaoxing类
代码:Private Sub Command1_Click() Call max100End SubSub&nbs
假设级数表达式为f(i),随i值的变化而减小,则可在循环时利用级数f(i)和f(i-1)的差值来与10^-6比较,当两次计算的结果满足dpp=Abs(dc)b=b*-1n=n+1mv=rad^(2*(
http://zhidao.baidu.com/link?url=wyic3NEB45i2K9YZE2SpNiAV4aD7rZHpluBlyF76zg0n_8wr1t6-KOYm6eYY23KqG5n
该程序不对啊,List1.AddItemp:这时的变量p已经为空了.需要有三个按钮、一个文本框、一个listbox我改后可以正常分解单词:PrivateSubCommand1_Click()DimsA
实数就是小数可以单精浮点型Single或双精浮点型Doubledimaassingle或dimaasdouble
你只需要编程么?PrivateSubCommand1_Click()IfVal(Text1.Text)>0AndVal(Text2.Text)>0ThenLabel1.Caption="长方形的面积为
一般用分割法,把五边形分成3个三角形再计算.或者我知道.面积A=Ki*a2(a的平方)其中a---边长,Ki---系数,i指多边形的边数,三边形K3=0.433四边形K4=1.00五边形K5=1.72
DimsAsString,posAsIntegerDimvAsDouble,aAsDouble,bAsDoubles="123.4567"'字符串的123.4567v=Val(s)'数值123.456
很简单的~不过你问错地方了