[programme] Delta Discriminant

[Marco]

Je ne comprends pas ta question
Si c'est ce que tu veux dire, il n'y a que 2 tailles différentes.
Il y a effectivement une différence si tu mets ou non le -1.

[RoMz34]

En faite ^^ ma question c'est comment transformé sa :

2: Text(0,0,"X1=(-",B,"+sqrt(",D,"/(2*",A,")")


en plus grand ^^ ...

[Marco]

OK, alors il suffit de mettre le -1 comme ça :

Code: Select all

: Text(-1,0,0,"X1=(-",B,"+sqrt(",D,"/(2*",A,")")

[RoMz34]

whao , c'est exactement ce que je veut ^^ merci !! sa donne vraiment bien merci

EDIT : j'arrete pour ce soir , je reprend surement demain bonne nuit a tous et un grand merci a votre aide !!! a PlUs !!!

[Marco]

De rien
@+ (pour de nouvelles aventures !!!!)

[tama]

tiens, ça me rappelle mon ancien programme que j'avais fait quand j'étais aussi en 1èreS xD

J'avais même un prof qui m'avait demandé de l'adapter pour 82

[mode modeste]
Pas mal le programme sinon

EDIT : héééééééé ! RomZ !! Qu'est-ce que tu deviens ? pourquoi tu passes pas sur la TsT ?

[RoMz34]

Salut Tama ^^,

désolé je reprend aprés environs 6 mois car en faite je m'etait fait volé la calculette --' en sport ... c'est assez courant au lycée et pour la rentré je vien d'en avoir une !!
J'ai retrouver le bon vieu TsT désolé je ne le trouvé plus mais grace a ta baniere !!! ^^

Bon maintenant reprenons le projets !

J'aimerais savoir comment a tu fait le signe delta ? ^^ sa serais pas mal au lieu de metre D ... ^^ QUand au tableau de signe j'y suis pas encore a sa !!! (en cours je veut dire )

EDIT : existe-il un copier coller sur la calculette ?

Quand au logiciel pour faire un programme sur PC je cherche toujours ainsi qu'un testeur ... ^^ car je peut envoyé grace au PC de mes parents .. malheureusement TI graph link ne marche vraiment pas ... merci

[RoMz34]

Et voici le programme plus ou moin finalisé mais je pense que je vais pas trop m'attarder dessus ... mon but est juste d'apprendre ^^ Donc soit je le pousse au bout et passe tout en graphique , le finalise vraiment le rend estethique et fonctionel , sois je le laisse comme sa, simple mais assez brouillons^^ et ainsi je recommence un autre projet.

Code: Select all


1 : ClrHome
2 : Disp "AX^2+BX+C = 0"
3 : Prompt A
4 : If A = 0
5 : Then
6 : Disp "IMPOSSIBLE"
7 : Stop
8 : End
9 : Prompt B,C
10 : ClrHome
11 : Disp "D = B^2-4AC"
12 : (B^2)-(4AC) - D
13 : Disp " "
14 : Disp "Delta="
15 : Disp D
16 : Disp " "
17 : If D0
18 : Then
19 : Disp "2 SOLUTIONS"
20 : Output(1,1," // effacer le : done.
21 : Disp " " // sautez une ligne
22 : Pause
23 : ClrHome
24 : Disp "X1=(-B+√D)/(2A)
25 : Disp " "
26 : Disp "ET"
27 : Disp " "
28 : Disp "X2=(-B-√D)/(2A)
29 : Pause
30 : (-B+√D)/(2A) - I
31 : (-B-√D)/(2A) - J
32 : ClrDraw
33 : AxesOff
34 : Text (-1,0,0,"X1="
35 : Text (-1,9,0,"(-",B,"+sqrt(",D,"/(2*",A,")")
36 : Text (-1,26,0,"X1=",I)
37 : Pause
38 : Text (-1,0,0,"X2="
39 : Text (-1,9,0,"(-",B,"-sqrt(",D,"/(2*",A,")")
40 : Text (-1,26,0,"X2=",J)
41 : End
42 :
43 : If D0
44 : Then
45 : Disp "0 SOLUTION."
46 : End
47 :
48 : If D=0
49 : Then
50 : Disp "1 SOLUTION"
51 : Disp "DOUBLE"
52 : Disp " "
53 : OutPut (1,1,"
54 : Pause
55 : ClrHome
56 : Disp "X=(-B)/(2A)"
57 : Pause
58 : (-B)/(2*A) - K
59 : ClrDraw
60 : AxesOff
61 : Text (-1,0,0,"X=(-",B,"/(2*",A,")")
62 : Text (-1,0,0,"X=",K)
63 : End



[Bisam]

A la lecture du manuel, il n'y a pas l'air d'y avoir de copier-coller à proprement parler mais tu peux utiliser la commande [RCL] pour copier l'intégralité d'un programme puis effacer ce qui ne t'intéresse pas.
Ca peut servir par exemple de faire un programme type pour le début et la fin de tes programmes...

[tama]

oui, cf astuces z80
pour le delta, j'ai mis ma TI en français (juste le temps de le mettre) et c'est dans CatalogueCaractères, sinon tu peux bidouiller en prenant "(delta)x" ou "(delta)y" dans VarsWindow et supprimer le 2ème caractère par un espace