Calculs, calculs...

Algorithmes et histoire des mathématiques
jeudi 11 novembre 2010
par  Nathalie CARRIÉ

Avec CarMetal

Triplets Pythagoriciens avec boucle for simple :

for (x=1; x<100; x=x+1){
	for (y=x; y100; y=y+1){
		z=Math.sqrt(x*x+y*y);
		if (z-Math.round(z)==0){
			Println("x= "+x+" y= "+y+" z= "+Math.round(z));
		} else {

		}	
	}
}

Triplets Pythagoriciens avec départ de boucle aléatoire en y :

for (x=1; x<100; x=x+1){
	x=Math.round(Math.random()*100)+1;
	for (y=x; y<x+100; y=y+1){
		z=Math.sqrt(x*x+y*y);
		if (z-Math.round(z)==0){
			Println("x= "+x+" y= "+y+" z= "+Math.round(z));
		} else {

		}	
	}
}

Cela donne avec la coloration syntaxique d’un bon éditeur de textes :

TripletsPythagoriciens
TripletsPythagoriciensAvecBoucleForSimple

On obtient par exemple :

x= 95 y= 168 z= 193
x= 65 y= 72 z= 97
x= 65 y= 156 z= 169
x= 5 y= 12 z= 13
x= 48 y= 55 z= 73
x= 48 y= 64 z= 80
x= 48 y= 90 z= 102
x= 48 y= 140 z= 148
x= 36 y= 48 z= 60
x= 36 y= 77 z= 85
x= 36 y= 105 z= 111
x= 40 y= 42 z= 58
x= 40 y= 75 z= 85
x= 40 y= 96 z= 104
x= 40 y= 42 z= 58
x= 40 y= 75 z= 85
x= 40 y= 96 z= 104
x= 96 y= 110 z= 146
x= 96 y= 128 z= 160
x= 96 y= 180 z= 204
x= 50 y= 120 z= 130
x= 42 y= 56 z= 70
x= 87 y= 116 z= 145
x= 96 y= 110 z= 146
x= 96 y= 128 z= 160
x= 96 y= 180 z= 204
x= 78 y= 104 z= 130
x= 78 y= 160 z= 178
x= 13 y= 84 z= 85
x= 8 y= 15 z= 17
x= 25 y= 60 z= 65
x= 69 y= 92 z= 115
x= 39 y= 52 z= 65
x= 39 y= 80 z= 89
x= 40 y= 42 z= 58
x= 40 y= 75 z= 85
x= 40 y= 96 z= 104
x= 5 y= 12 z= 13
x= 66 y= 88 z= 110
x= 66 y= 112 z= 130
x= 40 y= 42 z= 58
x= 40 y= 75 z= 85
x= 40 y= 96 z= 104
x= 16 y= 30 z= 34
x= 16 y= 63 z= 65
x= 28 y= 45 z= 53
x= 28 y= 96 z= 100
x= 93 y= 124 z= 155
x= 69 y= 92 z= 115
x= 16 y= 30 z= 34
x= 16 y= 63 z= 65
x= 69 y= 92 z= 115
x= 7 y= 24 z= 25
x= 8 y= 15 z= 17
x= 22 y= 120 z= 122
x= 99 y= 132 z= 165
x= 99 y= 168 z= 195


Documents joints

Erreurs d'arrondi
Christian Vassar IUFM de Rouen
Triplets pythagoriciens
avec z comme étiquette sur le graphe
Triplets pythagoriciens
sans étiquette sur le graphe
Fichier Triplets de Pythagore pour QtiPlot
Fichiers binaires TI82
Triplets pythagoriciens code Scratch
Triplets pythagoriciens avec affichage code (...)
Triplets pythagoriciens : les sources AlgoBox

Commentaires

Logo de debimax
samedi 5 février 2011 à 11h55 - par  debimax

Regarde l’aide mémoire que je me suis fait http://megamaths.free.fr/pdf/aideme... (pour le tex http://megamaths.free.fr/pdf/aideme...)

J’aime bien R-cran voici une de mes activités pour le cours en tes ou ts sur les test à l’équation à une loi équirépartie http://megamaths.free.fr/pdf/adequa...
Tu pourras voir la difféerence entre R-cran et xcas(je débutais avec xcas)

Sinon, pour revenir à cette page je trouve cela intéressant.

Logo de Alain BUSSER
vendredi 19 novembre 2010 à 07h16 - par  Alain BUSSER

« il me semble qu’il pourrait rendre d’intéressants services pour la mise en œuvre des algorithmes » :

Question : Est-ce R-Cran possède des boucles à condition d’arrêt ? Parce que si oui, c’est effectivement un outil très intéressant pour l’algorithmique...

Logo de Hubert Raymondaud
mercredi 17 novembre 2010 à 12h53 - par  Hubert Raymondaud

Très intéressant... Un bon éventail d’outils informatiques sont présentés. J’utilise aussi et de plus en plus R (voir l’IREM de Lyon), pour les statistiques, mais il me semble qu’il pourrait rendre d’intéressants services pour la mise en œuvre des algorithmes...

Plus pratiquement le document « http://www.reunion.iufm.fr/recherch...;» a certaines images qui sont décentrées et dont il manque une partie .... Est-il possible d’y remédier ?

Je n’ai rien trouvé dans les archives « TripletsPythagoriciens.sb.zip » et « TripletsPythagoriciensAvecAffichage.sb.zip » ???

Bien cordialement
Hubert Raymondaud (de la CII proba-stat)