當前位置:首頁 » 編程軟體 » 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

然後,直接點擊感嘆號,保存並運行,圖:

熱點內容
sql2008錯誤233 發布:2025-07-03 02:28:52 瀏覽:167
創建資料庫語句mysql 發布:2025-07-03 02:14:34 瀏覽:145
python量化投資 發布:2025-07-03 02:05:11 瀏覽:804
proxy代理伺服器地址 發布:2025-07-03 01:56:52 瀏覽:909
ps選區存儲 發布:2025-07-03 01:55:21 瀏覽:841
sql2008連接數 發布:2025-07-03 01:55:20 瀏覽:245
androidstring 發布:2025-07-03 01:53:55 瀏覽:182
密碼sql注入 發布:2025-07-03 00:44:07 瀏覽:555
oa伺服器需要什麼硬體 發布:2025-07-03 00:36:05 瀏覽:512
4mol的naoh怎麼配置 發布:2025-07-03 00:19:10 瀏覽:856