wxsh.net
当前位置:首页>>关于vfp 用外部内部过程文件三种方式编写1!+2!……10!...的资料>>

vfp 用外部内部过程文件三种方式编写1!+2!……10!...

主程序:Xa.prg Xa=0 FOR j=1 to 10 Xa=Xa+Xi(j) ENDFOR ? Xa 子程序:Xi.prg PARAMETERS N X=1 FOR i=1 to N X=X*i ENDFOR RETURN X 命令窗口输入 do Xa 计算1!+2!+……+10!的值为 4037913

s=0 for i=1 to 10 s=s+myProcedure(i) endfor ? s ****自定义过程 PROCEDURE myProcedure LPARAMETERS myPar1 y=1 for j=1 to myPar1 y=y*j ENDFOR return y ENDPROC

CLEARSET DECIMALS TO 12LOCAL i, ee = 1FOR i = 1 TO 20e = e + 1/m_Factorial(i)ENDFOR? "e=",eSET DECIMALS TO 2RETURN&& 阶乘函数PROCEDURE m_Factorial(n)IF n < 0RETURN -1ENDIFIF n = 0RETURN 1ENDIFn = INT(n)LOCAL i, nFactorialnFacto...

* 给你个程序吧 Set talk off clear input"输入N:" to mN Nsum=0 For n=1 to mN Nsum=nsum+jc(n) Endfor ? nsum * 自定义函数 Function jc Parameter x S=1 For m=1 to x S=S*m Endfor Return S

set talk offx=0sum=0for i=1 to 10x=x+isum=sum+xendfor? sumreturn

**t=1!+2!+...+10! clear t=0 for i=1 to 10 p=1 for j=1 to i p=p*j endfor t=t+p endfor ?"求t=1!+2!+...+10!结果为:",t

clearset talk offs=0t=1for i=1 to 20 t=t/i s=s+tendfor? sretu

计算机等级考试二级VFP考试简介 公共基础知识部分30分  专业语言部分 70分  基本要求 1、 具有数据库系统的基础知识 2、 基本了解面向对象的概念 3、 掌握关系数据库的基本原理 4、 掌握数据库程序设计方法 5、 能够使用VISUA...

CLEARSET TALK OFFinput "请输入数值n=" to n? summ(n)RETURNFUNCTION summ(n)PRIVATE i,ss=0FOR i=1 TO n s=s+iENDFORRETURN(s)

1.3 Visual FoxPro编程基础 -------------------------------------------------------------------------------- VFP是由FoxPro发展而来,并且根据“可视化编程”的需要,增加了一些新的操作。它的语句、函数和语法规则与Xbase(如dBASE、FoxBase...

网站首页 | 网站地图
All rights reserved Powered by www.wxsh.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com