1樓：匿名使用者
這個可以用直介面算出來的,5*7=3535*3為最小的一個,1000/35=28所以數字是35*3至35*27的數字
2樓：匿名使用者
for i=100 to 1000if i mod 5=0 or i mod 7=0 then print inext
輸出(1,100)之間同時被5和7整除的數的個數及他們的和?要求用vb編寫程式 哪位大神幫幫忙啊
3樓：
private sub command1_click()dim i as integer, s as integer, n as integer
for i = 1 to 100
if i mod 5 + i mod 7 = 0 then n = n + 1: s = s + i
next
print "(1,100)之間同時被5和7整除的數的個數："; nprint "它們的和："; s
end sub
4樓：小羅哥
option explicit
dim k as integer
dim s as integer
dim d as integer
private sub command1_click()for k = 1 to 100
if k mod 5 = 0 and k mod 7 = 0 then
s = s + 1 『個數
d = d + k 』他們的和
end if
next
end sub
5樓：大偉話熱點
temp=o；j=o
for i = 1 to 100
if i mod 5 =0 and i mod 7 = 0then
next
print(temp)
print(j)
vb程式設計題設計程式求VB程式設計題設計程式求s1234n1n的值並輸出，其中n是從鍵盤輸入大於1的正整數
照樓主的題目，n不是大於1的正整數，應該是大於回1的正偶數才對答吧？private sub mand1 click n val inputbox n if n mod 2 1 then exit subt 1 2 s t for i 3 to n 1 step 2t t i i 1 i 1 i 1 ...
設計程式用於求1到100之間所有整數的平方和
int s 0 平方和 for int i 1,i 101,i scanf 平方和是d s 輸出1到100中所有整數的平方和,寫出答案？答案為348250 sn n a1 2 n n 1 2n 1 d 2 6 n n 1 da1 include main printf d s return 0 in...
設計程式,讓計算機找出自然數來,使得其中任意兩個數
var a array 1.32767 of boolean b array 1.40 of integer i,s,t integer begin for i 1 to 32767 do a i false write 1 8,2 8 a 1 true b 1 1 b 2 2 s 2 repeat...