当前位置:首页 » 编程软件 » vf巧数编程

vf巧数编程

发布时间: 2022-08-29 02:10:45

1. 我想问一下怎么用vf编程 S=1!+3!+5!+7!+9!

clear
s=0
for i=1 to 9 step 2
m=1
for j=1 to i
m=m*j
endfor
s=s+m
endfor
?"S=1!+3!+5!+7!+9!=",s

2. vf编程实例

clear
accept "请输入一个字符串:" to x1
wait "请再输入一个字符:" to x2
s=0
for i=1 to len(x1)
k=substr(x1,i,1)
if k=x2
s=s+1
endif
endfor
?"其中"+x2+"出现共"+alltrim(str(s))+"次"

3. 请教一道VF简单编程问题:用VF语言编写判断一个数是否为素数的循环程序

&& 判断素数的原理是:
&& 素数只能被 1 和 自己 整除
&& 根据这个原理,让被测数 m 分别除以 2 ...... m-1,最后看看是否有 1 次以上被整除
&& 如果有,说明这个不是素数。
&& 当然,为了程序的运行效率,以下程序是一遇到能被整除就 EXIT 退出 FOR 循环,
&& 因为 1 次能被整除就确定这个肯定不是素数了。

&& 1. 判断一个整数m是否是素数
CLEAR
INPUT "请输入一个整数:" TO m
y=1
FOR j=2 TO m-1
IF MOD(m,j)=0
y=0
EXIT
ENDIF
ENDFOR
IF y=1
? m, "是素数"
ELSE
? m, "不是素数"
ENDIF

&& 不用 MOD() 的话,就看看循环中除的结果是否整数
CLEAR
INPUT "请输入一个整数:" TO m
y=1
FOR j=2 TO m-1
a = m / j
IF INT(a) - a = 0
y=0
EXIT
ENDIF
ENDFOR
IF y=1
? m, "是素数"
ELSE
? m, "不是素数"
ENDIF

4. 急求用VF编程,随机抽取10个数,按升序或降序排列。求详细步骤过程及运行结果

新建一个程序(文件菜单——新建——程序——新建文件),写代码:

dimension a[10]
for i=1 to 10
a[i]=int(rand()*100)
endfor
for i=1 to 9
for j=i+1 to 10
if a[j]<a[i]
t=a[j]
a[j]=a[i]
a[i]=t
endif
endfor
endfor
?"10个随机抽取的数从小到大排列是:"
for i=1 to 10
??a[i]
endfor

然后,直接点击感叹号,保存并运行,图:

热点内容
安卓系统怎么通话 发布:2025-03-16 00:25:13 浏览:320
数据库上t 发布:2025-03-16 00:23:31 浏览:410
编译程序实现的途径 发布:2025-03-16 00:17:07 浏览:560
app编程入门 发布:2025-03-16 00:04:20 浏览:195
插接式数据库 发布:2025-03-15 23:52:59 浏览:68
安卓从哪里设置后摄像头镜像 发布:2025-03-15 23:51:27 浏览:975
服务器电脑超频教程 发布:2025-03-15 23:50:48 浏览:979
苹果手机如何找回appid密码 发布:2025-03-15 23:48:36 浏览:408
汽车顶部黑色是什么配置 发布:2025-03-15 23:40:15 浏览:563
校考上传照片 发布:2025-03-15 23:30:02 浏览:852