易語言中可以使用循環和條件判斷來實現數組去重的方法,具體步驟如下:
定義一個新的空數組,用于存放去重后的元素。
使用循環遍歷原數組中的每個元素。
在循環中,使用條件判斷判斷當前元素是否已經存在于新數組中。
如果不存在,則將當前元素添加到新數組中。
最后返回新數組作為結果。
具體代碼如下:
// 原數組
Dim arr[] = [1, 2, 3, 3, 4, 5, 5]
// 新數組,用于存放去重后的元素
Dim newArr[]
// 遍歷原數組
For i = 0 To arr.Length - 1 Step 1
// 判斷當前元素是否已經存在于新數組中
Dim isExist = False
For j = 0 To newArr.Length - 1 Step 1
If arr[i] = newArr[j] Then
isExist = True
Exit For
End If
Next
// 如果不存在,則將當前元素添加到新數組中
If Not isExist Then
newArr.Push(arr[i])
End If
Next
// 打印去重后的數組
For i = 0 To newArr.Length - 1 Step 1
Print newArr[i]
Next
運行結果為:1 2 3 4 5。