资源描述：
《VF程序设计经典例题1》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、1.求园的面积（要求判断半径是否合理）CleaInpu‘r=’torIfr>0S=3.14*r*r?sElse?’半径错误！’Endif2.求分段函数Y的值Y=2x＋5x>0xx=0
2、x
3、x<0CleaInpu‘x=’toxIfx>0Y=2*x+5ElseIfx=0Y=xElseY=abs(x)EndifEndif?y3.输入一个百分制成绩判断其等级（优/良/中/及格/不及格）CleaInpu‘cj=’tocjDocaseCasecj>=90?’优’Casecj>=80?’良’Casecj>=70?’中’Casecj>=60?’及格’Orth?’不及格’Endc
4、ase4.输入若干个（个数不定）百分制成绩判断其等级（优/良/中/及格/不及格）CleaInpu‘请输入处理几个人的成绩：’tonFori=1tonInpu‘cj=’tocjDocaseCasecj>=90?’优’Casecj>=80?’良’Casecj>=70?’中’Casecj>=60?’及格’Orth?’不及格’Endcaseendfor1.求S＝1+2+3......+100CleaS=0Fori=1to100S=s+iEndfor?s2.求S＝1×2×3......×100Cleap=1Fori=1to100p=p*iEndfor?p3.求S＝1+3+
5、5......+99CleaS=0Fori=1to99step2S=s+iEndfor?s4.求S＝1－2+3－4......－100CleaS=0Fori=1to100S=s+(-1)^(i+1)*iEndfor?s5.求S＝1+1/2+2/3+3/5......前10项之和CleaS=0A=1B=1Fori=1to10S=s+a/bT=aA=bB=t+bEndfor?s1.求S＝1！+2！+3！......+10！CleaS=0P=1Fori=1to10P=p*iS=s+pEndfor?s2.对学生表中所有入学成绩≥650分的学生免去贷款CleaUse学生S
6、canfor入学成绩>=650.and.贷款否=.t.Repl贷款否with.f.EndscanUse************************************************************************3.输出图形CleaFori=1to4Forj=1toi??’*’Endfor?EndforCleaFori=1to4Forj=1to4-i??’’&&有一个空格EndforForj=1to2*i-1??’*’Endfor?EndforCleaFori=1to4Forj=1to4-i??’’&&有一个空格EndforFo
7、rj=1toi??’*’Endfor?Endfor1.判断一个整数是否素数CleaInpu‘x=’toxFori=2tox-1Ifmod(x,i)<>0LoopElseExitEndifEndforIfi>x-1?x,’是素数’Else?x,’不是素数’Endif2.判断十个整数是否素数CleaForj=1to10Inpu‘x=’toxFori=2tox-1Ifmod(x,i)<>0LoopElseExitEndifEndforIfi>x-1?x,’是素数’Else?x,’不是素数’EndifEndfor1.找出两个数的大数和小数CleaInpu‘x=’toxI
8、npu‘y’toyIfx>y?x,’大’,y,’小’Else?y,’大’,x,’小’Endif2.找出三个数的最大数和最小数CleaInpu‘x=’toxInpu‘y’toyInpu‘z’tozIfx
9、a(i)Min=a(i)EndifEndifEndfor?max,min1.找出2×3矩阵中的最大数和最小数cleadimea(2,3)fori=1to2forj=1to3input‘a(‘+str(I,2)+’,’+str(j,2)+’)=’toa(I,j)endforendformax=a(1,1)min=a(1,1)fori=1to2forj=1to3ifmaxa(I,j)min=a(I,j)endifendifendforendfor?’max=’,max,’min=’,min2.对三个整数从大到小排
10、序ClearInput‘
