ВУЗ:
Составители:
Рубрика:
102
H:=(xk – x0)/n;
x:=x0;
y:=y0;
while (x<=xk) do
begin
y:=y+h*sqr(x);
writeln(‘
при
Х
= ’,x:4:2,’Y= ’,y:4:2);
x:=x+h;
end;
readkey;
End.
Начало
Ввод
x
0
, x
k
, n,y
0
h=(x
k
– x
0
)/n
x=x
0
y=y
0
x<= x
k
да
y=y+hx
2
Вывод x, y
x=x+h
Конец
Рис. 6.6. Алгоритм программы для решения дифференциального
уравнения методом Эйлера
Страницы
- « первая
- ‹ предыдущая
- …
- 102
- 103
- 104
- 105
- 106
- …
- следующая ›
- последняя »