Remplacement par position d’un élément dans un ensemble

function remplacerParPosition(ensemble,valeur,position)
   nouvelEnsemble = Structure(ensemble)
   if position <1
      return ensemble
   end
   index = 1
   positionTrouvée = false
   Initialiser(ensemble)
   while Enumeration(ensemble) &&!positionTrouvée
      element = Element_Courant(ensemble)
      if index == position
         Ranger_Element(nouvelEnsemble,valeur)
         positionTrouvée = true
      else
         index = index + 1
         Ranger_Element(nouvelEnsemble,element)
      end
      Element_Suivant(ensemble)
   end
   while Enumeration(ensemble) && positionTrouvée
      element = Element_Courant(ensemble)
      Ranger_Element(nouvelEnsemble,element)
      Element_Suivant(ensemble)
   end
   return nouvelEnsemble
end

Tests

ensemble = File(15,3,12,5,13, 2, 11)
ensembleVide = File()

element = 11
valeur = 99
println("Remplacer élément ",element, " par la valeur ", valeur)
nouvelEnsemble = remplacerParValeur(ensemble,element,valeur)

element = 9
valeur = 99
println("Remplacer élément ",element, " par la valeur ", valeur)
nouvelEnsemble = remplacerParValeur(ensemble,element,valeur)

element = 45
position = 7
println("Remplacer élément ",element, " par la position ", position)
nouvelEnsemble = remplacerParPosition(ensemble,element,position)

element = 45
position = 0
println("Remplacer élément ",element, " par la position ", position)
nouvelEnsemble = remplacerParPosition(ensemble,element,position)

element = 45
position = 1
println("Remplacer élément ",element, " par la position ", position)
nouvelEnsemble = remplacerParPosition(ensemble,element,position)

Swift

func remplacerParValeur 
   <_Element>(_ ensemble: Ensemble<_Element> 
   ,_ elementAremplacer: _Element 
   ,_ valeur: _Element) 
   -> Ensemble<_Element> { 

   let nouvelEnsemble = Structure(ensemble) 
   var trouvé = false 
   Initialiser(ensemble) 
   while Enumeration(ensemble) && !trouvé { 
      let element = Element_Courant(ensemble) 
      if element == elementAremplacer { 
         Ranger_Element(nouvelEnsemble,valeur) 
         trouvé = true 
      } else { 
         Ranger_Element(nouvelEnsemble,element) 
      } 
      Element_Suivant(ensemble) 
   } 
   while Enumeration(ensemble) && trouvé { 
      let element = Element_Courant(ensemble) 
      Ranger_Element(nouvelEnsemble,element) 
      Element_Suivant(ensemble) 
   } 
   return nouvelEnsemble 
}

Remplacement par position d’un élément dans un ensemble

func remplacerParPosition 
   <_Element>(_ ensemble: Ensemble<_Element>
   ,_ valeur: _Element
   ,_ position: Int) 
   -> Ensemble<_Element> {

   let nouvelEnsemble = Structure(ensemble)
   if position < 1 {
      return ensemble
   }
   var index = 1
   var positionTrouvée = false
   Initialiser(ensemble)
   while Enumeration(ensemble) && !positionTrouvée {
      let element = Element_Courant(ensemble)
      if index == position {
         Ranger_Element(nouvelEnsemble,valeur)
         positionTrouvée = true
      } else {
         index = index + 1
         Ranger_Element(nouvelEnsemble,element)
      }
      Element_Suivant(ensemble)
   }
   while Enumeration(ensemble) && positionTrouvée {
      let element = Element_Courant(ensemble)
      Ranger_Element(nouvelEnsemble,element)
      Element_Suivant(ensemble)
   }
   return nouvelEnsemble
}

Tests

let ensemble = File(15,3,12,5,13, 2, 11)

var element = 11
var valeur = 99
print("Remplacer élément \(element) par la valeur \(valeur)")
var nouvelEnsemble = remplacerParValeur(ensemble,element,valeur)

element = 3
valeur = 99
print("Remplacer élément \(element) par la valeur \(valeur)")
nouvelEnsemble = remplacerParValeur(ensemble,element,valeur)

element = 9
valeur = 99
print("Remplacer élément \(element) par la valeur \(valeur)")
nouvelEnsemble = remplacerParValeur(ensemble,element,valeur)

element = 45
var position = 7
print("Remplacer par élément \(element) à la position \(position)")
nouvelEnsemble = remplacerParPosition(ensemble,element,position)

element = 45
position = 0
print("Remplacer par élément \(element) à la position \(position)")
nouvelEnsemble = remplacerParPosition(ensemble,element,position)

element = 45
position = 1
print("Remplacer par élément \(element) à la position \(position)")
nouvelEnsemble = remplacerParPosition(ensemble,element,position)