vb编程,求s=a! b! c!,其中

a=Sqr(3):b=Sqr(2):c=a>b:Printc相当于a=Sqr(3)'a=根号3b=Sqr(2)'b=根号2c=a>b'c是一个boolean变量c=a>b=(根号3>根号2)=true

a=Val(inputbox("输入a"))b=Val(inputbox("输入b"))c=Val(inputbox("输入c"))Ifa+b>cAndb+c>aAndc+a>bThen'能构成Ifa

这个是海伦公式吧,用三角形的三条边直接求出三角形的面积的公式,可以参考海伦公式的百科：

孩子,作业要自己做.可以写两层循环或者把aaaa写成一个函数,然后在加法程序里调用这个函数

for循环修改下fori=1to2n-1step2a=a+inexti

PublicFunctions(n)Dimi,j,t,resFori=1Tont=1Forj=1Toit=t*jNextres=res+tNexts=resEndFunction

SubCommand1_Click()DimDeltaAsSingleDimaAsSingle,bAsSingle,cAsSingleDimx1AsSingle,x2AsSinglea=Val(Tex

你好!PrivateSubForm_Click()DimiAsIntegerDimsAsIntegerFori=1To100s=s+iNextiPrintsEndSu

#include#includevoidmain(){floata,b,c;\x09ints,area;printf("请输入三角形三边的值:\n");scanf("%f%f%f",&a,&b,&c)

#include<iostream>using namespace std;void main (){int a=10,b=20,c=3

#includeintJiecheng(intn)//计算n的介乘{ints=1;for(inti=1;i>c;intsum=0;sum=Jiecheng(a)+Jiecheng(b)+Jiechen

……t=1s=0Fori=1To10t=t*is=s+tNexti再问：这个要用什么下拉列表呢？再答：Textbox代码是在Botton中完成！

PrivateSubCommand1_Click()Dimi,j,k,l,iABCD,iCDC,iABCAsIntegerDimsi,sj,sk,sl,sItemAsStringFori=0To9Fo

.这点小问题先定义一下整数变量a,b,cDimaasintegerDimbasintegerDimcasintegerDimstrasStringString=""Fora=0To9Forb=0To9

首先“落叶|无情”的代码很好,但是我想题目中所说“用Sub过程和Function过程两种方法来实现”的意思,应该是用这两个独立实现求阶乘和,而不是在Sub中还要调用Function.当然,在Sub过程

这个不用穷举,自己也可以算出下图的结果.可以验证程序运行结果是否正确.'在窗体上添加一个名为Command1按钮.'具体代码如下.   '甲预测：

用Sub过程实现：PrivateSubCommand1_Click()DimtAsLongs=0fac01,ts=s+tfac02,ts=s+tfac03,ts=s+tPrint"s=1!+2!+3!

有错：1）delta=b*b-4*a*c2)要判断a是否为0

ifa+b>canda-

PrivateSubCommand2_Click()Dima,b,ca=Text1.Textb=Text2.Textc=Text3.TextIfa-bcAnda+caThenMsgBox"该组数可构成