Re: Boucle probleme

Posté par Shuttt le 9/9/2004 12:02:22

Bonjour,

je vous propose une petite variante:


varI, varJ sont des entiers
ValDébut, ValFin sont des entiers

ValDébut = 1
ValFin = 100

TableSupprimeTout(TABLE)

POUR vari=ValDébut A ValFin
// utilisation du modulo du nombre (6+1 car je démarre varI-1
varJ=modulo(varI-1,7)
Trace(varI,varJ)
TableAjouteLigne(TABLE,NumeriqueVersChaine(varI, "07d")+TAB+varJ)
FIN

PS: si c'est un moyen de cryptage, c'est je pense un peu trop simpliste.


Salut