Sorting algorithms/Selection sort: Difference between revisions

no edit summary
m (added Category:Sorting)
No edit summary
Line 1,977:
print
return
</lang>
 
=={{header|LSE (LSE2000)}}==
<lang LSE>
(*
** Tri par Sélection
*)
PROCEDURE &Test(TABLEAU DE ENTIER pDonnees[], ENTIER pTaille) LOCAL pTaille
ENTIER i, j, minimum, tmp
POUR i <- 0 JUSQUA pTaille-1 FAIRE
minimum <- i
POUR j <- i+1 JUSQUA pTaille FAIRE
SI pDonnees[j] < pDonnees[minimum] ALORS
minimum <- j
FIN SI
BOUCLER
SI i # min ALORS
tmp <- pDonnees[i]
pDonnees[i] <- pDonnees[minimum]
pDonnees[minimum] <- tmp
FIN SI
BOUCLER
FIN PROCEDURE
</lang>
 
=={{header|Lua}}==