1樓：excel開發
你可以追問我，這樣的補充問題讓我如何辦，再寫一段**上來？實際只要改幾行**就行了，汗，當我沒回答。
2樓：匿名使用者
option explicit
private sub form_click()dim fac() as integer, n(3) as integer
dim i as integer, j as integern(1) = 48: n(2) = 50: n(3) = 65for i = 1 to 3
call factor(fac(), n(i))print n(i); "的質因子是：";
for j = 1 to ubound(fac)print fac(j);
next j
next i
end sub
private sub factor(f() as integer, byval n as integer)
dim idx as integer, k as integerk = 2
do until n = 1
if n mod k = 0 then
idx = idx + 1
redim preserve f(1 to idx)f(idx) = k
n = n / k
else
k = k + 1
end if
loop
end sub
n(1--3)的值你可以任意改哈
3樓：蘇州螺絲
電腦方面的，不懂咦，回答不出來！
vb的程式設計，輸入任意的一個正整數 要把它逆序輸出？
4樓：殳妮素清一
private
subform_load()
dimi
asinteger
dimtemp
asinteger
dimresult
asstring
randomize
fori=1
to3temp
=rnd*10
iftemp=10
then
temp=1
result
=result
&trim(str(temp))
next
"隨機數："&
result
"反轉後："
&strreverse(result)
endsub
vb:輸入一個正整數n，把它分解成質因子相乘的形式 20
5樓：匿名使用者
option explicit
private sub command1_click()dim n%, i%
n = text1
label1 = text1 & "=1"
docall mini(n, i)
n = n / i: label1 = label1 & "*" & str(i)
loop while n > 2
end sub
private sub mini(n%, i%)'求最小的質數。
for i = 2 to n
if n mod i = 0 then exit fornext i
end sub
6樓：匿名使用者
遞迴：private sub geta(n as integer)if n <= 3 then
text1.text = text1.text & "*" & nelse
for i = 2 to n / 2
if n mod i = 0 then
n = n / i
text1.text = text1.text & "*" & iexit for
end if
next i
geta (n)
end if
end sub
如下呼叫：
text1.text = "36 = 1"
geta 36
c語言 輸入一個正整數n，把它分解成質因子相乘的形式
7樓：聽不清啊
#include
int main()
long n,i;
scanf("%ld",&n);
printf("%ld=",n);
for(i=2;n>=i;i++)
while(n%i==0)
printf("%ld",i);
n/=i;
if(n>1)printf("*");
if(n>1)printf("%ld",n);
printf("\n");
system("pause");
return 0;
8樓：匿名使用者
#include/*求比n小且和n互質的數的個數*/void break_up(long *p,long n)else}}
void main()}
一個正整數n,把它分解成質因子的相乘形式 c++程式設計
9樓：匿名使用者
剛才的你看不懂，這個我改簡單了一些，你應該能看懂了：#includeusing namespace std;
int main( )
else break;
}}cout< return 0;} 10樓：匿名使用者 #include using namespace std;int main( )else i++; sum=j; for(i=0;i return 0; }又要我改``...呵呵 輸入一個正整數n，把它分解成質因子相乘的形式 11樓：滑韋茂 int x,i,n=0; scanf("%d",&x); for(i=2;i x=x/i;}} printf("\n"); vb:輸入一個正整數n，把它分解成質因子相乘的形式
10 12樓：天蠍魔君 需要2個文字框text 和 2個按鈕command （一個計算 一個清除） dim x, a, b, k as string private sub command1_click() a = val(text1.text) x = 2 if a <= 1 or a > int(a) then if a = 1 then text2.text = "它既不是質數，也不是合數" else msgbox "請您先輸入資料", vbokonly + vbinformation, "友情提示" end if else do while a / 2 = int(a / 2) and a >= 4 if b = 0 then text2.text = text2.text & a & "=" & "2" b = 1 else text2.text = text2.text & "*2" end if a = a / 2 k = a loop do while a > 1 for x = 3 to sqr(a) step 2 do while a / x = int(a / x) and a >= x * x if b = 0 then text2.text = text2.text & x b = 1 else text2.text = text2.text & "*" & x end if a = a / x loop next k = a a = 1 loop if b = 1 then text2.text = text2.text & "*" & k else text2.text = "這是一個質數" end if end if end sub private sub command2_click() text1.text = "" text2.text = "" end sub 拷貝於 那個少年摩羯座 編寫程式，輸入兩個正整數m和n，輸出m和n之間的素數並統計素數的個數。要求定義並呼叫函式prime m 判斷m是否為素數，當m為素數時返回1，否則返回0。include int prime int m int main int argc,const char argv else pr... 1 開啟visual studio軟體，進入選單 檔案 新建 新建專案。選擇windows窗體程式，專案名為 sushu 2 在窗體上新增控制元件 lable控制元件，text值為 輸入一個數，判斷是否是素數 一個textbox控制元件 tb inputvalue 用來輸入要判斷的素數。3 素數設計... include int main for i 1 i n i printf sum 3f n sum return 0 示例執行結果 20sum 2.480 include int main void for int i 0 iprintf 數列前 d 項之和為 g n n,s return 0 v...編寫程式輸入兩個正整數m和n輸出m和n之間的素
編寫程式,輸入兩個正整數m和n,輸出m和n之間的素數並統計素數的個數 要求定義並調
輸入正整數n計算11315的前n項