Hi,
C'est bien.Envoyé par Maxence45
Comme l'a bien dit Ultima, ton problème n'est pas dû à ton programme, mais au système d'encodage des caractères utilisés, vaste problème depuis longtemps, et qui ne fait qu'empirer au fil du temps avec l'apparition de nouveaux systèmes.
Seule petite remarque, il faut essayer de soigner l'indentation du code, et éviter les lignes vides inutiles, cela rend le code beaucoup plus lisible (c'est un de mes leitmotiv).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 program table; var c : char; k : INTEGER; begin for k := 46 to 255 do begin c := CHAR(k); writeln(c:4, k:5); end; end.
Partager