[填空题] 以下过程用来在w数组中插入x,w数组中的数已按由小到大的/顷序存放,n指存储单元中存放数组中数据的个数,插入后数组中的数仍有序。请填空补充程序。
Sub fun(w,x,n)
Dim i,p
p=0
w(n)=x
Do While x>w(p)
【11】
Loop
For i=n to p+1 Step-1
w(i)= 【12】
Next i
w(p)=x
n=n+1
Sub End
[填空题] 以下过程用来在w数组中插入x,w数组中的数已按由小到大的/顷序存放,n指存储单元中存放数组中数据的个数,插入后数组中的数仍有序。请填空补充程序。
Sub fun(w,x,n)
Dim i,p
p=0
w(n)=x
Do While x>w(p)
【11】
Loop
For i=n to p+1 Step-1
w(i)= 【12】
Next i
w(p)=x
n=n+1
Sub End
[11]p=p+1 [12]w(i-1)
先要找到x的插入点,从w(0)开始与x比较,找到第一个大于x的元素,该元素的位置即为x的插入点,DoWhile语句就是完成这个功能,p作为下标变量,每循环比较一次,就移动一次,因此要对p进行加1的操作;找到x的插入点后,要将其后元素依次后移,从最后一个元素开始移动,把前一个元素的值送到后一个元素处。
VIP截止日期:2025-01-02 00:37:31
←请使用支付宝扫码支付VIP截止日期:2025-01-02 00:37:31
←请使用微信扫码支付