Построение графиков методами Эйлера и Рунге-Кутта уравнение второго порядка - Pascal ABC

Узнай цену своей работы

Формулировка задачи:

Условия и данные: Уравнение: - p*x*y2 - y12 p = 0.04; y20 = 0.45 Y1' = Y2 Y' = f(x, Y1, Y2) при Y1(0) = 0; Y2(0) = Y20; Программа по методу Эйлера работает правильно:
А вот программа по методу Рунге-Кутта работает неправильно (график должен быть похож на метод Эйлера)
Что исправить во второй программе, чтобы графики были похожи/одинаковы в обеих программах?

Решение задачи: «Построение графиков методами Эйлера и Рунге-Кутта уравнение второго порядка»

textual
Листинг программы
i := 300 + round (60*x1);
  j := 200 - round (y1*50);
  circle (i,j,1);
  i := 300 + round (60*x1);
  j := 200 - round (y2*350);
  circle (i,j,1);

Оцени полезность:

14   голосов , оценка 3.429 из 5
Похожие ответы