搜索
Dim c As String, s1 As String
s = Text1.Text:n=len(s)
s1 = ""
For i = 1 To n
x =Int(Rnd()*n)+1
c = Mid(s, x, 1)
If x mod 2 =0 then
c=chr((Asc(c)-Asc("a")+1)mod 26+Asc("a"))
Else
c=chr((Asc(c)-Asc("a")+25)mod 26+Asc("a"))
End if
s1 = c+s1
Next i
Text2.Text = s1
在文本框Text1中输入“fight ”，执行上述程序后，文本框Text2中输出不可能的是（ ）
| A．ejfis | B．jjffi | C．sssss | D．ieehs |
同类型试题
y = sin x， x∈R， y∈[–1，1]，周期为2π，函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x， x∈[–1，1]， y∈[–π/2，π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2
y = sin x， x∈R， y∈[–1，1]，周期为2π，函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x， x∈[–1，1]， y∈[–π/2，π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2
