Salut à vous, j'ai écrit un programme dans lequel il faut saisir un nombre entier(1 ou 2) pour effectuer une suite d'opérations. Mais à la saisie d'un caractère, le programme s'arrête et affiche '' Runtime Error 106''. Comment faire pour y régler cette erreur d'exécution ? Voici une partie du code source:

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
      .............
      .............
      WRITELN(' faites votre choix en tapant un nombre ');
      WRITELN(' 1 : pour 1 équation à une inconnue ');
      WRITELN(' 2 : pour une équation de second dégré ');
      READLN(choix);
      WHILE (choix<>1) and (choix<>2) DO
           BEGIN
           WRITELN(' Tapez 1 ou 2 ');
           READLN(choix);
           END;
      CASE choix DO
         1 : monôme;
         2 : polynôme;
       ............
       ............