找出1個在1~1000中被7除余5、被5除余3、被3除余2的數(用ExitFor)。
(1)i mod 7=5 and i Mod 5=3 And i Mod 3=2
(2)i<1000
下面的程序是在一個字符串變量中查找"at",并用消息框給出查找結果的報告:沒有找到或找到的個數,程序如下:
(1)Len(str1)
(2)length
(3)Mid(str1,i,2)
(4)Sum=0
下面程序的功能是:計算f=1-1/(2*3)+1/(3*4)-1/(4*5)+……+1/(19*20)。
(1)sign=1
(2)Fori=2to19
(3)sign=-sign