Exercice de programmation - Page 1

Je suis en pleine période d'exams pour avoir mon bac.
Moi j'ai eu droit à ma Ti-92+ en physique et pour une des 2 épreuves de maths.
Je suis en Suisse
Les profs ont vérifié qu'elles étaient totalement vides avant l'exam et ils les ont prises avec les copies aussi...


Bon voilà mon problème...
Nous devions faire un programme qui retourne n lignes du triangle de Pascal (l'utilisateur donne n au lancement du prog).
Chaque ligne doit être présentée sous forme de liste.

Comment auriez-vous fait ?
J'ai eu la solution la plus optimisée de la classe, mais vous êtes sûrment plus doués que moi...

C'est du Ti-Basic pur...


le triangle de Pascal :
{1}
{1 1}
{1 2 1}
{1 3 3 1}
{1 4 6 4 1}
{1 5 10 10 5 1}
{1 6 15 20 15 6 1}
{1 7 21 35 35 21 7 1}
.
.
.

A vos claviers

les profs on regardé si ta Ti était vide ??? Ils ont pas le droit normalement (selon les loies francaises, en suisse je sais pas si c'est pareille)

Ils nous avaient annoncé qu'ils le feraient...

Nous avions tous une Ti-92+ aussi, c'était la seule calc graphique autorisée (louée par l'école)

johnnyholzeisen a écrit :
Bon voilà mon problème... Nous devions faire un programme qui retourne n lignes du triangle de Pascal

seq(seq(nCr(m,r),r,0,n-1),m,0,n-1)->f(n)

KK>Tout le monde ne connais pas le C.

Tiens je te donne pas le programme en entier mais celui que je te donne affiche la ligne correspondante du traingle de pascal.

pascal(y)
prgm
newlist(y)->lst
for i,1,y
(y-1)!/((i-1)!*(y-1-(i-1))!)->lst[i]
endfor
endprgm

il suffit d'entrer pascal (5) puis de regarder la liste 'lst'.

geogeo
a écrit : KK>Tout le monde ne connais pas le C.

C'est du TI-BASIC!!!

(Ce que j'ai changé en éditant, c'est qu'il faut partir de m=0, sinon on rate la première ligne. Et il faut donc aussi s'arrêter à n-1 pour avoir n lignes.)

lol, excuse moi kevin mais je ne fait plus de TI-Basic depuis longtemps et je n'arrive même plus à suivre les commandes... PAr contre je trouve que l'AMS est assez buggé au point de vue du TI-Basic mais bon ça vient peut être de moi, vu que je n'en fait plus.

C'est quoi un triangle de Pascal ?

Kevin Kofler a écrit :
seq(seq(nCr(m,r),r,0,n-1),m,0,n-1)->f(n)

Je voulais la présentation que j'ai indiquée....

J'ai utilisé la même technique pour mon programme.

For i,1,m
pause seq(nCr(i,x),x,0,i)
endfor

J'ai demandé au prof quel était le programme suivant en taille, c'est le double du mien.
Personne d'autre n'avait pensé aux combinaisons (j'ai vu la formule par hasard dans le formulaire)

la version de Kevin est plus rapide et plus peites=>plus optimiser

Bas mon programmes est assez facile; à adapter, il te donne une ligne au choix du triangle de pascal, il te suffit de faire un for et c'est bon, je pense que tu peux le faire.

t'as versions est optimisable en remplacant les for par des seq

C'est quoi seq au juste? Je fait plus de TI-Basic.

seq(3*x,1,10,x)->x est équivalent à :
{3}->t
for x,2,10
3*x->t[dim(t)+1]
endfor

Edit:erreur stupide de prog

MacIntoc a écrit :
la version de Kevin est plus rapide et plus peites=>plus optimiser

Je veux bien, mais elle ne correspond pas à ce qui était demandé dans la consigne...
Je vois en tout cas, que personne n'arrive à faire mieux que Kevin.

La plupart de mes copains ont fait un programme générant chaque liste à partir de la précédente.

Ué, mais bon, si la consigne c de pas faire mieux que le tiens...
La versions de Kevin est la plus optimiser qu'il puisse y avoir.

MacIntoc a écrit :
seq(3*x,1,10,x)->x est équivalent à :
for x,1,10
3*x->x endfor

c'est équivalent à
Newlist(10)->l
for x,1,10
3x->l[x]
endfor

EDIT :

La consigne est d'afficher dans l'écran IO :
{1}
{1 1}
{1 2 1}
{1 3 3 1}
{1 4 6 4 1}
{1 5 10 10 5 1}
{1 6 15 20 15 6 1}
{1 7 21 35 35 21 7 1}
C'est ce que mes profs voulaient...

MacIntoc a écrit :
seq(3*x,1,10,x)->x est équivalent à :
for x,1,10
3*x->x endfor

{}->x
for t,1,10
t*3->x[dim(x)+1]
endfor

plutot

Edit : Post croisé

Merci pour l'explication.

ui, merde, c vrai

Johnnyholzeisen, je ne vois pas de solution plus courte que la tienne si on veut afficher les listes dans l'écran I/O.

Au sujet du respect des consignes, ton extrait des consignes disait seulement "Nous devions faire un programme qui retourne n lignes du triangle de Pascal (l'utilisateur donne n au lancement du prog). Chaque ligne doit être présentée sous forme de liste." Une matrice est une liste de listes, donc je considère que mon "programme" répond à l'extrait de la consigne que tu avais posté: l'utilisateur donne n au lancement du programme (entre les parenthèses), le programme retourne n lignes du triangle de Pascal (il les retourne en tant que valeur de retour), et chaque ligne est présentée sous forme d'une liste (chaque ligne d'une matrice est une liste). Bref, il faut être plus précis dans ce qu'on poste comme consignes.

Sinon, y a ça qui devrait marcher et qui fait appelle qu'as des addition est des soustractions:

1->x[1,1]
for l,2,n
1->x[l,1]
seq(x[l-1,c-1]+x[l-1,c],2,dim(x[l-1])-1,c)->x[l,c]
1->x[l,dim(x[l])+1]
endfor

Thibaut: regarde le développement de (a+b)², (a+b)^3, (a+b)^4 ... et je pense que tu auras trouvé tout seul

Kevin Kofler a écrit :
Johnnyholzeisen, je ne vois pas de solution plus courte que la tienne si on veut afficher les listes dans l'écran I/O.

Au sujet du respect des consignes, ton extrait des consignes disait seulement "Nous devions faire un programme qui retourne n lignes du triangle de Pascal (l'utilisateur donne n au lancement du prog). Chaque ligne doit être présentée sous forme de liste." Une matrice est une liste de listes, donc je considère que mon "programme" répond à l'extrait de la consigne que tu avais posté: l'utilisateur donne n au lancement du programme (entre les parenthèses), le programme retourne n lignes du triangle de Pascal (il les retourne en tant que valeur de retour), et chaque ligne est présentée sous forme d'une liste (chaque ligne d'une matrice est une liste). Bref, il faut être plus précis dans ce qu'on poste comme consignes.

Les profs nous avaient fait un schéma de l'écran IO désiré.
J'ai vu la partie importante dans ta solution : utiliser la fonction nCr ! Le reste c'est moins important...

Ca vient de la formule du binôme de Newton:
Pour n entier; (a+b)ⁿ =sigma(k=0 à n)(C_n^ka^kb^n-k)
Les valeurs du C_n^k correspondent donc aux valeurs du triangle de Pascal.

Ximoon: il aurait découvert par lui même ... il aurait refait le th

Merci à vous

Oups
le triangle de Pascal donne à chacune de ses ligne les coefficients nécessaires pour développer (a+b)^n
on obtient le k-ième élément de la ligne n en additionant les éléments k et k-1 de la n-1-ième ligne

d'où ce qui est donné plus haut

Y a tellement de choses à dire sur ce triangle ... On peut y voir aussi bien le nombre d'or que des fractales...
Voici un petit aperçu : http://ptri1.tripod.com