Студопедия Главная Случайная страница Обратная связь

Разделы: Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

Министерство образования и науки Российской Федерации. Механизмом, с помощью которого можно изменить число фотонов в некоторой полости, является поглощение или испускание фотонов атомами





Вариант 10

 

 

Вычислительная математика
дисциплина
 

 

Преподаватель       Федорова Н.А.
    подпись, дата   фамилия, инициалы
 

Студент КИ10-07       Константинов Е.Л.
  код (номер) группы   подпись, дата   фамилия, инициалы
 

Красноярск, 2012

Задание: Решить краевую задачу ОДУ методом прогонки.

 

Тестовый пример:

Точное решение (для проверки):

 

Решение:

Код программы на языке C++:

Mainwindow.h:

#ifndef MAINWINDOW_H

#define MAINWINDOW_H

#include <QMainWindow>

#include <QtGui>

#include <QVector>

#include <QtAlgorithms>

namespace Ui {

class MainWindow;

}

class MainWindow: public QMainWindow

{

Q_OBJECT

public:

explicit MainWindow(QWidget *parent = 0);

~ MainWindow ();

private:

Ui::MainWindow *ui;

QGraphicsScene *sc;

QVector <double> x;

QVector <double> y,t;

};

#endif // MAINWINDOW_H

kz_pr.cpp:

#include <QVector>#include <cmath>double p(double x){ return -2*x; }double q(double x){ return -2; }double f(double x){ return -4*x; }void KraevayaZadacha(QVector<double> &y, QVector<double> &x, QVector<double> &t){ double a=0,b=1,a0=1,a1=-1,A=0,b0=1,b1=0,B=3.718,h=0.1,n=1/h+1; QVector<double>m(n-2),k(n-2),c(n-2),d(n-2); y.resize(n); t.resize(n); for(int i=0;i<n-2;++i) { m[i]=-2+h*p(i*h); k[i]=1-h*p(i*h)+h*h*q(i*h); } c[0]=(a1-a0*h)/(m[0]*(a1-a0*h)+k[0]*a1); d[0]=(k[0]*A*h)/(a1-a0*h)+f(a)*h*h; for(int i=1;i<n-2;++i) { c[i]=1/(m[i]-k[i]*c[i-1]); d[i]=f(i*h)*h*h-k[i]*c[i-1]*d[i-1]; } y[n-1]=(b1*c[n-3]*d[n-3]+B*h)/(b1*(1+c[n-3])+b0*h); for(int i=n-2;i>0;--i) { y[i]=c[i-1]*(d[i-1]-y[i+1]); } y[0]=(a1*y[1]-A*h)/(a1-a0*h); for(int i=0;i<n; ++i) t[i]=i*h+pow(2.718,i*h*i*h); for(int i=0;i<n;++i) { x.push_back(h*i); }} Main.cpp:

#include <QtGui/QApplication>#include "mainwindow.h"int main(int argc, char *argv[]){ QApplication a(argc, argv); MainWindow w; w.show(); return a.exec();} Mainwindow.cpp:

#include "mainwindow.h"#include "ui_mainwindow.h"#include "kz_pr.cpp"MainWindow::MainWindow(QWidget *parent): QMainWindow(parent), ui(new Ui::MainWindow){ ui->setupUi(this); QTextCodec::setCodecForCStrings(QTextCodec::codecForName("Windows-1251")); QTextCodec::setCodecForTr(QTextCodec::codecForName("Windows-1251")); sc=new QGraphicsScene(1,1,409,269); ui->graphicsView->setScene(sc); ui->graphicsView->setRenderHint(QPainter::Antialiasing, true); KraevayaZadacha(y,x,t); float temp=x[0]; float minx; for(int i=1;i<x.size();++i) { if(temp>x[i]) temp=x[i]; } minx=0;//temp; temp=x[0]; float maxx; for(int i=1;i<x.size();++i) { if(temp<x[i]) temp=x[i]; } maxx=temp; double dx=409/(maxx-minx+1); temp=y[0]; float miny; for(int i=1;i<y.size();++i) { if(temp>y[i]) temp=y[i]; } miny=0;//temp; temp=y[0]; float maxy; for(int i=1;i<y.size();++i) { if(temp<y[i]) temp=y[i]; } maxy=temp; double dy=269/(maxy-miny); float mint; for(int i=1;i<t.size();++i) { if(temp>t[i]) temp=t[i]; } mint=0;//temp; temp=t[0]; float maxt; for(int i=1;i<t.size();++i) { if(temp<t[i]) temp=t[i]; } maxt=temp; double dt=269/(maxt-mint); for(int i=0;i<y.size();++i) { QPair<int,int> tmp; tmp.first=(x[i]-minx)*dx*0.95+7; tmp.second=269-((y[i]-miny)*dy*0.8+7); sc->addLine(tmp.first,tmp.second,tmp.first,tmp.second,QPen(QColor(28,28,28),4)); tmp.second=269-((t[i]-miny)*dy*0.8+7); sc->addLine(tmp.first,tmp.second,tmp.first,tmp.second,QPen(QColor(28,28,28),4)); } sc->addLine(7,7,7,264,QPen(Qt::black,2)); sc->addLine(7,269-5,404,269-5,QPen(Qt::black,2)); QGraphicsTextItem *textx = new QGraphicsTextItem(QString().sprintf("X")); textx->setPos(390,269-30); sc->addItem(textx); QGraphicsTextItem *texty = new QGraphicsTextItem(QString().sprintf("Y")); texty->setPos(10,5); sc->addItem(texty); for(int i=0;i<y.size()-1;++i) { QPair<int,int> tmp,tmp1; tmp.first=(x[i]-minx)*dx*0.95+7; tmp.second=269-((y[i]-miny)*dy*0.8+7); tmp1.first=(x[i+1]-minx)*dx*0.95+7; tmp1.second=269-((y[i+1]-miny)*dy*0.8+7); sc->addLine(tmp.first,tmp.second,tmp1.first,tmp1.second,QPen(QColor(160,82,45),2)); tmp.second=269-((t[i]-miny)*dy*0.8+7); tmp1.second=269-((t[i+1]-miny)*dy*0.8+7); sc->addLine(tmp.first,tmp.second,tmp1.first,tmp1.second,QPen(QColor(119,136,153),2)); } ui->textEdit->setText(ui->textEdit->toPlainText()+QString().sprintf("Решение полученное программой:\n")); for(int i=0; i<y.size(); ++i) { ui->textEdit->setText(ui->textEdit->toPlainText()+QString().sprintf("y[%.3lf] = %.3lf\n",x[i],y[i])); } ui->textEdit->setText(ui->textEdit->toPlainText()+QString().sprintf("Точное решение:\n")); for(int i=0; i<y.size(); ++i) { ui->textEdit->setText(ui->textEdit->toPlainText()+QString().sprintf("y[%.3lf] = %.3lf\n",x[i],t[i])); }}MainWindow::~ MainWindow (){ delete ui;}  

Результат выполнения программы:

- Точное решение

- Решение полученное программой

Решение полученное программой:

y[0.000] = 1.118

y[0.100] = 1.230

y[0.200] = 1.364

y[0.300] = 1.521

y[0.400] = 1.704

y[0.500] = 1.917

y[0.600] = 2.164

y[0.700] = 2.455

y[0.800] = 2.800

y[0.900] = 3.214

y[1.000] = 3.718

Точное решение:

y[0.000] = 1.000

y[0.100] = 1.110

y[0.200] = 1.241

y[0.300] = 1.394

y[0.400] = 1.573

y[0.500] = 1.784

y[0.600] = 2.033

y[0.700] = 2.332

y[0.800] = 2.696

y[0.900] = 3.148

y[1.000] = 3.718

 

Министерство образования и науки Российской Федерации







Дата добавления: 2015-08-27; просмотров: 434. Нарушение авторских прав; Мы поможем в написании вашей работы!




Практические расчеты на срез и смятие При изучении темы обратите внимание на основные расчетные предпосылки и условности расчета...


Функция спроса населения на данный товар Функция спроса населения на данный товар: Qd=7-Р. Функция предложения: Qs= -5+2Р,где...


Аальтернативная стоимость. Кривая производственных возможностей В экономике Буридании есть 100 ед. труда с производительностью 4 м ткани или 2 кг мяса...


Вычисление основной дактилоскопической формулы Вычислением основной дактоформулы обычно занимается следователь. Для этого все десять пальцев разбиваются на пять пар...

Постинъекционные осложнения, оказать необходимую помощь пациенту I.ОСЛОЖНЕНИЕ: Инфильтрат (уплотнение). II.ПРИЗНАКИ ОСЛОЖНЕНИЯ: Уплотнение...

Приготовление дезинфицирующего рабочего раствора хлорамина Задача: рассчитать необходимое количество порошка хлорамина для приготовления 5-ти литров 3% раствора...

Дезинфекция предметов ухода, инструментов однократного и многократного использования   Дезинфекция изделий медицинского назначения проводится с целью уничтожения патогенных и условно-патогенных микроорганизмов - вирусов (в т...

Потенциометрия. Потенциометрическое определение рН растворов Потенциометрия - это электрохимический метод иссле­дования и анализа веществ, основанный на зависимости равновесного электродного потенциала Е от активности (концентрации) определяемого вещества в исследуемом рас­творе...

Гальванического элемента При контакте двух любых фаз на границе их раздела возникает двойной электрический слой (ДЭС), состоящий из равных по величине, но противоположных по знаку электрических зарядов...

Сущность, виды и функции маркетинга персонала Перснал-маркетинг является новым понятием. В мировой практике маркетинга и управления персоналом он выделился в отдельное направление лишь в начале 90-х гг.XX века...

Studopedia.info - Студопедия - 2014-2026 год . (0.013 сек.) русская версия | украинская версия