A.n1=n1+1
B.n2=n2+n3
C.I=I+2
D.n3=2*n3
下面的程序功能是找出滿足下列條件的四位整數(shù);(1)是一個(gè)完全平方數(shù);(2)第一,二位數(shù)相等,第三、四位數(shù)相等,同時(shí)統(tǒng)計(jì)滿足條件的數(shù)的個(gè)數(shù),完善程序。
Private Sub Form_Click()
Dim i As Integer,m As Integer,n As Integer
n = 0
For i = 32 To 99
m = i * i
If ()Then
Print m;
()
End If
Next i
Print
MsgBox "共找出" & s & "個(gè)符合條件的四位數(shù)"
End Sub
輸入任意長度的字符串,要求將字符順序倒置,例如“ABCDEFG”變換為“GFEDCBA”。