Forum | TOUT sur la TI-82

TOUT sur la TI-82/TI-82 STATS/TI-82 STATS.fr - Index -> Discussions générales -> Espace de liberté -> [réglé]Traduire un algo

Page: 1, 2, 3 >>

[réglé]Traduire un algo

Auteur

Message

Cytropus

Autorisation : Membre
Nb de messages : 409
Inscrit le : Lun 07 Nov 2011, 12:09

Posté le : Lun 10 Déc 2012, 13:52

Bonjour à tous !

Voilà, j'ai un algo à faire pour vendredi 14.
Rien de bien compliqué en apparence. Seulement, le prof a dit: "dans le langage que vous voulez"

Donc, je vous demande comment traduire ce programme dans le plus de langage possible (de préférence, avant vendredi

)

Code

:0->N
:Prompt S
:If ent(S/10)=|=S/10
:then
:Disp "il n'y a pas de solution"
:Else
:S/10->X
:0->Y
:N+1->N
:Disp "nombre de billets de 10 euros:",X,"et nombre de billets de 20 euros:",Y
:While Y=<(S/10)-1
:X-2->X
:Y+1->Y
:Disp "nombre de billets de 10 euros:",X,"et nombre de billets de 20 euros:",Y
:N+1->N
:End
:End
:Disp "le nombre de couples solutions est",N

Merci d'avance pour votre aide

----------------------
Le nouveau site de tout82

Sangohan38

Autorisation : Membre
Nb de messages : 3370
Inscrit le : Sam 31 Déc 2005, 19:48

Posté le : Lun 10 Déc 2012, 14:35

Visiblement ce programme sert à donner le nombre de combinaisons de billets de 10 euros et de 20 euros à partir d'une somme notée S.
Déjà, je ne suis pas convaincu que ta première condition soit bonne car à mon avis S est un entier positif multiple de 10 afin de ne pas avoir de reste quand tu donnes le nombre de billets.

En effet, si S=30, on a ent(S/10)=3 et S/10=3 ce qui te fait mettre aucune solution alors qu'il existe des couples: 3 billets de 10 euros , 2 de 10 euros et un de 20 euros.

Après, il me semble plus simple de commencer par compter le nombre de billets de 20 euros et ensuite de les convertir en 2 de 10 euros. Cela devrai pouvoir se faire en utilisant une liste.

Enfin, est-ce moi qui rêve où en nous demandant de traduire ce programme dans d'autres langages tu cherches à faire tourner ton prof en bourrique?

Sangohan38

Persalteas

Autorisation : Membre
Nb de messages : 2164
Inscrit le : Sam 23 Jan 2010, 20:09

Posté le : Lun 10 Déc 2012, 14:56

je demande à Matref de te le faire en assembleur.

Parce que j'adore faire rager les profs.

Cytropus

Autorisation : Membre
Nb de messages : 409
Inscrit le : Lun 07 Nov 2011, 12:09

Posté le : Lun 10 Déc 2012, 16:29

Citer : Sangohan38

En effet, si S=30, on a ent(S/10)=3 et S/10=3 ce qui te fait mettre aucune solution alors qu'il existe des couples: 3 billets de 10 euros , 2 de 10 euros et un de 20 euros.

c’était bien [différent de], j'édite

Citer : Sangohan38

Enfin, est-ce moi qui rêve où en nous demandant de traduire ce programme dans d'autres langages tu cherches à faire tourner ton prof en bourrique?

Je vois vraiment pas de quoi tu parles

Citer : peralteas

je demande à Matref de te le faire en assembleur.

Je ne cherche pas que en assembleur (évidemment, je veux bien) mais aussi en C, C++, java.... (et même casio

)

----------------------
Le nouveau site de tout82

Persalteas

Autorisation : Membre
Nb de messages : 2164
Inscrit le : Sam 23 Jan 2010, 20:09

Posté le : Lun 10 Déc 2012, 16:56

Non mais des profs qui comprennent le Java y'en a. Des profs qui comprennent l'assembleur, ben... critor.

Sangohan38

Autorisation : Membre
Nb de messages : 3370
Inscrit le : Sam 31 Déc 2005, 19:48

Posté le : Lun 10 Déc 2012, 17:00

Essayes ceci je pense que ça devrait être plus court:

Code

Prompt S
If PartDec(.1S
Then
Disp « il n’y a pas de solutions »
Stop
End
.2S->N
1->I
ClrList L1
PartEnt(N)+(PartDec(N)=1)i->L1(I
While Real(L1(I
L1(I)-1+2i->L1(I+1)
I+1
End
For(A,1,dim(L1
Disp « Nombre de billets de 10 euros », Imag(L1(A
Disp « Nombre de billets de 20 euros », Real(L1(A
Pause
Disp « Le nombre de couples solutions est »,dim(L1

J'vais voir si c'est pas faisable dans une feuille excel en entrant les valeurs dans une cellule.

Sangohan38

blg_flg

Autorisation : Membre
Nb de messages : 661
Inscrit le : Mer 23 Mai 2012, 17:28

Posté le : Lun 10 Déc 2012, 17:04

Et Bisam? Non?

Moi je te conseille d'essayer un de ces langages. :grotroll:

Sangohan38

Autorisation : Membre
Nb de messages : 3370
Inscrit le : Sam 31 Déc 2005, 19:48

Posté le : Lun 10 Déc 2012, 17:12

Je me demande ce que ça doit donner en Shakespear.

Après c'est son problème nous on fait que lui donner des clés pour embêter son prof.

Sangohan38

blg_flg

Autorisation : Membre
Nb de messages : 661
Inscrit le : Mer 23 Mai 2012, 17:28

Posté le : Lun 10 Déc 2012, 17:14

Si le malbolge, ça embête pas ton prof, je crois que je peux plus rien faire pour toi.

Cytropus

Autorisation : Membre
Nb de messages : 409
Inscrit le : Lun 07 Nov 2011, 12:09

Posté le : Lun 10 Déc 2012, 18:48

Et comment tu traduis le prog en malbolge ?

----------------------
Le nouveau site de tout82

m@thieu41

Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44

Posté le : Lun 10 Déc 2012, 19:06

Je te l'ai fait en C

Code

#include <stdio.h>
#include <stdlib.h>
#include <math.h>

int main()
{
double S = 0, X = 0, Y = 0;
int N = 0;
printf("Montant : ");
scanf("%lf", &S);
if (floor(S/10) != S/10)
{
printf("Il n'y a pas de solution");
return 0;
}
X = S/10;
do
{
printf("\nNombre de billets de 10 euros: %lf\nNombre de billets de 20 euros: %lf\n", X, Y);
X = X - 2;
Y++;
N++;
}while(Y <= (S/20));
printf("\nLe nombre de couples solutions est : %d\n\n", N);
return 0;

}

----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)

Et au fait: la politesse n'a jamais tué personne

Google_AdSense

blg_flg

Autorisation : Membre
Nb de messages : 661
Inscrit le : Mer 23 Mai 2012, 17:28

Posté le : Lun 10 Déc 2012, 19:26

Beuh... C'est moche.

Enfin je vais pas le faire en Python: c'est trop facile.

Le voilà en Malbolge:

Code

(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<

Non je plaisante.

En réalité, ça doit être beaucoup plus long et complexe. Là, c'est juste des tas de "hello world".

Persalteas

Autorisation : Membre
Nb de messages : 2164
Inscrit le : Sam 23 Jan 2010, 20:09

Posté le : Lun 10 Déc 2012, 21:13

Matref te l'a fait en assembleur en une minute 20, et il a mangé entre temps.

Ce type m'impressionne.
Il devrait le poster lui même d'ici une heure ou deux...

matrefeytontias

Autorisation : Membre
Nb de messages : 111
Inscrit le : Lun 25 Jui 2012, 15:51

Posté le : Lun 10 Déc 2012, 21:38

Valà valààà

Code fully compatible avec les Ti-82 stats, par contre à compiler soi-même ^^

J'ai enlevé tous les trucs compréhensibles pour n'avoir que des nombres, c'est plus marrant

et du coup y'a pas besoin d'include, tu peux compiler le code tel qu'il est.

Code

.org $9327
.db $BB,$6D

lblStart:
ld hl,$FFFA
ld ($858F+299),hl
ld hl,$0
ld ($858F+325),hl
call $4EDC
call $4EFC
ex de,hl
ld ($858F+335),hl
call $4008
ld h,$00
ld l,a
or h
jp z,l9DBC
ld hl,text9E73
call $470D
ret

l9DBC:
ld hl,($858F+335)
call $4008
ld ($858F+345),hl
ld hl,$0
ld ($858F+347),hl

l9DCB:
ld hl,($858F+325)
inc hl
ld ($858F+325),hl
call l9E16
ld hl,($858F+345)
dec hl
dec hl
ld ($858F+345),hl
ld hl,($858F+347)
inc hl
ld ($858F+347),hl
ld hl,($858F+345)
xor a
add hl,hl
ld h,a
rla
ld l,a
or h
jr z,l9DCB
ld hl,$0
ld ($8252),hl
ld hl,($858F+299)
ld de,$6
add hl,de
ld a,l
ld ($8253),a
ld hl,text9E83
call $4781
ld hl,($858F+325)
call l9E57
ld hl,text9E8B
call $4781
call l9E63
ret

l9E16:
ld hl,$0
ld ($8252),hl
ld hl,($858F+299)
ld de,$6
add hl,de
ld ($858F+299),hl
ld a,l
ld ($8253),a
ld hl,($858F+345)
call l9E57
ld hl,text9E9D
call $4781
ld hl,$0
ld ($8252),hl
ld hl,($858F+299)
ld de,$6
add hl,de
ld ($858F+299),hl
ld a,l
ld ($8253),a
ld hl,($858F+347)
call l9E57
ld hl,text9EB5
call $4781
ret

l9E57:
call $4A7C
call $41C2
ld a,$05
call $51D4
ret

l9E63:
call $4CFE
ld h,0
ld l,a
ret

text9E73:
.db "Pas de solution",$00

text9E83:
.db "Il y a ",$00

text9E8B:
.db "couples solutions",$00

text9E9D:
.db " billets de 10 euros et",$00

text9EB5:
.db " billets de 20",$00

Par contre j'ai fait ça depuis ma 83+, donc j'ai pas testé sur 82 stats, même si théoriquement y'a aucune raison que ça marche pas vu que j'ai bien adapté toutes les adresses.

----------------------
Vous n'avez pas d'iPod ? Pas grave, vous pouvez quand même jouer à Jetpack sur votre calculatrice z80 : http://mattias.refeyton.fr/espace-ti/jetpack8x(+).zip !

Apprenez l'hexadécimal z80 ! Nan, vous n'êtes pas obligés de vouloir mourir, mais ça peut aider : http://espace-ti.forumactif.com/t576-programmer-en-hexadecimal-c-est-possible

Cytropus

Autorisation : Membre
Nb de messages : 409
Inscrit le : Lun 07 Nov 2011, 12:09

Posté le : Mar 11 Déc 2012, 19:23

Waouh !
Merci beaucoup !
Je l'essaye demain

Et merci à m@t aussi

Si jamais vous en avez d'autres, n'hésitez surtout pas

Re-up du sujet,
@matref: j'arrive pas à le lancer

----------------------
Le nouveau site de tout82

Samos

Autorisation : Membre
Nb de messages : 300
Inscrit le : Lun 14 Mai 2012, 18:51

Posté le : Mar 11 Déc 2012, 19:37

Go axe et hexa go

blg_flg

Autorisation : Membre
Nb de messages : 661
Inscrit le : Mer 23 Mai 2012, 17:28

Posté le : Mer 12 Déc 2012, 10:54

Tu le fais Samsa(s)m?

Cytropus

Autorisation : Membre
Nb de messages : 409
Inscrit le : Lun 07 Nov 2011, 12:09

Posté le : Mer 12 Déc 2012, 18:37

Bonne chance samsam !

Par contre, MATREF !!!!! j'arrive pas à le lancer !!!!

----------------------
Le nouveau site de tout82

blg_flg

Autorisation : Membre
Nb de messages : 661
Inscrit le : Mer 23 Mai 2012, 17:28

Posté le : Mer 12 Déc 2012, 19:39

Comment ça? Tu fais bien Envoi(9prgmxxxxx ?

Cytropus

Autorisation : Membre
Nb de messages : 409
Inscrit le : Lun 07 Nov 2011, 12:09

Posté le : Mer 12 Déc 2012, 20:38

Ben oui

peut-être es-ce du à une erreur de ti-éditor(je sais, je suis vieux jeu

) ou alors, c'est moi qu'ai pas doué....

----------------------
Le nouveau site de tout82

Page: 1, 2, 3 >>

TOUT sur la TI-82/TI-82 STATS/TI-82 STATS.fr - Index -> Discussions générales -> Espace de liberté -> [réglé]Traduire un algo

Flux RSS