题目

将n个数分成偶数和奇数两部分，其中偶数在前奇数在后，要求分别对偶数和奇数进行升序排序。程序运行时，在文本框Text1中输入n，单击处理按钮Command1，分别在Text2、Text3中显示结果。程序运行效果图如图所示。 实现上述功能的VB代码如下，但加框处代码有错，请改正。 Dim a(1 To 100) As Integer Sub sort(left As Integer,right As Integer) Dim i As Integer,j As Integer,t As Integer For i=1 To right-left For j=' If a(j)>a(j+1) Then t=a(j):a(j)=a(j+1):a(j+1)=t End If Next j Next i End Sub Privat大、中、小三个同心圆的大小如图所示，请你计算每个圆的周长．若按这样的规律在大圆外面再画一个圆．它的周长又是多少？