input "Quelle table ?  ", n
c=0
for i=1 to 10
cls
for j=1 to (n*i)
print chr(916);
c=c+1
if c=i then 
c=0
print " "+i +"   "+j/i+" fois "+i+" : "+j
end if
next j
print
print n+" fois "+i+" font "+(n*i)
rem say  n+" fois "+i+" font "+(n*i)
rem L'ordinateur «parle» français sous Windows 8
rem bien vérifier qu'il n'y a pas d'erreur dans le programme avant d'utiliser l'instruction «SAY»
pause 5
rem Le temps de pause, 5 secondes, est modifiable
next i