Posté le 02/05/2015 22:47
Planète Casio v4.3 © créé par Neuronix et Muelsaco 2004 - 2024 | Il y a 59 connectés | Nous contacter | Qui sommes-nous ? | Licences et remerciements
Planète Casio est un site communautaire non affilié à Casio. Toute reproduction de Planète Casio, même partielle, est interdite.
Les programmes et autres publications présentes sur Planète Casio restent la propriété de leurs auteurs et peuvent être soumis à des licences ou copyrights.
CASIO est une marque déposée par CASIO Computer Co., Ltd
Citer : Posté le 02/05/2015 23:15 | #
Le Basic de la ClassPad est très très lent. (j'avais tenté un Snake dessus mais c'était injouable)
Cependant ici les performances sont aussi déplorables car tu recalcules 2 fois 2^n-1 à chaque tour de boucle alors que n ne varie pas. Calcule-le une fois avant et mets-le dans une variable, puis utilises-la dans ta condition.
Ajouté le 02/05/2015 à 23:16 :
Ce qui te donne :
2⇒k
2^n-1⇒m
√(m)⇒p
[b][blue]While[/blue][/b] mod(m,k)≠0 and k≤p
k+1⇒k
[b][blue]WhileEnd[/blue][/b]
Print k
[b][blue]If[/blue][/b] k>√(m)
[b][blue]Then[/blue][/b]
[gray]"CAS [maroon]1[/maroon]"[/gray]
[b][blue]Else[/blue][/b]
[gray]"CAS [maroon]2[/maroon]"[/gray]
[b][blue]IfEnd[/blue][/b]
Ajouté le 02/05/2015 à 23:24 :
Ah ça a déjà été dit sur TIP...