Bonjour .ecrire un algorithme pascal qui demande un nombre de l'utilisateur et qui affiche sa table de multiplication (de 1 à 9 )

Bonjour,

Un programme en Pascal qui affiche la table de multiplication d'un nombre serait :

program multiplication;

var

 i: integer;

 nombre: integer;

begin

 write("Saisir un nombre: ");

 readln(nombre);

 for i := 1 to 9 do

   writeln(nombre * i);

 readln;

end.