vb 求1到20内偶数的平方的积

2^2*4^2*...*20^2
=2^2*2^2*..^2^2*1^2*2^2*3^2*..*10^2
=2^20*(10!)^2

另外一种理解.
该偶数的平方 在1~20内.

这样的偶数有2^2=4 4^2=16 而6^2=36要超过20了
所以积是4*16=64

2*2＋4*4＋6*6＋8*8＋10*10＋12*12＋14*14＋16*16＋18*18＋20*20
＝4＋16＋36＋64＋100＋144＋196＋256＋324＋400
＝1540