Tout 82
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Rechercher
 
 

Résultats par :
 


Rechercher Recherche avancée

Connexion

Récupérer mon mot de passe

Chatbox externe


Derniers sujets
» [JEU] Mon voisin du dessous
Trouver tous les diviseurs d'un nombre entier [spé maths - TS] EmptyDim 16 Oct 2022 - 21:11 par Wistaro

» Bonne année 2018!
Trouver tous les diviseurs d'un nombre entier [spé maths - TS] EmptyVen 2 Nov 2018 - 19:42 par Ti64CLi++

» Lancement du TI-Concours 2017 !
Trouver tous les diviseurs d'un nombre entier [spé maths - TS] EmptySam 20 Mai 2017 - 0:27 par Paulo1026

» Chaînes Youtube des membres
Trouver tous les diviseurs d'un nombre entier [spé maths - TS] EmptyVen 19 Mai 2017 - 22:41 par Wistaro

» cacul du taux d'intêret
Trouver tous les diviseurs d'un nombre entier [spé maths - TS] EmptyVen 24 Mar 2017 - 21:50 par m@thieu41

» [Projet] Un mario by tout82
Trouver tous les diviseurs d'un nombre entier [spé maths - TS] EmptyDim 29 Jan 2017 - 14:09 par Wistaro

» Cherche documentation assembleur TI82stat
Trouver tous les diviseurs d'un nombre entier [spé maths - TS] EmptyMer 25 Jan 2017 - 12:29 par Ti64CLi++

» Probleme Ti-82 Stats fr
Trouver tous les diviseurs d'un nombre entier [spé maths - TS] EmptyJeu 12 Jan 2017 - 13:56 par Ti64CLi++

» ROM 82 stats.fr
Trouver tous les diviseurs d'un nombre entier [spé maths - TS] EmptyJeu 15 Déc 2016 - 10:24 par Ti64CLi++

Partenaires
TI-Planet Espace-TI : Forum

Faire un don à Tout-82...
Où va cet argent ?
Membres donateurs:- Persalteas (10€)
- Wistaro (5€)
- jo2geek (22€)

Les posteurs les plus actifs du mois
Aucun utilisateur

Le deal à ne pas rater :
Fnac : 2 Funko Pop achetées : le 3ème offert (large sélection de ...
Voir le deal

Trouver tous les diviseurs d'un nombre entier [spé maths - TS]

2 participants

Aller en bas

Trouver tous les diviseurs d'un nombre entier [spé maths - TS] Empty Trouver tous les diviseurs d'un nombre entier [spé maths - TS]

Message par m@thieu41 Mer 25 Sep 2013 - 21:03

Bonjour tout le monde! Smile 

Aujourd'hui je vais vous présenter un programme que j'ai fait et qui peut vous aider en spé maths si vous êtes en terminale S, lorsqu'on fait de l'arithmétique notamment (mais si vous l'utilisez pour autre chose tant mieux Wink), j'ai nommé: "DIV" (ok ce n'est pas très très original, vous pouvez le nommer comme vous voulez Razz ).

Il vous donne tous les diviseurs (positifs et négatifs) d'un nombre entier non nul (Nb: si le diviseur correspond à la racine carrée de |N| il vous le donne en double, puisqu'il forme un couple de diviseurs avec lui même).

Le tout en seulement 113o 82o !!! (et vous pouvez supprimer certaines parties notamment pour la saisie ~sécurisée, qui prend 11o). pirat 

Voici le code (Après les // ce sont des commentaires explicatifs):
Code:
Repeat Nnot(fPart(N //On attend un entier non nul //fPart = PartDéc sur une fr // not() = non()
Prompt N
End

{1->L1
For(A,2,sqrt(abs(N //sqrt = fonction racine carrée

//Si A est un diviseur on le sauve.
If not(fPart(N/A
A->L1(1+dim(L1

End

//On retrouve les diviseurs associés à ceux qui ont été trouvés (si 2 divise 36, 36/2=18 divise aussi 36), puisqu'on s'est arrêté à la racine de N
augment(L1,N/L1 //augment() = chaîne()

//On gère les opposés
augment(-Rép,Rép->L1

SortA(L1 //On trie les résultats //sortA() = triCroi()
L1 //On les affiche (en fin de prgm ça permet un défilement, donc si vous voulez mettez Pause mais pas de Disp)
Voici un lien de téléchargement:
http://www.mediafire.com/?a6fq7cc7e7lv11r

Ancien code moins optimisé (EDIT du 26/09/13):

Et un screenshot:
Trouver tous les diviseurs d'un nombre entier [spé maths - TS] Qytg

Voilà, en espérant que ça sera utile à quelques uns! Very Happy


Dernière édition par m@thieu41 le Jeu 26 Sep 2013 - 18:22, édité 7 fois
m@thieu41
m@thieu41
----------------------
----------------------

Messages : 939
Points Concours : 65
Productivité : 47
Date d'inscription : 02/06/2013
Localisation : Nice, France
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Revenir en haut Aller en bas

Trouver tous les diviseurs d'un nombre entier [spé maths - TS] Empty Re: Trouver tous les diviseurs d'un nombre entier [spé maths - TS]

Message par ashtrail Mer 25 Sep 2013 - 22:34

En voyant la fonction de ton programme j'ai essayé d'en faire un plus léger (sans regarder la tiens) mais j'ai échoué... Bon boulot! (remarque je m'en tape un peu moi je suis en spé info)
ashtrail
ashtrail
Connaisseur
Connaisseur

Messages : 248
Points Concours : 21
Productivité : 21
Date d'inscription : 18/06/2013
Localisation : Paris
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

http://ti-freeworld.fr1.co/

Revenir en haut Aller en bas

Trouver tous les diviseurs d'un nombre entier [spé maths - TS] Empty Re: Trouver tous les diviseurs d'un nombre entier [spé maths - TS]

Message par m@thieu41 Jeu 26 Sep 2013 - 17:06

Merci ! Smile 

Ta remarque m'a donné envie d'essayer de l'optimiser encore plus, j'édite avec encore plus d'optimisations, pour un total de 82o (saisie "sécurisée" d'un nombre entier comprise) Wink
m@thieu41
m@thieu41
----------------------
----------------------

Messages : 939
Points Concours : 65
Productivité : 47
Date d'inscription : 02/06/2013
Localisation : Nice, France
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Revenir en haut Aller en bas

Trouver tous les diviseurs d'un nombre entier [spé maths - TS] Empty Re: Trouver tous les diviseurs d'un nombre entier [spé maths - TS]

Message par ashtrail Jeu 26 Sep 2013 - 20:07

Quatre... Quatre-vingt... QUATRE-VINGT DEUX OCTETS!!!!!!!

Trouver tous les diviseurs d'un nombre entier [spé maths - TS] Oh_My_God-0013



(pour la peine je plussoie)
ashtrail
ashtrail
Connaisseur
Connaisseur

Messages : 248
Points Concours : 21
Productivité : 21
Date d'inscription : 18/06/2013
Localisation : Paris
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

http://ti-freeworld.fr1.co/

Revenir en haut Aller en bas

Trouver tous les diviseurs d'un nombre entier [spé maths - TS] Empty Re: Trouver tous les diviseurs d'un nombre entier [spé maths - TS]

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum