Salut tout le monde,
je viens ici pour décrire un problème qui se pose dés que j'essaie d'afficher plusieurs cases contenant des entiers, donc un tableau d'entiers; j'ai utilisé pour cela le programme suivant :
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
program ppp;
var
  t1:array[1..15] of longint;
  t2:array[1..15] of integer;
  t,i,m,j:integer;
begin
  write('comme bien votre tableau comporte_il de valeurs?');
  read(m);
  for i:=1 to m do
    begin
      write('comme bien l''entier contient-il de chiffres?');
      read(t2[i]);
      write('taper l''entier');
      read(t1[i]);
    end;
  for i:=1 to m do
    begin
      write(chr(218));
      for j:=1 to t2[i] do
        write(chr(196));
      writeln(chr(191));
      write(chr(179));
      write(t1[i]);
      writeln(chr(179));
      write(chr(192));
      for j:=1 to t2[i] do
        write(chr(196));
    end;
end.
Quand le tableau ne contient qu'une seule valeur alors la case s'affiche correctement contenant l'entier tapé par l'utilisateur du programme; mais dès que ça dépasse un entier, les cases ne s'affichent pas l'une après l'autre mais à chaque fois ça revient à la ligne à nouveau pour la case suivante et moi j'ai besoin des cases adjacentes pour dessiner un tableau correct. Je ne sais pas ce qui ne va pas dans ce programme car quant à l'affichage de plusieurs caractères, il s'affichent automatiquement un devant l'autre mais quant à des cases ça ne marche pas. J'espère pourvoir décrire le sujet clairement merci d'avance.
(j'utilise bien ici le Turbo Pascal)