Les Allergies
Alimentaires
Posez votre question Signaler

Exercices sur les matrices [Résolu/Fermé]

geronimo_2007 4Messages postés 3 mars 2007Date d'inscription - Dernière réponse le 24 mai 2010 à 15:52
est ce que quelqu'un parmi vous possede des exercices resolus sur les matrices en pascal??? svp si quelqu'un les possede les
Lire la suite 

Exercices sur les matrices »

26 réponses
Réponse
+38
moins plus
google tu connais?
tape exercies sur les matrices avec solution en pascal et tu verras...
voici un exemple :

program produit_mat(input,output);
var m1,m2,m3:array[1..10,1..10]of real;
l,m,n,jl,jm,jn:integer;
begin
writeln('nb lignes 1ère matrice ?');
readln(m);
writeln('nb colonnes 1è matrice ?');
readln(l);
writeln('nb colonnes 2è matrice ?');
readln(n);
(* entrée de m1 *)
writeln('première matrice');
for jm:=1 to m do for jl:=1 to l do
begin
writeln('lig',jm,', col',jl,'?');
readln(m1[jm,jl])
end;
(* entrée de m2 *)
writeln('2ième matrice');
for jl:=1 to l do for jn:=1 to n do
begin
writeln('lig',jl,', col',jn,'?');
readln(m2[jl,jn])
end;
(* calcul du produit *)
for jm:=1 to m do for jn:=1 to n do
begin {calcul composante m,n de m2}
m3[jm,jn]:=0;
for jl:=1 to l do m3[jm,jn]:=
m3[jm,jn]+(m1[jm,jl]*m2[jl,jn]);
end;
(* affichage du résultat *)
writeln('résultat');
for jm:=1 to m do for jn:=1 to n do
writeln('m[',jm,',',jn,']=',
m3[jm,jn])
end.

@I'm the god father@

geronimo_2007- 5 mars 2007 à 17:16
merci
momo - 24 juil. 2008 à 00:23
j voudrais savoir comment t'as fait sa
Réponse
+8
moins plus
salut moi je suis un etudiant (1ere année LMD Sciences et TECHNIQUE) je veus des exercices corrigé sur les applicaton léniairre et les matrices .


Merci.

k-zakaria - 23 sept. 2008 à 11:49
salut BENMOKHTARI comment va tu,je suis un etudiant ( LMD-mathematique et informatique) pour voire des exercices sur les applicaton léniairre et les matrices .
c'est pourtant bien de visite le site internet "bibmath.net" .aurevoire
Réponse
+6
moins plus
un site de developpement
www.developpez.com ca apres verifier dans le site de commentcamarche biensur

Réponse
+6
moins plus
soient deux matrices a(n.m)et b(n.m) écrire un algorithme permettant de realiser la multiplication de ces deux matrices a et b . l'opération de multiplication de a par b est telle qu'un élément de la matrice prodiuit fait intervenir la somme des produits des élémentsde la ligne i de a et de lla colonne b.soit:
c[i,j]=somme a[i,j]*b{k,j]

ala eddine - 7 mai 2010 à 18:28
donnez la solution de ce exercice en pascel (matrice)
Réponse
+3
moins plus
slt moi j voudrais savoir comment on met à nul tous les éléments diagonaux d'une matrice.
merci d'avance.

Édith - 16 mai 2008 à 21:35
Salut,

Regarde dans la F.A.Q Matrices
Réponse
+3
moins plus
je cherche a calculer deux matrice en fortran et pour cela il faut demander l'utulisateur de entrer les valeurs des deux matrices et le role de ce programme et de clcules leur produit

Réponse
+2
moins plus
g besoin de progame de transposer d'une matrice en pascal

khiter-zakaria - 11 nov. 2008 à 15:26
bonjour IMENE vous étes demander un programme de transpose d'une matrice en pascal

Program Transpose;

var i,j,a,b : integer;
Tab : array [1..20 , 1..20] of integer;
Tab2 : array [1..20 , 1..20] of integer;
begin
writeln(' Colonnes ? ');
readln(a);
writeln(' lignes ? ' );
readln(b);

for i:= 1 to a do
begin
for j:=1 to b do
begin
writeln( ' Donner les valeurs ', i, ' ' ,j, ' de votre matrice ');
read(Tab[i,j]);
end;
end;

for i:=1 to b do
begin
for i:=1 to a do
Tab2[i,j] := Tab[j,i];
end;

for i:=1 to b do
begin
for j:=1 to a do
write(' la transposée de votre matrice est ==>',Tab2[i,j]);
readln;
end;
end.
a bientot zak/2008
wiwi - 25 juin 2009 à 19:33
merci bien zakaria pr le program c riche de bcp d'informations surtt pr les universitaires en 1er années ST et j'esper bien q tu restera donné les informations pr les gens ki aime apprendre.et je veux savoir cmt je peux bien comprendre le program pascal psq c defficile 1 pe de crier 1 program quelconq
et merci pr tt
Réponse
+2
moins plus
Je voudrais savoir comment on met à nul tous les éléments diagonaux d'une matrice.

Réponse
+1
moins plus
salut je suis djamel etudiant universitaire je veux des quelque cours pour bien comprendre traduire un exercice dans le turbo pascal, les boucles , les tablaux ,etc .
et merci pour votre aide

Saba - 16 mai 2008 à 21:39
Salut,

Voici les cours gratuits en Français sur le langage Pascal. Si tu as des questions tu peu aussi commencer par chercher dans la F.A.Q Pascal
salehtoni - 20 juin 2008 à 19:53
merci pour sa
Réponse
+1
moins plus
salut zakaria merci j'ai lu votre fichier

Réponse
+1
moins plus
slt je m'appel fouad
j'ai cherche les exercices de pascal sur les matrices en tos les opérations

KHITER ZAKARIA_27_M - 8 nov. 2008 à 16:06
Salut FOUAD "what up !",donner moi qu'est-ce-qu'on les operations qui vous voullez exatement voire sur les matrices,
et pour une milleure manupilation sur les matrices visiter le site (developpez.com) puis (autres) puis (pascal)
Réponse
+1
moins plus
salut jai 1 exercices 1 peux compliqué sur les matrices esqe vs pouvez maider a trouver la solution svp merci davences

k-zakaria - 13 mars 2009 à 10:59
a votre services ,tu peut me le donne votre exercice et j'ai voir la possibilitie de le resoudre
Réponse
+1
moins plus
ecrir un programme qui lit la matrice 10 * 10
et l'ordre de chaque ligne par ordre croissant

Réponse
+0
moins plus
transposée ameliorée:
Program Transpose;

var i,j,a,b : integer;
Tab : array [1..20 , 1..20] of integer;
Tab2 : array [1..20 , 1..20] of integer;
begin
writeln(' Colonnes ? ');
readln(a);
writeln(' lignes ? ' );
readln(b);

for i:= 1 to a do
begin
for j:=1 to b do
begin
writeln( ' Donner les valeurs ', i, ' ' ,j, ' de votre matrice ');
read(Tab[i,j]);
end;
end;

for i:=1 to b do
begin
for i:=1 to a do
Tab2[i,j] := Tab[j,i];
end;
write(' la transposée de votre matrice est:');writeln;writeln;
for i:=1 to b do
begin
for j:=1 to a do
write(Tab2[i,j],' ');
readln;readln;
end;
end.

khiter z++ - 2 juin 2009 à 18:14
slt " karma4400" merci pour votre amelioration de la transpose, voila mon dernier programme

program trs_mat;
uses crt;
label s,z;
const L=5;C=5;
type tabl1 =array[1..L,1..C]of integer;
tabl2 =array[1..C,1..L]of integer;

var a : tabl1;b : tabl2;
i,j,cl,ln,k:integer;

begin s:clrscr;textcolor(10);
gotoxy(08,03);write('DONNER LA TAILLE DE LA MATRICE ; INTERVALE [1..5,1..5]');
gotoxy(08,05);write('LIGNES : ');readln(cl);
gotoxy(20,05);write('COLONNES : '); readln(ln);
textcolor(12);
gotoxy(08,07);write('CHARGEMENT DE LA MATRICE');
gotoxy(42,07);write('TRANSPOSE DE LA MATRICE');
textcolor(11);for i:=1 to cl do for j:=1 to ln do
begin gotoxy(10+j+(2*j),07+i+(2*i));readln(a[i,j]);end;
for i:=1 to cl do for j:=1 to ln do
begin b[j,i]:=a[i,j]end;
textcolor(11);for i:=1 to ln do for j:=1 to cl do
begin gotoxy(45+j+(2*j),07+i+(2*i));writeln(b[i,j]);end;
textcolor(12);
gotoxy(08,24);write('PRESS 1 TO REPEAT OR PRESS 0 TO EXIT : ');
readln(k);if k=1 then goto s else goto z;
readln;
z:end.

par z++/ 2009
Ce document intitulé « exercices sur les matrices » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?