Discussion :

[droggo]

Gua,

je crois que je vais mettre l'huile sur le feu mais je crois effectivement que tous les types en pascal sont défini comme étant des intervalle la preuve
writeln(char(65)) renvoi un caractére
writeln(int(2)) =2
.
.
etc
Voila
cordialement @+

Non.

Un intervalle, au sens du Pascal, est un sous-ensemble d'un type scalaire.

A ne pas confondre avec la capacité d'un type basique comme integer, ou byte..., qui ne sont limités que par la taille mémoire qu'on leur attribue, ce qui est très différent.

[diden138]

oui je sais ça mais cela nexplique toujour pas pourqoi pascal renvoie une valeur en faisseant type(position) exemple real(2)=2
cordialement @+

[droggo]

Fia,

oui je sais ça mais cela nexplique toujour pas pourqoi pascal renvoie une valeur en faisseant type(position) exemple real(2)=2
cordialement @+

quand tu écris type(position), tu ne demandes pas la valeur de position dans le type en question, tu fais un transtypage de position dans le type.
Et bien entendu, comme pour les valeurs numériques, tu obtiens tout simplement la valeur que tu as donnée à position.

Il ne faut pas confondre les concepts.

[diden138]

ah ok !! je ne le savais pas me voila convaincu
merci car pour etre franc je suivais la discution de loin faut dir que le sujet est assez enervant au sens que c'est une question que je me suis jamais posé

cordialement @+

[droggo]

Lio,

ah ok !! je ne le savais pas me voila convaincu
merci car pour etre franc je suivais la discution de loin faut dir que le sujet est assez enervant au sens que c'est une question que je me suis jamais posé

cordialement @+

C'est un truc qui pose assez souvent des problèmes, surtout si on passe un peu vite dessus.

En fait, ça fait partie des problèmes posés par l'utilisation fréquente, par les langages de programmation, de termes qui existent également en mathématiques, avec des sens généralement différents, d'où confusion.

[Emmanuel Delahaye]

alors j'ai réalisé un programme qui est censé m'afficher la table ascii , mais le compilateur me dit qu'il y a une expression illégal quand j'utilise la fonction prédéfinie CHAR , alors que ya pas d'erreur particulière , regardez :
<...>
quelqu'un voit le problème ?

En dehors de CHAR() (tu veux chr()), le problème est le format de l'affichage... Tu veux probablement ceci :

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
 
program table;
 
var
   c : char;
   k : INTEGER;
 
begin
 
   k := 46;
 
   for k := 46 to 255 do
      begin
      CHAR(k);
   writeln(c:k);
      end;
 
end.

[Ultima]

Bonsoir,
Juste pour dire qu'il faudrait sauvgarder le résulta du transtypager éffectué:
exemple

Code :

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

car := CHAR(k);

ou sinon, procéder ainsi:

Code :

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

1
2
writeln(CHAR(c):k);
//c'est ainsi que j'ai procédé dans le code que j'ais proposé il y a quelque mois

Donc, pour reprendre le code de Emmanuel Delahaye :

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
program table;
 
var
   c : char;
   k : INTEGER;
 
begin
 
   k := 46;
 
   for k := 46 to 255 do
      begin
      c:= CHAR(k);
   writeln(c:k);
      end;
 
end.

ma procposition :

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
program table;
 
var
   k : INTEGER;
 
begin
 
   k := 46;
 
   for k := 46 to 255 do
      begin
   writeln(CHAR(k)); // on retourne à la ligne à chaque fois
      end;
 
end.

L’opérateur de réservation d'espace :

il me semble que l'opérateur deux points n'a rien à faire dans ce code puisqu'on retourne à la ligne à chaque fois.

et si on ne retourné pas à la ligne:
write(c:k) avec k = 255 est complètement absurde
le plus raisonnable serait de mettre une constante,
Ainsi on aurai;

Code :

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

1
2
3
const espace_reserve = 3;//un chiffre entre 1 et 3 me semble convenir
...
for k := 46 to 255 do write(CHAR(k):espace_reserve);

remarque, on aurait mettre directement

Code :

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

for k := 46 to 255 do write(CHAR(k):3);

[droggo]

Jao,

ma procposition :

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
program table;
 
var
   k : INTEGER;
 
begin
 
   k := 46;
 
   for k := 46 to 255 do
      begin
   writeln(CHAR(k)); // on retourne à la ligne à chaque fois
      end;
 
end.

Comme k va servir de variable de contrôle pour une boucle for , l'initialisation est inutile.

La ligne

Code :

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

   k := 46;

ne sert donc absolument à rien.

Et pourquoi utiliser le transtypage avec CHAR(k), alors qu'il existe une fonction dédiée à cela Chr(k) ? (Ce n'est pas faux, bien entendu)

Et leitmotiv, il faut prendre la peine de faire une indentation régulière et cohérente, et éviter de mettre des lignes vides quand ce n'est pas nécessaire pour aérer le 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
program table;
 
var
  k : INTEGER;
 
begin
  for k := 46 to 255 do
  begin
    writeln(Chr(k)); // on retourne à la ligne à chaque fois
  end;
 
  // ne pas oublier un petit ReadLn pour avoir le temps de voir le résultat
  ReadLn;
end.

Concernant le ReadLn pour avoir le temps de voir le résultat, ce n'est pas suffisant dans le cas présent, car, avec 1 seul caractère par ligne, on dépasse très largement la hauteur d'une fenêtre MS-DOS.
Il vaudrait donc mieux prévoir d'afficher les données en une série de lignes, ou, pour le moins, faire une pause toutes les x lignes.

[Ultima]

Bonsoir,
Pourquoi faire [QUOTE ]Ultima[ /QUOTE]
alors que le code est celui de Emmanuel Delahaye?
(le code initial avait un comportement inattendu,
j'ai donc proposé une solution pour que le programme fonctionne "correctement",
j'ai fait un copier-coller du code initial, d'où l'indention et tout le reste).

[droggo]

Jiu,

J'ai juste cité le dernier post.