Ecrire(Donnez x)
Lire(x)

Ecrire(Donnez n)
Lire(n)

exp = 1

i = 1

Tant que i <= n :
	exp <= exp + (x^i)/(i!)
Fin tant que

Ecrire(exp)