Vos identifiants
Bienvenue
Voir tous les scripts
Pour mirc 6.1 et moins
Pour mirc 6.2
Pour mirc 6.3
Pour mirc 7.1
Top 10
Vous aimez ou détestez
Soumettre un script
Foire aux questions
Forum de discussion



Les bases du Scripting
Le virus "irc.worm.gen"
Le mIRC D'Or
ScreenShots
Le Défi du moment
Tag-moi-ça
Le Pire de l'IRC
L'IRC pour les nuls
Tutoriaux
Configurer UnrealIRCD
Configurer votre box
Attention à l'arnaque!
Usenet et les News
Arrêter de fumer
Un peu d'orthographe
Unreal/Anope Admin
mIRC Script Server
Proxy Web Chat
Magneto for Unreal
Super Poupées
Tour de cartes
L'Equipe
Partenariat
Administration

Web Of Trust
www.chat.exolia.net (Francophone)
fantasya.org (Francophone)

                                            

Factorisation en nombre premiers
Auteur(s): Averell
Date de soumission (Heure française): 11 janvier 2005 (21:33)
Taille du fichier: 329 Octets  
Type du fichier: snippet  
Dernière mise à jour le: 12 janvier 2005 (20:39)   (2)
Déjà visualisé: 3453 fois
Poster un commentaire
Ceci est le résultat d'un défi sur www.scriptsdb.org dont le but consistait a ecrire le plus petit code optimisé permettant de factoriser un nombre en nombre premiers. L'auteur est Mastersleepe.

Taper: //echo 1 -a $factor(N)

pour factoriser N. (82.127.179.***)


alias factor {
  var %t tokenize 32,%n $1,%f 2,%c,%r %n ^ .5
  %t 1 2 2 4 2 4 2 4 6 2 6
  while %f <= %r {
    while %f // %n {
      %n = %n / %f
      inc %c
    }
    if (%c) var %s %s %f ^ %c *,%c,%r %n ^ .5
    inc %f $1
    if (%f < 8) %t $2-
    else %t $2- $1
  }
  %f = $regsub(%s %n,/. 1\b| /g,,%r)
  return %r
}

Retour à la liste des snippets

De sax   le 12 janvier 2005 (12:22) (80.13.111.***)
Le but du concours sur scriptsdb.org était d'écrire le code le plus "optimisé" (meilleur compromis taille/performance). Ce code est le code gagnant, ce n'est pas le plus petit qui ait été produit, mais le plus optimisé !

Si vous le souhaitez, vous pouvez laisser votre commentaire sur ce snippet:  
Vous identifier d'abord
 

Cette annonce est-elle crédible? Cliquez ici pour le savoir