vf中计算三角形周长的程序

CLEARSETTALKOFFINPUT"请输入半径:"TORL=2*PI()*RS=PI()*R*R"半径为R的圆的周长为:",L"半径为R的圆的面积为:",SSETTALKON

CLEARLOCALM,NM=6N=4&&M!/(N!*(M-N)!)m_Factorial(M)/(m_Factorial(N)*m_Factorial(M-N))PROCEDUREm_Factor

settalkoff是关闭对话clear是清屏

1、clearinput"请输入三角形的底："toxinput"请输入三角形的高："toys=x*y/2"三角形的面积是：",s2、clearinput"请输入一个数："toxifx%2=1"是奇数"

classShape{voidarea(){}voidcircle(){}}publicclassTriangleextendsShape{floatarea(floati,floatj){retur

没有直接的函数,dow函数1-8,如果是星期日就是1,星期一,就显示2类推可以自己写函数来调用cdow是英文的如cdow(date())如果今天是星期三,就显示

简单,程序如下:cleam=0n=0sm=1sn=1s=0@4,4say'inputm'getmread@5,4say'inputn'getnreadfori=1tomsm=sm*iendforfor

&一般用宏替换变量举例如下：如果有表单中有100个文本框要设置它们的enabled=.f.除了setallthisform.setall("enabled",.f.,"textbox")这个是设置所有

n=""@2,10say"计算n个数的平均值,先输入数值个数n"getnpicture"999999"readn=val(n)DIMENSIONx(n)store0toxs=0fori=1ton@4,

input"输入数"toxdocasecasex=3andx6y=SQRT(2*SIN(3*X)+X)endcase再问：我就是这样做的，但是程序运行不了，要用自定义函数来做，就是含有return语句

input"x="toxdocasecasex

SETTALKOFFclearinput"a="toainput"b="tobinput"c="tocifa+b>canda+c>bandb+c>cs=(a+b+c)/2area=sqrt(s*(s-

迭加,把前一次算得的和作为后一次运算的一个加数,如S=0+1算得S=1,下一步S=S+2=1+2=3再问：FORi=100TO1step-2麻烦解释一下嘛再答：S初值应该是0吧，(1)S=100+0=

在命令中输入:x=7.5回车y=9.7回车xxxx=1+x/y回车xxxx屏幕显示结果

clearinput"请输入三角形的底："toainput"请输入三角形的高："tohs=a*h/2"三角形的面积是：",s

^,**,都是乘幂,优先级高于乘除,求余,27-6/3%8,27-2%8,2%8余数为2,所以结果是25

importjava.util.Scanner;publicclassTest{\x09publicstaticvoidmain(String[]args){\x09\x09Scannersca=ne

clears=1fori=1to100s=s*iendfor"1x2x3x4x.x100=",s

clear清楚屏幕store10toa定义a为10store20tob定义b为20setudfparmstoreference命令来强制改变自定义函数的参数传递方式按地址传递doswapwitha,(

clearinput"请输入圆的半径："torl=2*pi()*rs=pi()*r*r?"周长是：",l?"面积是：",s