traduction en Maple

[invitea883087a]

Bonjour, j'ai un problème..j'ai une programmation sur JavaScript et je veux la traduire en Maple. voici la programmation:

<SCRIPT LANGUAGE=JavaScript>
var x,fonc
var pi=3.141592653589793;
var e=2.7182818284590452;
function trap()
{
with (Math)
{
fonc="1/x"
a=1 ; b="" ; n="100";
fonc=prompt("Entrez votre fonction :",fonc)
a=eval(prompt("Entrez a :",a))
b=eval(prompt("Entrez b :",b))
n=prompt("Nombre de points n= ",n)
if (n==null) {return} else {n =eval(n)};
h=(b-a)/n ; s=(f(a)+f(b))/2;
for(i=1;i<=n-1;i++) {s=s+f(a+i*h)}
alert("Integrale = "+s*h)
}
}

function f(x)
{
with(Math){y=eval(fonc);return y}
}
</SCRIPT>

merci d'avance
-----

[Jaunin]

Bonjour,Laho-dbz,
Bienvenu sur le forum de Futura-Sciences.
Avez-vous essayé de faire une recherche sur http://search.maplesoft.com/search?q=JavaScript
Cordialement.
Jaunin__