Exercice sur les chaînes

Bonjour,

Code:

---

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.

---

Ce programme ne s'exécute pas, aidez-moi à trouver la solution.
Et merci.

Bonsoir,

1. On n'est pas là pour faire ton travail à ta place
2. Il faut utiliser les balises [CODE] pour poster ton code
3. Il faut indenter correctement ton programme
4. Quel est le but de ce programme ?
5. Relis déjà la déclaration des variables. Cela ressemble un peu à du mauvais copier/coller ...

Cordialement