1樓：匿名使用者
private sub ***bo1_click()dim s as string
dim n as integer
n = ***bo1.text
s = ""
s = "計算1!+2!+3!+...+" & n & "!,其結果內
為容" & jiecheng(n)
text1.text = s
end sub
private sub form_load()***bo1.clear
***bo1.additem ("7")
***bo1.additem ("8")
***bo1.additem ("9")
***bo1.additem ("10")end sub
public function jiecheng(byval n as integer)
dim m as double
m = 1
for i = 1 to n
m = m * i
next
jiecheng = m
end function
2樓：匿名使用者
參考**：
private sub ***mand1_click() dim i as integer for i = 1 to 10 sum = sum + jc(i) next msgbox sumend subfunction jc(a as integer) jc = 1 for i = 1 to a jc = jc * i nextend function
用c 語言求n的階乘，用c 語言求n的階乘
1 開啟vs6.0軟體，準抄備一個後襲綴為cpp的檔案，在c 檔案中首先寫入標頭檔案，定義一個處理階乘的函式，接著寫一個空的main函式 2 接著是階乘recv函式邏輯，該函式有一個形參n用來接收輸入的數。n的階乘是所有正整數的乘積，這裡的處理是sum不斷的用遞迴的方法乘以recv函式的輸入數，每次...
求N的階乘的最高位數用c或c，c語言 求階乘的最高位數
你問的什麼啊？不是求n的階乘啊，是求n的階乘的最高位數？理論上哪有最高位數？你們老師yy了吧 在c或c 中你階乘一上去變數就會溢位，你的意思是問臨界溢位的時候這個階乘的最高位數嗎？那你去看你的機器位數和c版本不就得了。int n int a 1 char buf 9 可以自己設定 scanf d n...
「求1到10的階乘之和」用vb怎麼程式設計序
先寫一個求階乘的函式 private function factorial byval n as integer as long dim i as integer,l as longl 1 for i 1 to n l l i next factorial l end function 新增一個按鈕...