题目

【紧急求助】编写程序,求10-1000之间所有能被4整除余3,被7整除余4,被9整除余4的数的平方和

提问时间：2020-10-12

答案

楼上的写这么长,这个程序很简单啊
private sub form_click()
dim x as double,i as single
for i = 10 to 1000
if i mod 4 =3 and i mod 7 =4 and i mod 9=4 then x = x + i * i
next i
print x
end sub