for i in range(5) :
print(i)
s=0
for i in range(1,10,3):
s=s+i
该程序段运行后,s的结果是
i = 1 #定义记录循环次数的变量
sum= 0 #定义结果变量,存放总和
while i <= 100:
i=i+1 #处理计数器
print(“1~ 100之间的数字之和为:”, sum) #输出结果
Dim i As Integer, s As Integer
s=4
i=9
If i < 1 Then
i=i-3
Else
i=s+i
End If
s=1
For i=1 to 3
s=s*i
Next i
x=0
For i = 1 to 5
For j = i to 5
x=x+1
Next j
Next i
Print x
Private Sub Command1_Click()
Dim age As Integer, tree As Integer
age = 15
tree = 1
Do While tree
age =
Tree = tree + (age - 14)
Text1.Text = Str(age)
End Sub
for i in range(1, 10, 3):
print(i, end=",")
s=0
For i=5 to -3 step-6
s=s+i
Next i
将字符串(均为大写字符)s依次转换为相对应的数值(字符A~Z对应数值1~26);
·转换后的数值以K个数据为一段,将n个待处理的数据依次分割成若干段(最后一段不足部分用0来补充);
每一段中K个数据与K*K转置矩阵进行乘法运算;
将乘法运算得到的每一个结果值除以26求余数,依次转换成相应字符(数值1~26对应字符A~Z),最后按原始字符串长度输出。
乘法运算规则如下:
第i个元素c(i)=第j个元素a(j)*转置矩阵第j行第i个元素b(t)的乘积之和(其中j=1,2…K)
例如:字符串s=PYTHON,区块大小K=4,的转置过程如下:


Private Sub Command1_Click()
Dim a(1 To 100)As Integer '存储字符串,长度不超过100个字符
Dim b(1 To 100)As Integer '存储转置矩阵,长度不超过10*10
Dim c(1 To 100)As Long
Dim s As String, tmp As String
Dim k As Integer, t As Integer, i As Integer, j As Integer
Dim n As Integer, m As Integer, lens As Integer
s=Text1. Text '在Text1中输入原始字符串
k=Val(Text 2.Text) '在Text2中输入区块大小K
Randomize
For i=1 To k^2
b(i)=Int(Rnd*9)+1
tmp=tmp+Str(b(i))
If i Mod k=0 Then
List 2. AddItem tmp
tmp=""
End If
Next i
lens=Len(s):n=lens
For i=1 To n
tmp=Mid(s,i,1)
List1. AddItem Str(a(i))
Next i
Do While n Mod k<>0
n=n+1
a(n)=0
List1. AddItem Str(a(n))
Loop
For i=1 To n
m=(i-1) Mod k+1
t=1
For j=
c(i)=a(j) * b((m-1) * k+t)+c(i)
t=t+1
Next j
Next i
For i=1 To n
List3. AddItem Str(c(i))
Next i
s=″″
For i=1 To lens
s=s+Chr(t+64)}
Next i
Text 3.Text=s '在Text 3中输出转置后的字符串
End Sub
1)def factoria1(n): #求n!
2) s=1
3) for i in range(2,n+1)::
4) s=s*i
5) return s
6)print(factorial(4))
s="abcdefg"
c=len(s) #len 求字符串长度
for i in range(0,c):
if i<2:
print (chr(ord(s[i])+2),end=" ") # ord()函数是chr()函数配对函数,将字符转ASCII值
else:
print(chr(ord(s[i]) + 3),end=" ")
⑴for w in['荷塘月色','背影','匆匆']:
⑵ print(w,'是朱自清的代表作!')
⑶print('这些都是我喜欢的作品!')
B .
C .
D .
for i in range (10):
print (i)
b=1
Do while (b<40)
b=b*(b+1)
Loop
Print b
s=0
for i in range(1,10,3):
s=s+i
该程序段运行后,s的结果是()。
for i in range(2,5):
print(i)
sum=0
for i in range(1,11,1):
sum=sum+i
print( sum)

Private sub Form_Click( )
For i= To 2000 Step
r=
Circle(3500,3500),r
Next i
End Sub