1樓：岔路程式緣
建立一個text1、一個command1，**如下：
private sub command1_click()if not isnumeric(text1.text) thenmsgbox ("請先在框中輸入數字的範圍")exit sub
end if
dim a(10) as integer, n as integerdim i as integer, og as integer, jh as integer
form1.autoredraw = trueform1.cls
n = val(text1.text)
randomize
print "輸入的10個數是：";
for i = 1 to 10
a(i) = int(rnd * n) + 1print a(i);
if a(i) mod 2 = 0 thenog = og + 1
else
jh = jh + a(i)
end if
next
print "偶數個數是："; og
print "奇數的和是："; jh
end sub
已經執行過。
vb用陣列結構編寫程式，輸入10個整數，統計奇數之和及偶數之和，謝謝
任意輸入10個整數，輸出其中的偶數，和偶數的個數
2樓：匿名使用者
#include
void main()
for(i=0;i<10;i++)
printf("總和為：%d\n",sum);
printf("偶數的個數為：%d\n",count);
printf("奇數為：\n");
for(i=0;i<10;i++)}
vb 先有一個框讓我輸入10個整數，分別計算出 奇數個數和，偶數個數和。 請測試好後發上來
3樓：岔路程式緣
dim a(10) as double, u as singledim i as integer, jg as integer, og as integer
private sub command1_click()form1.autoredraw = trueif i = 0 then
form1.cls
print "輸入的10個數是：";
end if
if not isnumeric(text1.text) thenmsgbox ("請先在框中輸入數字！")exit sub
else
u = val(text1.text)
if int(u) <> u then
msgbox ("請在框中輸入整數！")
exit sub
else
i = i + 1
a(i) = u
print a(i);
end if
end if
if i = 10 then
for i = 1 to 10
if a(i) mod 2 = 0 thenog = og + 1
else
jg = jg + 1
end if
next
print "偶數個數是："; og
print "奇數個數是："; jg
i = 0
end if
end sub
private sub form_load()text1.text = "在此輸入數字"
command1.caption = "輸入"
end sub
執行過了。
4樓：匿名使用者
nhionhionhinininininini
c語言 輸入一個整數 輸出其中的偶數和 還有奇數和 比如35412 偶數和4+2=6 奇數和 3+5+1=9
5樓：匿名使用者
想做彩票資料分析？把輸入存入字元陣列，然後對陣列的每個資料進行分析就好了！
vb 連續輸入10數字，顯示其中奇數的個數和偶數的個數
6樓：岔路程式緣
奇數的個數 和 偶數的個數，如下：
dim a(10) as double, u as singledim i as integer, jg as integer, og as integer
private sub command1_click()form1.autoredraw = trueif i = 0 then
form1.cls
print "輸入的10個數是：";
end if
if not isnumeric(text1.text) thenmsgbox ("請先在框中輸入數字！")exit sub
else
u = val(text1.text)
if int(u) <> u then
msgbox ("請在框中輸入整數！")
exit sub
else
i = i + 1
a(i) = u
print a(i);
end if
end if
if i = 10 then
for i = 1 to 10
if a(i) mod 2 = 0 thenog = og + 1
else
jg = jg + 1
end if
next
print "偶數個數是："; og
print "奇數個數是："; jg
i = 0
end if
end sub
private sub form_load()text1.text = "在此輸入數字"
command1.caption = "輸入"
end sub
已經執行過。
7樓：
用一個一維陣列a就可以解決了
奇數:ai mod 2 =1,則加1
偶數:10-i
vb程式設計，從鍵盤輸入10個數，輸出最大的奇數和最大的偶數
正約數個數是偶數個的正整數不是完全平方數
約數一般都是成對出現的,比如 20 1 20 2 10 4 5,這裡 1,20 2,10 4,5 都是成對的。但對完全平方數一定可以寫成 n n,當約數是n時,與其n配對的還是n,其約數的個數一定是奇數.完全平方數有標準分解式q1 n1 q2 n2 qk nk 其中,q1,q2,qn是素數,n1,n...
C語言程式設計 輸入整數，輸出這幾個數的和，例如2019，1
主要問題，哥的回答已經編譯 include int main void printf d sum return 0 你的補充問題 include int main void return 0 補充的第二個 include int main void printf 輸入要查詢的元素 n scanf d...
vb計算下式的和變數與n的數值用輸入對話方塊輸入
階乘的計算還是用遞迴更高階一點 哈 vb程式設計題 計算下式的和，變數x與n的數值用輸入對話方塊輸入 s 1 x inclde int main printf 最後結果為 d s return 0 int pingfang a,b return result int jiecheng a retur...