Triangle pascal [Résolu]

Salut Stoicien ,voici un programme en java qui permet vous d'ecrire le triangle pascal


public class TrianglePascal{

/* Attibuts de la classe */
/*************************/
private int taille;
int [][] triangle;

/* Constructeur n°1 */
/********************/
public TrianglePascal(int nvTaille){
if (nvTaille > 0){
triangle = new int [nvTaille][];
taille = nvTaille;
}
else{
System.out.println("usage: mauvais niveau entre (defaut:5)");
triangle = new int [5][];
taille = 5;
}
}

private void updateTriangle(){
for (int i = 0 ; i < taille ; i++){
triangle[i] = new int[i+1];
}
for (int i = 0 ; i < taille ; i++){
for (int j = 0 ; j < (i+1) ; j++){
if ((j == 0)||(i == j))
triangle[i][j] = 1;
else
triangle[i][j] =triangle[i-1][j-1] + triangle[i-1][j];
}
}
}

public String toString(){
updateTriangle();
String affichage = "";

for(int i=0 ; i<triangle.length ; i++){
for(int j = 0 ; j<triangle[i].length ; j++){
affichage += triangle[i][j];
}
affichage += "\n";
}
return affichage;
}
}

programme pascale qui affiche le triangle de pascal

program tr_pas;
uses crt;
const n=10;
var a:array[1..n,1..n]of integer;
i,j:integer;
begin clrscr; textcolor(10);
gotoxy(15,3);write('le triangle de pascal');
textcolor(11);for i:=1 to n do
begin a[i,i]:=1;a[i,1]:=1;
gotoxy(i+10+(2*i),i+5);write(a[i,i]);
gotoxy(13,i+5);write(a[i,i]);end;
for i:=2 to n do for j:=2 to i-1 do
begin a[i,j]:=a[i-1,j-1]+a[i-1,j];
gotoxy(j+10+(2*j),i+5); write(' ',a[i,j]); end;
readln;
end.

Bonjour,

En tapant les mots "algorithme triangle de pascal" dans google voici ce que je trouve sur le wikipedia : http://fr.wikipedia.org/wiki/Triangle_de_Pascal

Entre autre l'algorithme :

Variables :
Tableau de 1 à X de tableau de 1 à X d'entiers c (tableau bidimensionnel)
Entiers i, j, n, x

n ← 10
c[0][0] ← 1

pour i de 1 à n faire
     c[i][0] ← 1
     c[i][i] ← 1
     pour j de 1 à i-1 faire
          c[i][j] ← c[i-1][j-1] + c[i-1][j]
     finpour
finpour
afficher_tableau(c)

Reste plus qu'à le traduire dans la language que tu souhaite. Pour toute difficulté, lit bien toute la page avant de poser ta question.
Bon courage.

début procédure remplir (var t:tab;n:entier)
pour i de 1 a n faire
lire t[i]
fin pour
fin remplir