s12rout1.m

来自「Industrial Mathematics」· M 代码 · 共 15 行

% Routine 12.1   Euler's Method
clear
x=0;
y = 1;
h=0.1;
N = 11;
                   %
for i = 1:N
 a(i) = x;
 b(i) = y;
 y = y + h*fn(x,y);
 x = x + h;
 end;
plot(a,b)