Автор: Пользователь скрыл имя, 03 Апреля 2012 в 14:37, задача
Решение обыкновенных дифференциальных уравнений методом Рунге-Кутты.
1. Задание для исследования
2. Подробное описание задачи и метод ее решения
2.1 Подробное описание
2.2 Метод решения
3. Результаты исследования
4. Сравнение результатов
Приложение
1 Описание применения
1.1 Техническое задание
1.2 Назначение программы
1.3 Условие применения
2 Программа и методика испытаний
2.1 Объект испытаний
2.2 Цель испытаний
2.3 Требования к программе
2.4 Требования к программной документации
2.5 Средства и порядок испытаний
2.6 Методы испытаний
3 Руководство пользователя
3.1 Назначение программы
3.2 Условия и характеристики выполнения программы
3.3 Выполнение программы
3.4 Входные и выходные данные
3.5 Сборка программы
4 Описание программы
4.1 Функциональное назначение
4.2 Используемые технические средства
4.3 Вызов и загрузка
5 Текст программы
printf("Введите конец интервала ");
cin>>b;
printf("Введите силу ");
cin>>F;
printf("Введите массу ");
cin>>m;
printf("Введите скорость потери массы ");
cin>>m1;
printf("Введите количество отрезков на интервале ");
cin>>n;
h=(b-t)/n;
x[0]=t; y[0]=v0;
FILE* fi;
fi = fopen("bd.xls", "w");
i=0;
while (i<n)
{
fscanf(fi, "%g %g %g ", &m, x[i], y[i]);
fprintf(fi, "%c %i %s %g %s %g %s", ' ', m, "\t", x[i], "\t", y[i], "\n");
K1=h*f(x[i],y[i],F,k,m,m1,v0);
K2=h*f(x[i]+h/2,y[i]+K1/2,F,k,
K3=h*f(x[i]+h/2,y[i]+K2/2,F,k,
K4=h*f(x[i]+h,y[i]+K3,F,k,m,
d=(K1+2*K2+2*K3+K4)*(h/6);
x[i+1]=t+(i+1)*h;
y[i+1]=y[i]+d;
i++;
}
fclose(fi);
}
Информация о работе Численное нахождение корня уравнения методом Рунге-Кутта