 |
Apprendre Maple Site dédié au logiciel de calcul formel Maple
|
Voir le sujet précédent :: Voir le sujet suivant |
Auteur |
Message |
max planck
Inscrit le: 19 Avr 2007 Messages: 2
|
Posté le: 26 Avr 2007 16:12 Sujet du message: Problème de considération de résultat d'une procédure |
|
|
> en_nombre:=proc(st) local ll,ii,table1;
global secret;
table1:=table(["a"=91,"b"=92,"c"=93,"d"=94,"e"=95,"f"=96,"g"=97,"h"=98,"i"=99,"j"=10,"k"=11,"l"=12,"m"=13,"n"=14,"o"=15,"p"=16,"q"=17,"r"=18,"s"=19,"t"=20,"u"=21,"v"=22,"w"=23,"x"=24,"y"=25,"z"=26," "=27,","=28,"'"=29,"."=30,"?"=31,"!"=32,":"=33,"é"=34,"è"=35,"à"=36,"'"=37,";"=38,"ç"=39,"@"=40,"("=41,")"=42,"-"=43,"ù"=44,"0"=5,"1"=46,"2"=47,"3"=48,"4"=49,"5"=50,"6"=51,"7"=52,"8"=53,"9"=54,"&"=55,"_"=56,"€"=57,"ê"=58,"œ"=59,"û"=60,"ô"=61,"/"=62]):
secret:=``:
ll:=length(st);
if ll=0 then RETURN fi;
for ii from 1 to ll do secret:=cat(secret,table1[substring(st,ii)]);
end:
end proc:
> en_nombre("antoine");
91142015991495
Voici ma procédure maple permettant de transformer un message texte en chiffre en associant a chaque caractère deux chiffres qui sont ensuite mis bout à bout pour former un seul nombre. Le problème rencontré est que le résultat ("91142015991495") est considéré par maple comme une série de caractères. Je ne peux donc pas le réutiliser dans une autre procédure en tant que nombre et ainsi réaliser d'autres opérations. Que faire pour que maple considère ce résultat comme un nombre? _________________ chic à AIR chi à 59 |
|
Revenir en haut de page |
|
 |
ALS
Inscrit le: 11 Sep 2006 Messages: 647
|
Posté le: 26 Avr 2007 18:12 Sujet du message: |
|
|
Bonsoir, il suffit d'appliquer la fonction parse sur la variable secret:
Code: |
> en_nombre:=proc(st)
> local ll,ii,table1;
> global secret;
> table1:=table(["a"=91,"b"=92,"c"=93,"d"=94,"e"=95,"f"=96,"g"=97,"h"=98,"i"=99,"j"=10,"k"=11,"l"=12,"m"=13,"n"=14,"o"=15,"p"=16,"q"=17,"r"=18,"s"=19,"t"=20,"u"=21,"v"=22,"w"=23,"x"=24,"y"=25,"z"=26," "=27,","=28,"'"=29,"."=30,"?"=31,"!"=32,":"=33,"é"=34,"è"=35,"à"=36,"'"=37,";"=38,"ç"=39,"@"=40,"("=41,")"=42,"-"=43,"ù"=44,"0"=5,"1"=46,"2"=47,"3"=48,"4"=49,"5"=50,"6"=51,"7"=52,"8"=53,"9"=54,"&"=55,"_"=56,"€"=57,"ê"=58,"œ"=59,"û"=60,"ô"=61,"/"=62]):
> secret:="":
> ll:=length(st);
> if ll=0 then RETURN fi;
> for ii from 1 to ll do secret:=cat(secret,table1[substring(st,ii)]);
> end:
> parse(secret)
> end proc:
>
> en_nombre("antoine");
91142015991495
|
Bonne soirée. |
|
Revenir en haut de page |
|
 |
|
|
Vous ne pouvez pas poster de nouveaux sujets dans ce forum Vous ne pouvez pas répondre aux sujets dans ce forum Vous ne pouvez pas éditer vos messages dans ce forum Vous ne pouvez pas supprimer vos messages dans ce forum Vous ne pouvez pas voter dans les sondages de ce forum
|

Développé par phpBB © 2001, 2006 phpBB Group
Traduction par : phpBB-fr.com
Apprendre Maple - ©
- Alain Le Stang - Navigation optimisée pour une résolution 1024 x 768.
|