题目

逆序数在一个排列中,如果一对数的前后位置与大小顺序相反,即前面的数大于后面的数,那么它们就称为一个逆序。一个排列中逆序的总数就称为这个排列的逆序数。逆序数为偶数的排列称为偶排列;逆序数为奇数的排列称为奇排列。例如序列2431,逆序依次为(2,1),(4,3),(4,1),(3,1),因此该序列的逆序数为4,为偶排列。 编写VB程序,功能如下:程序运行时,在文本框Text1中输入序列,单击“计算”按钮Command11,在文本框Text2中输出逆序数,并在 Label3中输出判断结果(偶排列或者奇排列)。程序运行界面如图所示。 (1) 如果序列为“5872469”,则逆序数为。 (2) 实现上述功能的VB程序如下,完善填空。 Function NiXuShu(s As String) As Integer        '逆序数计算    Dim i As Integer, j As Integer, c As Integer , n(1 To 100) As Integer    c=0    For i= 1 To Len(s)      n(i) =Val(Mid(s, i, 1))      For j=1 To i- 1        ifThen          c=c+ 1        End If      Next j    Next i     End Function Private Sub Command1_ Click()   Dim x As String, y As Integer   x = Text1.Text    Text2.Text = Str(y) If y Mod 2= 0 Then Label3.Caption = "偶排列" Else Label3.Caption = "奇排列" End Sub 答案: 【1】9 【1】n(j)>n(i)【2】nixushu=c【3】y=nixushu(x)
信息技术 试题推荐
最近更新