Autorisation : Membre
Nb de messages : 6
Inscrit le : Dim 07 Déc 2014, 9:55
Posté le : Dim 07 Déc 2014, 14:39
Salut a tous !
Voici mon premier programme, il traduit un mot (ici bonjour) dans toutes les langues.
On affecte d'abord a toutes les lettres un valeur différente : A=1
B=2
etc
L=30
J'ai mis L=30 car sinon 2 combinaisons de lettres donnaient le même résultat.
Le programme associe a une valeur différentes langues pour le message
Ainsi on a : Français -> F*R = 6*18 = 108 donc pour 108 on affecte "bonjour"
pour l'anglais on a : En = E*N = 5*14 = 70 donc 70 affiche "hello"
Le programme donne :
Prommpt #
If #= (la valeur de la langue obtenue grace au code plus haut)
Then
Disp "(la traduction du message dans cette langue)"
End
If #= (la valeur d'une autre langue)
Then
Disp "(la traduction dans cette langue)"
End
Ici # = theta (le O barré au milieu obtenu avec Alpha 3 )
Répètez l'opération autant de fois que vous voulez de langues, et le tour est joué ! Ce programme est très simple (et très inutile, j'avoue) mais voila c'est mon premier et je suis assez content de moi.
Enjoy
ST4LK3|ER
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Dim 07 Déc 2014, 15:49
Tu as expliqué la procédure, entendu.
Utiliser les produits pour détecter des mots a des limites.
Le produit est commutatif. Donc FR=RF. Pour N lettres tu as N! possibilités, c'est pitoyable.
Si tu n'as pas des nombres premiers pour les lettres, tu peux avoir des produits différents (facteurs et longueur) avec le même résultat. 6*6=4*9=2*18=3*12=2*2*3*3
Les 26 plus petits nombres premiers : 2,3,5,7,11,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79,83,89,97,101
Les chaînes de caractères (manu var+7) de la ti82stats et ses successeurs permettent de tester des mots entiers.
Utilise la fonction Input pour ne pas avoir besoin de guillemets et le tour est joué.
Code
Input "LANG:",Str1
If Str1="FR"
Then
Disp "BONJOUR
Else
If Str1="EN"
Then
Disp "HELLO
Else
Disp "NO COMPRENDO
End
End
Une approche aussi basique de la traduction avec une base de données est très limitée mais c'est plausible avec quelques phrases prédéfinies.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Mar 09 Déc 2014, 9:48
Str1=Chaîne1. menu var+7
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
