Mathematics 285 Euler's Method n=4000

restart;
f:=(s,t)->0.2*s*t;
x[0]:=1;
y[0]:=1;
n:=4000;
h:=5.0/n;
for i from 1 to n do
x[i]:=x[0]+h*i;
y[i]:=y[i-1]+h*f(x[i-1],y[i-1]);
od:
plot([seq([x[i],y[i]],i=0..n)]);

Last Updated: Fri Sep 10 12:09:47 PDT 2004