1樓：匿名使用者
同時與n互質的數 ------這個不太明白？能說一下嗎？ 下面1000以內質數演算法。
private sub command1_click()text1.text = ""
for i = 1 to 1000
k = 1
for j = 2 to i / 2
if i mod j = 0 then k = 0next j
if k = 1 then
'print i
text1.text = text1.text & i & " "
end if
next i
end sub
2樓：
option explicit
dim s() as long
function hzs(byval n as long)redim s(n) as long
dim tmp1 as long, tmp2 as long, t*** as long
dim bl as boolean
for tmp1 = 2 to n
bl = true
for tmp2 = 2 to tmp1
if tmp1 mod tmp2 = 0 and n mod tmp2 = 0 then
bl = false
exit for
end if
next
if bl then
t*** = t*** + 1
s(t***) = tmp1
end if
next
'輸出for tmp1 = 1 to t***print s(tmp1),
if tmp1 mod 5 = 0 then printnext
end function
用vb編寫程式 輸入乙個正整數n,輸出1~n中所有的素數
3樓：匿名使用者
在窗體上放乙個按鈕，然後**如下：
private sub command1_click()dim i, j, k as integerdim p as boolean
dim a as integer
k = 1
a = inputbox("請輸入n值：")for i = 2 to a
p = false
for j = 2 to a
if j >= i then exit forif i mod j = 0 then p = truenext j
if p = false then
print i;
if k mod 5 = 0 then printk = k + 1
end if
next i
end sub
輸入乙個正整數n(1
4樓：匿名使用者
#include
int main()
for(int i=0;iprintf("%d ",a[i]);
return 0;}
5樓：
|#include
int main(void)
for(i=n-1;i>=0;scanf("%d",a+i--));//n個數逆序存放
for(i=0;i是不是逆序存放的
printf("\n");
for(i=n-1;i>=0;printf("%d ",a[i--]));//現在正序輸出
printf("\n");
return 0;}
6樓：金色潛鳥
#include
int main()
編寫程式輸入兩個正整數m和，編寫程式，輸入兩個正整數m 和n 1 m，n 1000 ，輸出m n 之間的所有滿足各位數字的立
碧血玉葉花 include int is int number if s b return 1 else return 0 int main void include include int is int number int main void int m,n,y,result printf m,...
編寫程式,判斷正整數3 是否為素數 用VB）
所謂素數，是指除了1和該數本身之外，不能被其他任何整數整除的數。例如，13是素數，因為它不能被2，3，4，12整除。判斷乙個數n n 3 是否素數的方法是很簡單的 將n作為被除數，將2到 n 1 各個整數輪流作為除數，如果都不能被整除，則n為素數。private sub command1 click...
編寫程式輸入正整數n統計n中不同數字出現
大野瘦子 程式為 include int main while num 0 num 10 for i 0 i 10 i 注意事項 public class test01 system.out.println 共出現了 count 次 砍侃看 include int main while num 0 ...