Discussion :

[med.ycf]

Salut à tous,
j'ai un problème : je veux transformer ma matrice n*m en un tableau à une seule dimension. Voilà, j'ai essayé mais ça n'a pas marché.
Aidez-moi s'il vous plaît ..

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
 
program heh;
uses crt;
var
  t:array[1..10,1..1à] of integer;
  k:array[1..1)] of integer;
  i,n,j,l,m:integer;
begin
  clrscr;
  readln(n);readln(m);
  clrscr;
  for i:= 1 to n do
    for j:=1 to m do 
      begin
        readln(t[i,j]);
      end;
  for i:= 1 to n do
    for j:=1 to m do 
      begin
        l:=1;
        while l<m*n do 
          begin
            k[l]:=t[i,j];
            l:=l+1;
          end;
      end;
  for l:=1 to m*n do 
    begin
      writeln(k[l]);
    end;
  readln;
end.

[Stellar7]

Bonjour,

Tu étais "un peu" fatigué en écrivant (vu l'heure du post) ? Rien qu'en lisant les déclarations de t & k on note un gros problème de la gestion de la touche Shift, gauche ou droite. Bref, le compilateur doit te recracher le code dès ces lignes, je pense.

Ensuite, un conseil : déclare les dimensions maximales en constantes (p.ex. m_max et n_max), et déclare t et k à partir de ces constantes. Ce sera toujours ça de gagné si tu dois adapter/réutiliser ce code plus tard.
Quand tu veux lire m et n : écris un message (write) avant de lire la donnée, ça permet de savoir où on en est. Ensuite, il est préférable de contrôler l'entrée avant de passer à la suite avec soit un if un peu brutal, soit avec une boucle si c'est passé dans ton cours (mais déjà, fais en sorte que ça fonctionne avant de faire ces contrôles si tu ne te sens pas encore à l'aise).

Lecture de t : ok pour la double boucle. Mais idem, affiche quelques mots pour savoir où l'on en est. Comme :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
write ('valeur de t[', i, ',', j, '] : ');
readln (t[i,j]);

Passer de t à k : la double boucle suffit, puisque tu parcours t. Et ta variable l a une valeur qui dépend directement d'une combinaison de i et j : boucle while inutile. Si on y regarde de plus près, on peut même directement affecter :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

k[la_bonne_formule] = t[i,j]

Ton dernier readln ne sert à rien tant que le programme se termine juste après.
Regardes cela à tête reposée, tu y es presque !

[droggo]

Jia,

Et j'ajoute que vouloir utiliser ce tableau

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

  k:array[1..1)] of integer;

pour y stocker les données d'une matrice à 2 dimensions est pour le moins curieux.

[med.ycf]

ouii :p c'etait trop tard bon j'ai pas encore arrivè ...pour la bonne formule (k[bonne formue]) j'ai reflèchi a k[i+j-1] mais ça n'a pass marchè alors qu'est ce que je peux faire ???

[Stellar7]

Cela ne semble pas nécessiter beaucoup de réflexion, pourtant...
Les meilleurs amis du programmeur : papier et crayon.

Bon, reprenons : je suppose une matrice t de n lignes par m colonnes.
- on parcours les lignes de 1 à n, donc i varie de 1 à n.
- la i-ème ligne, c'est t[i,1] à t[i,m], donc j varie de 1 à m,

Ce qui donne, à la queue-leu-leu (c'est à dire pour remplir k[]) :
t[1,1] à t[1,m], t[2,1] à t[2,m], ... , t[n,1] à t[n,m]

- la première ligne (i=1) remplit k[1] à k[m],
- la seconde ligne (i=2) remplit k[m+1] à k[m+m],
- la troisième ligne (i=3) remplit k[2m+1] à k[2m+m],
etc
Et là, cela doit faire tilt pour la formule.

Essaye avec un crayon avant de lire le résultat :
k[ ((i-1)*m) + j] = t[i,j]
Pour le coup, j'espère bien ne pas faire d'erreur...

[med.ycf]

regarde mon ami moi je fais pas le grand j'ai aps pu le faire c pour ça je vous demande j'ai bien essayè mais ça n'a pas marchè alors je veux bien la solution

[AdmChiMay]

Peut-être ne connais-tu pas l'astuce ?
Tu places ta souris au début de l'avant-dernière ligne, tu tiens le bouton de souris enfoncé, et tu sélectionnes la ligne.
ET paf ! Magie ! La formule devient visible !
(elle est écrite en blanc)