【程序代码vb】求在1~5000范围内所有偶数中满足被11整除余5,并且被17整除余3 的数之平方和
来源:学生作业帮 编辑:搜狗做题网作业帮 分类:数学作业 时间:2024/07/09 13:26:44
【程序代码vb】求在1~5000范围内所有偶数中满足被11整除余5,并且被17整除余3 的数之平方和
Private Sub Command1_Click()
Dim s&,i&
i = 2
While i Mod 11 5 Or i Mod 17 3 ‘先找到符合条件的第一个i
i = i + 2
Wend
For i = i To 5000 Step 374 ’步长值是11与17及2的积1(11*17*2=374)
s = s + i * i '加入i的平方
Next i
Print s
End Sub
输出答案是:
106837484
Dim s&,i&
i = 2
While i Mod 11 5 Or i Mod 17 3 ‘先找到符合条件的第一个i
i = i + 2
Wend
For i = i To 5000 Step 374 ’步长值是11与17及2的积1(11*17*2=374)
s = s + i * i '加入i的平方
Next i
Print s
End Sub
输出答案是:
106837484
【程序代码vb】求在1~5000范围内所有偶数中满足被11整除余5,并且被17整除余3 的数之平方和
某数被3整除余1被5整除为2,被7整除5,求适合条件的最小数,若此数在900-1000之
求VB程序代码,100至200之间,能被5整除,但不能被3整除的数.并求所有数之和
【紧急求助】编写程序,求10-1000之间所有能被4整除余3,被7整除余4,被9整除余4的数的平方和
能被11整除的数,但被3整除余2,被5整除余4,被7整除余6,被9整除8.
一个数被2整除余3,被5整除余2,被7整除余2,求这个数?
一个数被3整除余2,被5整除余1,被7整除余3,这个数是多少
小于200的自然数中被7整除余3的所有数的和是?
【程序代码】求在1000~2000中满足能被3整除,且至少有一位数字是9的所有整数之和
求所有能被7整除且被11整除余2的三位数之和
求所有能被7整除切被11整除余2的三位数之和
一个数被10整除余1,被3n整除余2 问被11整出的时候余几?而且 这个数怎样用N表示?