[TP] Table de multiplication

Je veux faire un programme qui dresse la table de multiplication des 12 premiers naturels non nuls par un entier naturel n compris entre 1 et 9
L'affichage est de la forme :
1 * 5=5
2 * 5= 10
3 * 5=15
etc

Mon travail :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Program multiplication; uses wincrt; Var m,i,n:integer; begin for i of 1 to 9 do begin writeln('donner la valeur n'); readln(n); m:=n*i; writeln('le resultat de la multiplication est:',m) end; for n of 1 to 12 do begin m:=n*i; end.

---

As-tu un ordinateur chez toi, sur lequel tu puisses tester ?

Apparement, d'après ton code, tu as toutes les bases nécessaires pour répondre à cette question. Donc je te redonne l'algo qui apparaît quand même relativement bien dans l'énoncé :

- demander une valeur à l'utilisateur
- tester si elle est comprise entre 1 et 9
- la multiplier par les entiers 1 à 12
- afficher le résultat de la multiplication à chaque fois

Normalement, avec ça il ne te reste plus qu'à l'exprimer en Pascal.