Bonsoir à tous !
Voilà, j'ai essayé de faire un petit programme qui calcule la transposée d'une matrice mais j'ai deux problèmes en fait !
Est-il possible d'afficher sous forme d'une matrice dans un programme Pascal ou pas ? Car là, à la fin, il ne m'affiche les chiffres comme si c'était un tableau d'une dimension; je ne vois pas pourquoi
Voila mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Program Transposee;
 
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.
Je vous remercie pour vos réponses d'avance. A bientôt et bon courage à tous !