Programme 8 : afficher 10 nombres

VAR
 nombre1 :nombre entier

DEBUT
 Afficher "Entrer un nombre"
 Saisir nombre1

  Pour i=0 jusqu'a i<10
  	incrémenter nb 
  	incrémenter i 
  	Afficher nb 
  Fin pour 	

FIN