Poster un nouveau sujet Poster une réponse
simplification
Auteur Message
thomas
Invité
Posté le : Sam 18 Mai 2013, 22:21   Citer 

bonjour à tous
j'ai fais un petit programme qui quand on entre un angle en radian donne sa simplification (entre 0 et 2pi) ainsi que le nombre de tours de tours
le seul problème c'est que THETA sort en décimal et j'aurai voulu savoir si c'était possible que la calto sorte un truc du style pi/4
merci de votre aide

  Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Sam 18 Mai 2013, 22:59   Citer 

Pour afficher en fonction de pi, tu divises par pi et tu affiche la fraction.

Code
ClrHome
Prompt theta
Disp "pi*
Disp theta/pi>Frac

Ou tu te procures le programme AUTOCALC sur Tiplanet ou tu achètes une ti plus puissante style nspire-cas.

Désolé d'voir posté un output avec un Frac dedans, cela ne marchait pas et maintenant c'est corrigé.

----------------------
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)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
thomas
Invité
Posté le : Dim 19 Mai 2013, 9:10   Citer 

euh ben moi j'ai erreur syntaxe quand je marque ce que tu m'as dis
ya pas de parenthèses à mettre?

  Haut de page Bas de page 
 
Kelk'1



Autorisation : Membre
Nb de messages : 36
Inscrit le : Lun 01 Avr 2013, 18:48
Posté le : Dim 19 Mai 2013, 11:42   Citer 


Citer
on entre un angle en radian donne sa simplification (entre 0 et 2pi)



Tu veux dire en "degré" j'imagine car la mesure en radian est déjà sous la forme Xpi/Y

----------------------
Signature inutile, enjoy =)
 Adresse email Haut de page Bas de page 
 
thomas
Invité
Posté le : Dim 19 Mai 2013, 12:12   Citer 

non je voudrais quand j'entre 29pi j'ai en sortie theta=pi et nb tours=14

  Haut de page Bas de page 
 
pito2901



Autorisation : Membre
Nb de messages : 106
Inscrit le : Sam 20 Avr 2013, 15:43
Posté le : Dim 19 Mai 2013, 12:13   Citer 

Mais non...

----------------------
visitez ma page ti82stats.fr
 Adresse email Haut de page Bas de page 
 
Kelk'1



Autorisation : Membre
Nb de messages : 36
Inscrit le : Lun 01 Avr 2013, 18:48
Posté le : Dim 19 Mai 2013, 12:38   Citer 

Ah d'accord, si cela est ton souhait ce n'est pas très compliqué,


Code

:Prompt N         // là tu rentreras 29, sans le pi
:EffEcr
:PartEnt(N/2 -> T
:Disp 2*(N/2-T) >Frac
:Output(1,1,"pi*
:Output(2,1,"TOURS=         
:Output(2,8,T



----------------------
Signature inutile, enjoy =)
 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Dim 19 Mai 2013, 13:57   Citer 

Je signale que l'angle principal est dans ]-pi;pi], pas dans [0;2pi[
(De plus le calcul de Kelk'1 manque de rigueur dans le calcul du reste, qui poserait problème si on divisait autrement que par 2.)

Si vous voulez quand même dans [0;2pi[, rien de plus facile, on corrige le petit manque rigueur de Kelk'1.

Code
// programme de Kelk'1
:Prompt N         // là tu rentreras 29, sans le pi
:EffEcr
:PartEnt(N/2 -> T
:Disp N-2T >Frac    // c'est ça que j'ai modifié
:Output(1,1,"pi*
:Output(2,1,"TOURS=         
:Output(2,8,T



Ce que j'ai posté précédemment dans le sujet n'est qu'un moyen d'afficher selon pi un nombre donné en pi*radian.
Il est plus judicieux de faire comme Kelk'1 (et moi ci-après) qui propose de saisir sans le coefficient pi.

Voici le programme ultime actuellement. Donne R dans ]-pi;pi], mais vous pouvez récupérer dans [0;2pi[ avec le calcul intermédiaire.
https://tout82.pages-perso.free.fr/forum/sujet.php?message=49876#49876

Code
// programme de Linkakro
Disp "A=Xpi=Rpi+2Kpi
Prompt X
int(X/2->K
X-2K->R    // premier jet , R e [0;2[
K+(R>1->K
R-2(R>1->R // second jet , R e ]-1;1]
Disp "K:",K,"R:",R>Frac

EDIT : remarque : int=partEnt, ce n'est pas une erreur, ou plutôt c'est TI qui a créé la confusion avec iPart=ent

----------------------
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)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
Kelk'1



Autorisation : Membre
Nb de messages : 36
Inscrit le : Lun 01 Avr 2013, 18:48
Posté le : Dim 19 Mai 2013, 18:32   Citer 

Oups pas vu la simplification minied.gif

----------------------
Signature inutile, enjoy =)
 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





  Page générée en 6 requêtes