本文目录一览

1，vf编程实例

clearaccept "请输入一个字符串：" to x1wait "请再输入一个字符：" to x2s=0for i=1 to len(x1) k=substr(x1,i,1) if k=x2 s=s+1 endifendfor?"其中"+x2+"出现共"+alltrim(str(s))+"次"

vf编程实例

2，用VF设计一个程序

main() int i,j; i=1; j=1; while(i<100/5) while(j<100/1) if((i*5+j)==100) printf("可以买%d只公鸡,%d只母鸡.\n",i,j); } } 完毕,其他语言也差不多,改成相关用语即可

用VF设计一个程序

3，VF编程写出下面的程序

1.使用RAND()函数，此函数是随机产生0-1之间的乱数。2.SUBSTR(ALLTRIM(STR((a)),3,1)+SUBSTR(ALLTRIM(STR((a)),2,1)+SUBSTR(ALLTRIM(STR((a)),1,1)&&a是三位数3.你直接除就好了，保留几位小数你可以根据自己的需要。

VF编程写出下面的程序

4，vf 简单编程

clearinput "购买商品数 n=" to ninput "商品单价为 p=" to pif n>=50s=n*p*0.9elses=n*pendif?"购买商品数：",n?"商品单价：",p?"应付金额：",s
(1): (5+4)*2**2%3=0 表示5+4等于9，再乘以2，再乘以2　等于　36　再求　36除以3的余数　结果等于0 （2）deme array(5,5)执行后arra(3,3)的值是.f. deme 为变量定义，上面定义了一个二维数组　array ，vfp中如果定义了一个变量，而没有进行赋值的话，默认为一个逻辑值　且为 .f.

5，vf程序设计计算三角形面积和周长的程序急需

完整程序如下： clear set talk off input "输入边长a：" to a input "输入边长b：" to b input "输入边长c：" to c s=(a+b+c)/2 if a+b>c and a+c>b and b+c>a and a>0 and b>0 and c>0 area = sqrt(s*(s-a)*(s-b)*(s-c)) ?"三角形面积为：",s,"三角形周长为：",a+b+c else ?"不能构成三角形！" endif set talk on

文章TAG：程序  程序设计  设计  编程  vf程序设计  
下一篇