Изменения

'''if''' key i == Set[2, i]0 '''for''' j = i '''to''' n - 21 Set[1, j] = Set[1, j + 1] Set[2, j] = Set[2, j + 1] n = n - 1 Array.Resize(Set[2], n)