编写一个圆的面积的简单程序vf

input"请输入第一个数："toainput"请输入第二个数："tobinput"请输入第三个数："toc?"最大值为：",max(a,b,c)

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

clearsettalkoninput"请输入一个数:"tonifn%2=0?"这是一个偶数!"else?"这是一个奇数!"endifsettalkon

voidmain(){floatr,s,l;floatpi=3.1415;printf("输入一个圆的半径:\n");scanf("%f",&r);if(

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

clearinput"请输入x的值："toxdocasecasex=2andx10y=-3*xendcase"y的值是：",y

楼上的方法应该没错,可感觉对于表现java面向对象的特性没有表现出来,下面是我写的,应该非常清楚明了了importjava.io.BufferedReader;importjava.io.InputS

s=0fori=1to100ifmod(i,5)=0s=s+iendif再问：能把源程序写出来吗？我是帮别人做的，我不会vf的语法，谢谢了……

publicclassTest{publicstaticvoidmain(String[]args){System.out.println("圆的面积："+area(2));System.out.pr

clears=0fori=1to200step2s=s+iendfor"200以内所有奇数的和:",s

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

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

（法1）#includeusingnamespacestd;#definePI3.1415926classCircle{doubler;public:Circle(doubleR=0){r=R;}vo

f=0dojchwith5,f带参数的调用子程序jch,?'f=',fprocjchparametersn,fac通过参数传递,n的值为5,fac的值为fm=1fac=1dowhilem

#includevoidmain(){doubler,s,l;printf("请输入圆的半径\n");scanf("%lf",&r);s=3.14159*r*r;l=2*3.14159*r;print

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

假设知道三角形的三边长为a,b,c.程序如下：#include#includedoublearea(doublea,doubleb,doublec){doublearea=0,s=0;s=(a+b+c

设上底为a,下底为b,高为h,则程序如下INPUTa,b,hs=(a+b)*h/2PRINT"S=";SEND

inputtoNFORi=1tonifmod(i,7)=0?iENDifENDFo

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