Bonjour,
Ce programme ne s'exécute pas, aidez-moi à trouver la solution.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 program ch; uses wincrt; var ch:string;l:longth(ch); begin readln(ch); readln(l); l:=longth(ch); val(ch,d,erreur); delete(ch,3,4); end.
Et merci.
Partager