對於i =0到9
b(i)=a(i)
對於j = 0至i-1
如果b(j)=a(i ),則
n=n+1
b(j)=-1
如果…就會結束
然後
代碼運行後，您將知道有幾項的值為-1，因此您可以再次為數組賦值。
dim c
將c(9-n)重定為雙精度
自己寫下面的代碼。