Matrice
Fermé
paloi
-
16 févr. 2009 à 17:19
oh9007 Messages postés 41 Date d'inscription mardi 10 février 2009 Statut Membre Dernière intervention 15 septembre 2010 - 16 févr. 2009 à 21:59
oh9007 Messages postés 41 Date d'inscription mardi 10 février 2009 Statut Membre Dernière intervention 15 septembre 2010 - 16 févr. 2009 à 21:59
5 réponses
bizu53
Messages postés
1274
Date d'inscription
samedi 30 août 2008
Statut
Membre
Dernière intervention
21 juin 2015
860
16 févr. 2009 à 17:24
16 févr. 2009 à 17:24
Ce n'est pas en ayant la solution toute faite que ça t'aidera.
Tu ne l'auras pas.
Tu ne l'auras pas.
Dommage, j'avais une solution... mais il n'y a que 3 lignes et 3 colonnes ;-)))
togodo
Messages postés
148
Date d'inscription
vendredi 19 septembre 2008
Statut
Membre
Dernière intervention
19 août 2009
8
16 févr. 2009 à 18:10
16 févr. 2009 à 18:10
matrice[][]
nbColonne
nbLigne
taille=nbColonne*nbLigne
pour (i=0;i<taille-1;i++)
{
pour (j=i+1;i<taille;i++)
{
si(matrice[i%nbColonne][i/nbLigne]>matrice[j%nbColonne][j/nbLigne])
{
trans=matrice[i%nbColonne][i/nbLigne]
matrice[i%nbColonne][i/nbLigne]=matrice[j%nbColonne][j/nbLigne]
matrice[j%nbColonne][j/nbLigne]=trans
}
}
}
Grosso modo
Attention c'est une division entière.
nbColonne
nbLigne
taille=nbColonne*nbLigne
pour (i=0;i<taille-1;i++)
{
pour (j=i+1;i<taille;i++)
{
si(matrice[i%nbColonne][i/nbLigne]>matrice[j%nbColonne][j/nbLigne])
{
trans=matrice[i%nbColonne][i/nbLigne]
matrice[i%nbColonne][i/nbLigne]=matrice[j%nbColonne][j/nbLigne]
matrice[j%nbColonne][j/nbLigne]=trans
}
}
}
Grosso modo
Attention c'est une division entière.
dsl je veu la resolution en algorithme ou bien en pascal c pas en c++ . merci de me repondre maintenant
green day
Messages postés
26371
Date d'inscription
vendredi 30 septembre 2005
Statut
Modérateur, Contributeur sécurité
Dernière intervention
27 décembre 2019
2 162
16 févr. 2009 à 20:53
16 févr. 2009 à 20:53
Salut
Tu as un code à proposer ? :)
Dans le langage souhaité si possible ...
++
Tu as un code à proposer ? :)
Dans le langage souhaité si possible ...
++
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
oh9007
Messages postés
41
Date d'inscription
mardi 10 février 2009
Statut
Membre
Dernière intervention
15 septembre 2010
3
16 févr. 2009 à 21:59
16 févr. 2009 à 21:59
bonsoir
program matrice;
uses wincrt;
var m:array[1..10,1..10]of integer;
t:array[1..100]of integer;
i,j,k,x,taille,taillet:integer;
begin
write('la matrice doit etre carre: taillecolone=taille taille ligne= :');
read(taille);
writeln('remplir une matrice carre svp');
for i:=1 to taille do
for j:=1 to taille do
begin
write('m[',i,',',j,']= ');
read(m[i,j]);
end;
writeln;
for i:=1 to taille do
begin
for j:=1 to taille do
write(m[i,j]:4); writeln;end;
writeln;
writeln('la matrice trie :');
writeln;
k:=1;
for i:=1 to taille do
for j:=1 to taille do
begin
t[k]:=m[i,j];
k:=k+1;
end;
taillet:=taille*taille;
for i:=1 to taillet-1 do
for j:=i+1 to taillet do
if t[i]>t[j] then
begin
x:=t[i];
t[i]:=t[j];
t[j]:=x;
end;
k:=1;
for i:=1 to taille do
for j:= 1 to taille do
begin
m[i,j]:=t[k];
k:=k+1;
end;
for i:=1 to taille do
begin
for j:= 1 to taille do
write(m[i,j]:4);writeln;end;
readln;readln;
end.
program matrice;
uses wincrt;
var m:array[1..10,1..10]of integer;
t:array[1..100]of integer;
i,j,k,x,taille,taillet:integer;
begin
write('la matrice doit etre carre: taillecolone=taille taille ligne= :');
read(taille);
writeln('remplir une matrice carre svp');
for i:=1 to taille do
for j:=1 to taille do
begin
write('m[',i,',',j,']= ');
read(m[i,j]);
end;
writeln;
for i:=1 to taille do
begin
for j:=1 to taille do
write(m[i,j]:4); writeln;end;
writeln;
writeln('la matrice trie :');
writeln;
k:=1;
for i:=1 to taille do
for j:=1 to taille do
begin
t[k]:=m[i,j];
k:=k+1;
end;
taillet:=taille*taille;
for i:=1 to taillet-1 do
for j:=i+1 to taillet do
if t[i]>t[j] then
begin
x:=t[i];
t[i]:=t[j];
t[j]:=x;
end;
k:=1;
for i:=1 to taille do
for j:= 1 to taille do
begin
m[i,j]:=t[k];
k:=k+1;
end;
for i:=1 to taille do
begin
for j:= 1 to taille do
write(m[i,j]:4);writeln;end;
readln;readln;
end.
