Редактирование: Информатика: Движение тела в среде

Перейти к: навигация, поиск

Внимание! Вы не авторизовались на сайте. Ваш IP-адрес будет публично видимым, если вы будете вносить любые правки. Если вы войдёте или создадите учётную запись, правки вместо этого будут связаны с вашим именем пользователя, а также у вас появятся другие преимущества.

Правка может быть отменена. Пожалуйста, просмотрите сравнение версий, чтобы убедиться, что это именно те изменения, которые вас интересуют, и нажмите «Записать страницу», чтобы изменения вступили в силу.
Текущая версия Ваш текст
Строка 133: Строка 133:
 
</div>
 
</div>
  
<div>
 
 
'''[[Бальцер Анастасия]]'''
 
 
'''Описание программы''' : программа записывает в четыре файла результаты вычисления:
 
 
Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
 
Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
 
Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
 
Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
 
 
Посмотреть программу можно [http://tm.spbstu.ru/File:falling.zip здесь]
 
 
</div>
 
  
 
<div class="mw-collapsible mw-collapsed" style="width:100%" >
 
<div class="mw-collapsible mw-collapsed" style="width:100%" >
Строка 299: Строка 285:
 
</syntaxhighlight>
 
</syntaxhighlight>
 
</div>
 
</div>
 +
  
 
<div class="mw-collapsible mw-collapsed" style="width:100%" >
 
<div class="mw-collapsible mw-collapsed" style="width:100%" >
'''[[Васильева Анастасия]]'''  
+
'''[[Лебедев Станислав]]'''  
  
'''Описание программы''': пользователь вводит начальную скорость полета, угол падения и шаг, с которым будут рассчитаны точки.
+
'''Описание программы''': программа записывает в четыре файла результаты вычисления:
 
 
Программа записывает в один файл результаты вычисления:
 
 
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;  
 
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;  
# Координаты, полученные при численном интегрировании - метод Эйлера;
+
# Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
 +
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
 
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
 
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
 
  
Скачать можно  [http://tm.spbstu.ru/Файл:fly.zip тут].
+
Скачать можно  [http://tm.spbstu.ru/Файл:Шарик.rar тут].
  
 +
<div class="mw-collapsible-content">
  
<div class="mw-collapsible-content">
+
[[File:1.png]]
  
  
 
'''Визуализированный результат работы программы'''
 
'''Визуализированный результат работы программы'''
[[File:graphick.png]]
+
[[File:graph.png]]
  
Для тела с массой 0.5 кг,сопротивлением воздуха 0.1, угол бросания 30°, начальная скорость 30 м/с, ускорение свободного падения 9.8 м/c^2, шаг 0.001;
+
# o1 - координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
 +
# o2 - координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
 +
# o3 - координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
 +
# o4 - координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
  
# "output.txt" using 1 : 2 - координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
 
# "output.txt" using 3 : 4 - координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости (численное интегрирование - метод Эйлера);
 
# "output.txt" using 5 : 6 - координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости;
 
# "output.txt" using 7 : 8 - координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости.
 
  
 +
Для тела с массой 10,сопротивлением воздуха 1, угол бросания 30°, начальная скорость 30 м/с, ускорение свободного падения 9.8 м/c^2;
 +
 +
''Примечание: графики o1 и o2 намеренно посчитаны с малой точностью, чтобы графики не сливались.''
  
 +
Файл "'''main.cpp'''"
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
 
#include <iostream>
 
#include <iostream>
#include <fstream>
 
#include <iomanip>
 
#include <time.h>
 
#include <conio.h>
 
#include <stdlib.h>
 
 
#include <math.h>
 
#include <math.h>
 +
#include "Vector.h"
 
#include <cstring>
 
#include <cstring>
 +
#include <cmath>
 +
#include <malloc.h>
 +
#include <fstream>
 +
 
using namespace std;
 
using namespace std;
  
class pad ///создаем класс
+
int n = 100;
 +
ofstream outfile;
 +
 
 +
class Ball                                          //класс бросаемого тела
 
{
 
{
private: ///в закрытом доступе
+
    private:
    double *X, *Y, *E, *G, *Z, *S, *V, *U; ///координаты по х и у; *E, *G : численное интегрирование метод Эйлера, *Z, *S- метод верле, *V, *U- точный метод
+
        double angle,m,k;                           //угол броска,масса,коэффицент сопротивления воздуха
    double a, g , pi;///ускорение, коэфф свободного падения, значение числа пи
+
        Vector3D r,v,a;                             //радиус-вектор,вектор скорости,ускорения
     int Size; ///размер массива- сколько точек считать в первом способе
+
     public:
    double v, shag, b, vx, vy;///скорость, шаг по времени, угол в градусах скорость по х, скорость по у
 
  
    void SetX() ///создаем функцию для вычисления значенй по х для простого падения и по эйлеру
+
        //задание начальных параметров через угол,начальное положение,скорость и ускорение,с которым движется тело. Без сопротивления воздуха
    {
+
         Ball(double _angle, Vector3D _r, Vector3D _v, Vector3D _a)
        g = 9.8;///коэфф свободного падения
 
         float t = 0; ///время
 
        X = new double [Size];///создаем массив для координат по х для простого падения
 
        E = new double [Size];///создаем массив для координат по х для интегрирования по эйлеру
 
        X[0] = 0; ///задаем значение по х в нуле
 
        E[0] = 0 ; ///задаем значение по х в нуле по эйлеру
 
        for (int i = 1; i < Size; i++) ///задаем цикл от 1 (для нуля мы задали), чтобы считать координаты
 
 
         {
 
         {
             t += shag; ///каждый раз прибавляем по времени шаг
+
             angle = _angle;
             X[i] = v * cos(a) * t; ///координаты по х для простого падения
+
             r    = _r;
             E[i] = E[i-1] + v * cos(a) * shag; ///х из интегрирования по эйлеру
+
            v     = _v;
 +
             a    = _a;
 
         }
 
         }
    }
 
  
    void SetY()///создаем функцию для вычисления значенй по у для простого падения и по эйлеру
+
        //задание начальных параметров через угол,начальное положение,скорость и ускорение,с которым движется тело. Без сопротивления воздуха
    {
+
         Ball(double _angle, double _m, double _k, Vector3D _r, Vector3D _v, Vector3D _a)
        g = 9.8; ///коэфф свободного падения
 
         double Vy; /// переменная для значение скорости по у для метода эйлера
 
        float t = 0; ///время
 
        Y = new double [Size];///создаем массив для координат по у для простого падения
 
        G = new double [Size];///создаем массив для координат по х для интегрирования по эйлеру
 
        Vy = v * sin (a);/// значение скорости по у для метода эйлера
 
        Y[0] = 0;///задаем значение по у в нуле
 
        G[0] = 0;///задаем значение по у в нуле по эйлеру
 
        for (int i = 1; i < Size; i++)///задаем цикл от 1 (для нуля мы задали), чтобы считать координаты
 
 
         {
 
         {
             t += shag; ///каждый раз прибавляем по времени шаг
+
             angle = _angle;
             Y[i] = v * sin (a) *t - (g * t * t) * 0.5; ///координаты по у для простого падения
+
             r    = _r;
             Vy -= g * shag; ///значение скорости по у для метода эйлера
+
            v     = _v;
             G[i] = G[i-1] + Vy  * shag;///у из интегрирования по эйлеру
+
            a     = _a;
 +
             m    = _m;
 +
             k    = _k;
 
         }
 
         }
    }
 
  
    void SetVerle() ///функция для метода верле
+
         //точная формула зависимости координаты от времени
    {
+
         Vector3D positionReal(double t)
        double k = 0.1, m = 0.5; ///коэфф сопротивления водуха, масса тела
 
         g = 9.8; /// коэфф свободного падения
 
         uint32_t Size1 = 1000000.0; ///размер массива
 
        S = new double [Size1]; ///создаем массив для значений по х для метода верле
 
        Z = new double [Size1]; ///создаем массив для значений по у для метода верле
 
        vx = v * cos(a); ///формулы для вычисления скорости по оси х
 
        vy = v * sin(a); ///формулы для вычисления скорости по оси у
 
        S[1] = 0; ///значение х метод верле
 
        S[0] = -vx * shag; ///значение в нуле
 
        Z[1] = 0; ///значение у метод верле
 
        Z[0] = -vy * shag; ///значение в нуле
 
        for (int i = 0; i < Size1-2; i++) ///задаем цикл
 
 
         {
 
         {
             S[i+2] = 2.0 * S[i+1] - S[i] - (k / m) * v * vx * shag * shag;///значения по х для верле
+
             double c1 = m/k,c2 = fabs(a.y)*c1, c3 = exp(-t/c1), c4 = c2*t;
            vx = 0.5 * ( 1.0 / shag )* ( S[i+2] - S[i]);///считаем значения скорости по оси х
+
             return MakeVector(v.x*c1*(1 - c3), c1*(v.y + c2)*(1 - c3) - c4 , 0 );
             Z[i+2] = 2.0 * Z[i+1] - Z[i] - ( g + (k / m) * v * vy ) * shag * shag;///значения по х для верле
 
            vy = 0.5 * ( 1.0 / shag )* ( Z[i+2] - Z[i]);///считаем значения скорости по оси х
 
            v = sqrt (vx * vx + vy * vy); ///модуль общей скорости
 
 
         }
 
         }
    }
+
 
    void SetVerleLast() ///функция для точного метода верле
+
        //вывод положения на экран
    {
+
        void writePosToScreen()
        double k = 0.1, m = 0.5;///коэфф сопротивления водуха, масса тела
+
        {
        g = 9.8; /// коэфф свободного падения
+
            cout << r.x << "  " << r.y << "  " << r.z << endl;
         uint32_t Size2 = 1000000.0; ///размер массива
+
         }
        float t = 0; ///время
+
 
         V = new double [Size2]; ///создаем массив для значений по х для точного метода верле
+
         //вывод положения в файл
         U = new double [Size2]; ///создаем массив для значений по у для точного метода верле
+
         void writePosToFile(char s[])
        vx = v * cos(a); ///формулы для вычисления скорости по оси х
 
        vy = v * sin(a); ///формулы для вычисления скорости по оси у
 
        ///double e = 2.7 ;///значение экспоненты
 
        V[0] = 0; ///значение х точный метод верле
 
        U[0] = 0; ///значение у точный метод верле
 
        for (int i = 1; i < Size2; i++)
 
 
         {
 
         {
             t += shag; ///увеличиваем время на шаг
+
             outfile.open(s,ios :: app);
             V[i] = vx * (m / k) * (1.0 - exp(((-k) / m) * t)); ///значения по х для точного верле
+
             outfile << r.x << "          " << r.y << endl;
             U[i] = (m / k) * (vy +  g * (m / k)) * (1.0 -  (exp(((-k) / m) * t))) - g * t * (m / k);///значения по х для точного верле
+
             outfile.close();
 
         }
 
         }
    }
 
  
public: ///в открытом
+
        //вывод произвольного вектора на экран
    pad()
+
        void WVTS(Vector3D v)
    {
+
        {
        X = 0; ///зануляем значения
+
            cout.width(15);
        Y = 0;
+
            cout << v.x;
        Size = 0;
+
            cout.width(15);
        v = 0;
+
            cout << v.y;
        shag = 0;
+
            cout.width(15);
        b = 0;
+
            cout << v.z << endl;
    }
+
         }
    pad(double _v, double _shag, double _b) ///конструктор с параметрами
+
 
    {
+
         //вывод произвольного вектора в файл
        pi = M_PI; ///значение числа пи
+
         void WVTF(Vector3D v,char s[])
        g = 9.8; ///коэфф свободного падения
+
         {
         v = _v;/// присваиваем значения переменных значению параметров в конструкторе
+
            outfile.open(s,ios :: app);
        shag = _shag;
+
            outfile << v.x << "          " << v.y << endl;
         b = _b;
+
            outfile.close();
        a = (pi * b) / 180.0 ; ///вычисляем значение угла в радианах
+
         }
         double t = (2.0 * v * sin(a)) / g; /// считаем значение времени
 
         Size = abs( t / shag )+1;///ищем значение размера массива
 
        SetX(); ///вызываем функции зависящие от параметров конструктора
 
        SetY();
 
        SetVerle();
 
         SetVerleLast();
 
    }
 
  
    void FilePrint() ///функция записи в файл
+
         //"пересчет" координаты по Верле(Линейная зависмость)
    {
+
         void changeR(Vector3D r1, double dt)
         ofstream fout("output.txt"); ///открываем файл уже созданный в папке с программой
+
         {
        fout << "X:    " << "    Y:    " << "    E:  " << "  G:  " << "  S:  " << "  Z:  "<< "  V:  "<< "    U:    "<<"\n" ; ///выводим стоку с разными названиями массивов, соотв. координатам по х и у различных методов
+
            r = MakeVector(2 * r.x - r1.x - k/m*v.x*dt*dt,2*r.y - r1.y - (abs(a.y) + k/m*v.y)*dt*dt, 0 );
         for (int i = 0; i < Size; i++) ///цикл
+
        }
         fout << X[i] << "    " << Y[i] << "    " << E[i] << "    " << G[i] << "  " << S[i] << "  " << Z[i] << "  " << V[i] <<"    "<< U[i] <<"\n"; ///забивает сами значения массивов
 
        fout.close();///закрываем файл
 
    };
 
};
 
  
int main()/// основная функция
+
        //"пересчет" координаты по Верле(Квадратичная зависимость)
{
+
        void changeRSQ(Vector3D r1, double dt)
    double shag, b, v; ///шаг, угол в градусах, скорость начальная
+
        {
    cout << "vvedite v "; ///просим пользователя ввести значение скорости начальной
+
            r = MakeVector(2 * r.x -  r1.x - k/m*Length(v)*v.x*dt*dt,2*r.y - r1.y - (abs(a.y) + k/m*Length(v)*v.y)*dt*dt, 0 );
    cin >> v; ///считываем начальную скорость
+
        }
    cout << "vvedite ygol ";///просим пользователя ввести угол в градусах
+
        //пересчет скорости по Верле
    cin >> b;/// считываем угол
+
        void changeV(Vector3D r1,double dt)
    cout << "vvedite shag ";///просим пользователя ввести шаг по времени
+
        {
    cin >> shag; ///считываем значение шага
+
            v =VS((VmV(r,r1)),1/(2*dt));
    pad F1(v, shag, b); ///объявление коструктора, создание функции F1 с переменными v, shag, b
+
        }
    F1.FilePrint(); ///вызываем функцию для записи файла
 
}
 
</syntaxhighlight>
 
</div>
 
  
'''[[Гильманов Илья]]'''
+
        //рассчет предыдущегт к 0ому элементу
 
+
        Vector3D MR1(double dt)
'''Описание программы''': программа состоит из четырех независимых друг от друга частей:
+
        {
#  Полет тела без сопротивления воздуха;
+
            return MakeVector(r.x - v.x * dt,r.y - v.y * dt,0);
#  Полет тела при линейной зависимости силы сопротивления воздуха от скорости, при котором координаты тела рассчитываются точным методом;
+
        }
#  Полет тела при линейной зависимости силы сопротивления воздуха от скорости, при котором координаты тела рассчитываются методом Верле;
 
#  Полет тела при квадратичной зависимости силы сопротивлении воздуха от скорости, при котором координаты тела рассчитываются методом Верле;
 
  
Скачать можно [[http://mech.spbstu.ru/File:Движение_тела_в_среде.rar тут]]
+
        //возращает координату тела
 +
        Vector3D getR()
 +
        {
 +
            return r;
 +
        }
  
<div class="mw-collapsible mw-collapsed" style="width:100%" >
+
        //рассчет времени полета
'''[[Демченко Артём]]'''
+
        double TimeOfFly()
 +
        {
 +
            return (2*Length(v)*sin(angle)/Length(a));
 +
        }
  
'''Описание программы''': программа записывает в четыре файла результаты вычисления:
+
        //рассчет координаты по точной формуле. без сопротивления воздуха.
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
+
        Vector3D position(double t)
# Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
+
        {
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
+
            return MakeVector(r.x + v.x*t + a.x*t*t/2,r.y + v.y*t + a.y*t*t/2,r.z + v.z*t + a.z*t*t/2);
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
+
        }
  
''' Инструкция ''':
+
};
Пользователь вводит начальные данные ( массу, скорость, угол броска, шаг по времени и сопротивление воздуха). Выбираем режим работы программы, после этого в папке с программой создается файл, который требуется открыть программой gnuplot для просмотра графика, построенного на полученных координатах.
 
  
 +
int main()
 +
{
 +
    //задание начальных параметров
 +
    Vector3D g = {0,-9.8,0};
 +
    double a,dt = 0;
 +
    char s[20];
  
<div class="mw-collapsible-content">
+
//    cin >> dt;
 
 
  
 +
    dt = 0.1;
 +
    a = (M_PI * 30)/180;
 +
    Ball b1(a, MakeVector(0,0,0),MakeVector(30,a),g);
  
'''Визуализированный результат работы программы'''
+
    double tof = b1.TimeOfFly()+1;  //единичка прибавлена,чтобы график красивым был
  
[[:File:Throws.png]]
+
    //Без сопротивления возлуха
 +
    strcpy(s,"");
 +
    strcat(s, "o1.txt");
 +
    outfile.open(s, ios :: trunc);
 +
    outfile.close();
 +
    for (double i = 0; i <= tof; i += dt)
 +
    {
 +
        b1.WVTS(b1.position(i));
 +
        b1.WVTF(b1.position(i), s);
 +
    }
  
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
  
#include <iostream>
+
    //Верле(Линейная зависимость)
#include <math.h>
+
    dt = 0.1;
#include <iomanip>
+
    a = (M_PI * 30)/180;
#include <fstream>
+
    Ball b2(a,10 , 1, MakeVector(0,0,0),MakeVector(30,a),g);
#include <conio.h>
 
#include <stdio.h>
 
  
 +
    strcpy(s,"");
 +
    strcat(s, "o2.txt");
 +
    outfile.open(s,ios :: trunc);
 +
    outfile.close();
 +
    Vector3D r1 = b2.MR1(dt),rp;
 +
    for (double i = 0; i <= 20; i += dt)
 +
    {
 +
        rp = b2.getR();
 +
        b2.writePosToFile(s);
 +
        b2.writePosToScreen();
 +
        b2.changeR(r1,dt);
 +
        b2.changeV(r1,dt);
 +
        r1.x = rp.x;
 +
        r1.y = rp.y;
 +
    }
  
using namespace std;
+
    //Точное решение (Линейная зависимость)
 
+
    dt = 0.1;
double g = 9.8, Pi = 3.1415; // Задаем две глобальные переменные ускорения свободного падения и числа Pi
+
    a = (M_PI * 30)/180;
 +
    Ball b3(a,10 , 1, MakeVector(0,0,0),MakeVector(30,a),g);
  
int WoutR(double alpha, double dt, double t, double Yo, double Vo) // Функция, записывающая в файл Throws Without Resistance.txt координаты тела, которое движется без сопротивления
+
    strcpy(s,"");
{
+
    strcat(s, "o3.txt");
     FILE *Coord;
+
    outfile.open(s, ios :: trunc);
  Coord = fopen ("Throws Without Resistance.txt", "w");
+
    outfile.close();
    double X = 0, Y = 0; // Координаты начала
+
     for (double i = 0; i <= 20; i += dt)
 +
    {
 +
        b3.WVTS(b3.positionReal(i));
 +
        b3.WVTF(b3.positionReal(i), s);
 +
    }
  
    while ( Y >= Yo) // Yo используем для того, чтобы цикл прекратился тогда, когда тело упадет
 
    {
 
  
      X =  Vo*t*cos(alpha);
+
    //Верле (Квадратичная зависимость)
      Y = Vo*t*sin(alpha) - (g*t*t)*0.5;
+
    dt = 0.1;
      t+= dt;
+
    a = (M_PI * 30)/180;
     if (Y > Yo )
+
    Ball b4(a,10 , 1, MakeVector(0,0,0),MakeVector(30,a),g);
         fprintf(Coord, "%.3lf \t %.3lf\n", X, Y);
+
 
    else
+
    strcpy(s,"");
         fprintf(Coord, "%.3lf \t %.3lf\n", X, 0.000); // Используем такой else для того, чтобы не получить отрицательную координату
+
    strcat(s, "o4.txt");
    }
+
    outfile.open(s, ios :: trunc);
 +
    outfile.close();
 +
    r1 = b4.MR1(dt);
 +
    for (double i = 0; i <= 20; i += dt)
 +
     {
 +
        rp = b4.getR();
 +
         b4.writePosToFile(s);
 +
        b4.writePosToScreen();
 +
        b4.changeRSQ(r1,dt);
 +
         b4.changeV(r1,dt);
 +
        r1.x = rp.x;
 +
        r1.y = rp.y;
 +
    }
  
 +
    return 0;
 
}
 
}
 +
</syntaxhighlight>
  
int ExactForm(double alpha, double dt, double t, double Yo, double Vo, double R, double m) // Функция, записывающая в файл ExactForm.txt координаты тела, рассчитывающиеся по формлуе точного решения
+
Файл "'''Vector.h'''"
{                                                                                          // для линейной зависимости
+
<syntaxhighlight lang="cpp" line start="1" enclose="div">
    FILE *Coord;
+
#ifndef VECTOR_H_INCLUDED
  Coord = fopen ("ExactForm.txt", "w");
+
#define VECTOR_H_INCLUDED
    double X, Y = 0, Vx, Vy;
 
  
    while ( Y >= Yo) // Использование Yo аналогично использованию в прошлом пункте.
+
struct Vector3D
    {
+
{
 +
  double x,y,z;
 +
};
  
      X = ((m*Vx)/R) * (1 - exp(((-1)*R*t)/m));
+
Vector3D VmV(Vector3D v1,Vector3D v2)               //векторное вычитание
      Y = (m/R)*((Vy + (g*m)/R)*(1 - exp((-1)*R*t/m))) - (g*t*m)/R;
+
{
      Vx = Vo*cos(alpha);
+
    Vector3D v = {v1.x - v2.x,v1.y - v2.y,v1.z - v2.z };
      Vy = Vo*sin(alpha);
+
    return v;
      t+= dt;
+
};
     if (Y > Yo )
+
Vector3D VpV(Vector3D v1,Vector3D v2)               //векторное сложение
        fprintf(Coord, "%.3lf \t %.3lf\n", X, Y);
+
{
    else
+
     Vector3D v = {v1.x + v2.x,v1.y + v2.y,v1.z + v2.z };
        fprintf(Coord, "%.3lf \t %.3lf\n", X, 0.000); // используется аналогично прошлому пункту
+
    return v;
      }
 
 
}
 
}
  
int VerleSq (double alpha, double dt, double t, double Yo, double Xo, double Vo, double R, double m) // Функция, записывающая в файл VerleSq.txt оординаты тела, рассчитывающиеся по формлуе Верле
+
double VV(Vector3D v1,Vector3D v2)               //скалярное умножение
{                                                                                                   // для Квадратичной зависимости сопротивления от скорости
+
{
    FILE *Coord;
+
  return (v1.x*v2.x + v1.y*v2.y + v1.z*v2.z);
  Coord = fopen ("VerleSq.txt", "w");
+
}
  
    double X, Xnext, Xprev, Y, Ynext, Yprev, Vx, Vy, V, Yop, Xop; // X, Y - текущие координаты; Xnext, Ynext - координаты следующего шага; Xprev, Yprev - координаты предыдущего шага.
+
Vector3D VxV(Vector3D v1,Vector3D v2)              //векторное умножение
                                                                  // Xop, Yop - вспомогательные координаты для (-1)-го шага
+
{
 +
  Vector3D v = {v1.y*v2.z - v1.z*v2.y, v1.z*v2.x - v1.x*v2.z,v1.x*v2.y - v1.y*v2.x};
 +
  return v;
 +
}
  
    Yop = Yo - Vo*sin(alpha)*dt; // Сторки 62-79 используются для просчитывания (-1)-го шага, так как в точке 0;0 у нас нету предыдущего шага
+
bool Kol(Vector3D v1,Vector3D v2)
    Xop = Xo - Vo*cos(alpha)*dt;
+
{
    X = Xo;
+
  return ((v1.x/v2.x == v1.y/v2.y)&&(v1.z/v2.z == v1.y/v2.y))? true:false;
    Y = Yo;
+
}
    Xnext = 2.0*X - Xop - (R/m)*Vo*Vo*cos(alpha)*(dt*dt);
 
    Vx = (1.0/(2.0*dt))*(Xnext - Xop);
 
    Ynext = 2.0*Y - Yop - (g +(R/m)*Vo*Vo*sin((alpha)))*(dt*dt);
 
    Vy = (1.0/(2.0*dt))*(Ynext - Yop);
 
    V = sqrt((Vo*cos(alpha)*Vo*cos(alpha)) + (Vo*sin(alpha)*Vo*sin(alpha)));
 
  
    fprintf(Coord, "%.3lf \t %.3lf\n", X, Y); // Записываем первую координату в файл
+
Vector3D VS(Vector3D v1, double s)
 +
{
 +
    Vector3D v = {v1.x*s, v1.y*s, v1.z*s};
 +
    return v;
 +
}
  
    Xprev = X; // Меняем координаты местами. Так (n-1)-ый шаг становится n-ым шагом, n-ый шаг становится (n+1)-ым шагом. Далее аналогично
+
double Length(Vector3D v1)
    X = Xnext;
+
{
     Yprev = Y;
+
     return sqrt(VV(v1,v1));
    Y = Ynext;
+
}
  
 +
Vector3D MakeVector(double x,double y,double z)
 +
{
 +
    Vector3D v = {x,y,z};
 +
    return v;
 +
}
  
    while (Y >= Yo) // После выполнения строк 62-79 получаем все необходимые данные для выполнения алгоритма.
+
Vector3D MakeVector(double length,double angle)
    {
+
{
     Xnext = 2.0*X - Xprev - (R/m)*V*Vx*(dt*dt);
+
     Vector3D v = {length * cos(angle), length * sin(angle),0};
    Vx = (1.0/(2.0*dt))*(Xnext - Xprev);
+
     return v;
    Ynext = 2.0*Y - Yprev - (g +(R/m)*V*Vy)*(dt*dt);
+
}
    Vy =  (1.0/(2.0*dt))*(Ynext - Yprev);
 
    V = sqrt((Vx*cos(alpha)*Vx*cos(alpha)) + (Vy*sin(alpha) - g*dt)*(Vy*sin(alpha) - g*dt));
 
    if (Ynext > Yo )
 
        fprintf(Coord, "%.3lf \t %.3lf\n", Xnext, Ynext);
 
    else
 
 
 
      fprintf(Coord, "%.3lf \t %.3lf\n", X, 0.000);
 
 
 
     Xprev = X;
 
    X = Xnext;
 
    Yprev = Y;
 
    Y = Ynext;
 
    }
 
  
 +
double Proection(Vector3D base, Vector3D dir)
 +
{
 +
    return (VV(base,dir)/Length(base));
 
}
 
}
int VerleL (double alpha, double dt, double t, double Yo, double Xo, double Vo, double R, double m) // Функция, записывающая в файл VerleL.txt оординаты тела, рассчитывающиеся по формлуе Верле
+
#endif // VECTOR_H_INCLUDED
{                                                                                                  // для линейной зависимости сопротивления от скорости
+
</syntaxhighlight>
    FILE *Coord;
+
</div>
  Coord = fopen ("VerleL.txt", "w");
 
  
    double X, Xnext, Xprev, Y, Ynext, Yprev, Vx, Vy, V,Yop, Xop; // Комментарии аналогичны переменным и формулам в VtrleSq
 
  
    Yop = Yo - Vo*sin(alpha)*dt;
 
    Xop = Xo - Vo*cos(alpha)*dt;
 
    X = Xo;
 
    Y = Yo;
 
    Xnext = 2.0*X - Xop - (R/m)*Vo*Vo*cos(alpha)*(dt*dt);
 
    Vx = (1.0/(2.0*dt))*(Xnext - Xop);
 
    Ynext = 2.0*Y - Yop - (g +(R/m)*Vo*Vo*sin((alpha)))*(dt*dt);
 
    Vy =  (1.0/(2.0*dt))*(Ynext - Yop);
 
    V = sqrt((Vo*cos(alpha)*Vo*cos(alpha)) + (Vo*sin(alpha)*Vo*sin(alpha)));
 
  
    fprintf(Coord, "%.3lf \t %.3lf\n", X, Y);
+
<div class="mw-collapsible mw-collapsed" style="width:100%" >
 +
'''[[Васильева Анастасия]]'''
 +
 
 +
'''Описание программы''': пользователь вводит начальную скорость полета, угол падения и шаг, с которым будут рассчитаны точки.
  
    Xprev = X;
+
Программа записывает в один файл результаты вычисления:
    X = Xnext;
+
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;  
    Yprev = Y;
+
# Координаты, полученные при численном интегрировании - метод Эйлера;
    Y = Ynext;
+
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
 +
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
  
 +
Скачать можно  [http://tm.spbstu.ru/Файл:fly.zip тут].
  
    while (Y >= Yo)
 
    {
 
    Xnext = 2.0*X - Xprev - (R/m)*Vx*(dt*dt);
 
    Vx = (1.0/(2.0*dt))*(Xnext - Xprev);
 
    Ynext = 2.0*Y - Yprev - (g +(R/m)*Vy)*(dt*dt);
 
    Vy =  (1.0/(2.0*dt))*(Ynext - Yprev);
 
  if (Ynext > Yo )
 
        fprintf(Coord, "%.3lf \t %.3lf\n", Xnext, Ynext);
 
    else
 
      fprintf(Coord, "%.3lf \t %.3lf\n", Xnext, 0.000);
 
  
    Xprev = X;
+
<div class="mw-collapsible-content">
    X = Xnext;
 
    Yprev = Y;
 
    Y = Ynext;
 
    }
 
  
}
 
  
int main()
+
'''Визуализированный результат работы программы'''
{
+
[[File:graphick.png]]
  double alpha, Vo, dt, R, m , t = 0, Yo = 0, Xo = 0; // Объявляем переменные: alpha - угол броска; Vo - начальная скорость; dt - шаг по времени; R- коэф. сопротивления; m- масса тела;
 
                                                      // t = 0 - начало отсчета времени с 0; Yo = 0, Xo = 0 - координаты начала
 
  int i = 0; // переменная для оператора switch
 
  
  cout << "Enter start speed:\n";
+
Для тела с массой 0.5 кг,сопротивлением воздуха 0.1, угол бросания 30°, начальная скорость 30 м, ускорение свободного падения 9.8 м/c^2, шаг 0.001;
  cin >> Vo; // Вводим с клавиатуры начальную скорость
 
  cout << "Enter angle in grades ( from 0 to 180 ):\n";
 
  cin >> alpha; // Вводим с клавиатуры угол броска в градусах
 
  alpha = alpha*Pi / 180; // переводим угол броска из градусов в радианы
 
  cout << "Enter mass:\n";
 
  cin >> m; // Вводим с клавиатуры массу
 
  cout << "Enter precision:\n";
 
  cin >> dt; // Вводим с клавиатуры шаг по времени
 
  cout << "Enter resistance:\n";
 
  cin >> R; // Вводим сопротивление воздуха
 
  cout << "Press 1 to draw graph without resistance\n\n"
 
          "Press 2 to draw graph in Exact form\n\n"
 
          "Press 3 to draw graph in VerleSq form\n\n"
 
          "Press 4 to draw graph in VerleL form\n\n"
 
          "Press 5 to draw all graphs at the same time\n\n"
 
          "Press 0 to quit\n\n";
 
  cin >> i;
 
  cout << "\nPress any button\n";
 
  
 +
# "output.txt" using 1 : 2 - координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
 +
# "output.txt" using 3 : 4 - координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости (численное интегрирование - метод Эйлера);
 +
# "output.txt" using 5 : 6 - координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости;
 +
# "output.txt" using 7 : 8 - координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости.
  
    FILE *Gnu;
 
    Gnu = fopen ("Throws.gp", "w"); // Создаем файл формата gp, который будем открывать программой gnuplot для того, чтобы построить наш график/ки по точкам
 
  
switch ( i )
+
<syntaxhighlight lang="cpp" line start="1" enclose="div">
{
+
 
case 1:
+
#include <iostream>
    {
+
#include <fstream>
    WoutR(alpha,dt,t,Yo,Vo);
+
#include <iomanip>
    fprintf(Gnu, "plot \"Throws Without Resistance.txt\" using 1:2 w l");
+
#include <time.h>
    break;
+
#include <conio.h>
    }
+
#include <stdlib.h>
case 2:
+
#include <math.h>
    {
+
#include <cstring>
    ExactForm(alpha,dt,t,Yo,Vo,R,m);
+
using namespace std;
    fprintf(Gnu, "plot \"ExactForm.txt\" using 1:2 w l");
+
 
    break;
+
class pad ///создаем класс
    }
+
{
case 3:
+
private: ///в закрытом доступе
    {
+
     double *X, *Y, *E, *G, *Z, *S, *V, *U; ///координаты по х и у; *E, *G : численное интегрирование метод Эйлера, *Z, *S- метод верле, *V, *U- точный метод
    VerleSq(alpha,dt,t,Yo,Xo,Vo,R, m);
+
    double a, g , pi;///ускорение, коэфф свободного падения, значение числа пи
    fprintf(Gnu, "plot \"VerleSq.txt\" using 1:2 w l");
+
    int Size; ///размер массива- сколько точек считать в первом способе
    break;
+
    double v, shag, b, vx, vy;///скорость, шаг по времени, угол в градусах скорость по х, скорость по у
    }
 
case 4:
 
    {
 
     VerleL(alpha,dt,t,Yo,Xo,Vo,R, m);
 
    fprintf(Gnu, "plot \"VerleL.txt\" using 1:2 w l");
 
    break;
 
    }
 
case 5:
 
    {
 
  WoutR(alpha,dt,t,Yo,Vo);
 
  ExactForm(alpha,dt,t,Yo,Vo,R,m);
 
  VerleSq(alpha,dt,t,Yo,Xo,Vo,R, m);
 
  VerleL(alpha,dt,t,Yo,Xo,Vo,R, m);
 
  fprintf(Gnu, "plot \"Throws Without Resistance.txt\" using 1:2 w l, \"ExactForm.txt\" using 1:2 w l, \"VerleSq.txt\" using 1:2 w l, \"VerleL.txt\" using 1:2 w l"); // записываем в Throws.gp названия четырех файлов
 
  break;
 
    }                                                  // с координатами таким образом, чтобы программа gnuplot смогла их увидеть и прочесть
 
case 0:
 
    break;
 
default:
 
    break;
 
}
 
    return 0;
 
}
 
  
</syntaxhighlight>
+
    void SetX() ///создаем функцию для вычисления значенй по х для простого падения и по эйлеру
</div>
+
    {
 
+
        g = 9.8;///коэфф свободного падения
 
+
        float t = 0; ///время
'''[[Иванова Яна]]'''
+
        X = new double [Size];///создаем массив для координат по х для простого падения
 +
        E = new double [Size];///создаем массив для координат по х для интегрирования по эйлеру
 +
        X[0] = 0; ///задаем значение по х в нуле
 +
        E[0] = 0 ; ///задаем значение по х в нуле по эйлеру
 +
        for (int i = 1; i < Size; i++) ///задаем цикл от 1 (для нуля мы задали), чтобы считать координаты
 +
        {
 +
            t += shag; ///каждый раз прибавляем по времени шаг
 +
            X[i] = v * cos(a) * t; ///координаты по х для простого падения
 +
            E[i] = E[i-1] + v * cos(a) * shag; ///х из интегрирования по эйлеру
 +
        }
 +
    }
  
'''Описание программы''': в программе выполняются четыре метода подсчета координат тела, брошенного под углом к горизонту. Координаты записываются в файл, строятся четыре графика, иллюстрирующие поведение тела при полете. Код написан для определенных начальных условий (для примера), если Вы хотите выполнить расчет для другой конфигурации, внесите изменения в начальные данные программы в самом коде.
+
    void SetY()///создаем функцию для вычисления значенй по у для простого падения и по эйлеру
Начальная скорость: 40 м/с, угол бросания: 45 градусов, коэффициент сопротивления воздуха: 0.023, шаг по времени : 0.1 секунды.
+
    {
 +
        g = 9.8; ///коэфф свободного падения
 +
        double Vy; /// переменная для значение скорости по у для метода эйлера
 +
        float t = 0; ///время
 +
        Y = new double [Size];///создаем массив для координат по у для простого падения
 +
        G = new double [Size];///создаем массив для координат по х для интегрирования по эйлеру
 +
        Vy = v * sin (a);/// значение скорости по у для метода эйлера
 +
        Y[0] = 0;///задаем значение по у в нуле
 +
        G[0] = 0;///задаем значение по у в нуле по эйлеру
 +
        for (int i = 1; i < Size; i++)///задаем цикл от 1 (для нуля мы задали), чтобы считать координаты
 +
        {
 +
            t += shag; ///каждый раз прибавляем по времени шаг
 +
            Y[i] = v * sin (a) *t - (g * t * t) * 0.5; ///координаты по у для простого падения
 +
            Vy -= g * shag; ///значение скорости по у для метода эйлера
 +
            G[i] = G[i-1] + Vy  * shag;///у из интегрирования по эйлеру
 +
        }
 +
    }
  
Скачать программу можно [http://tm.spbstu.ru/File:main.zip здесь]
+
    void SetVerle() ///функция для метода верле
 
+
    {
<div class="mw-collapsible-content">
+
        double k = 0.1, m = 0.5; ///коэфф сопротивления водуха, масса тела
'''Визуализированный результат работы программы'''[[File:graph.png]]
+
        g = 9.8; /// коэфф свободного падения
 
+
        uint32_t Size1 = 1000000.0; ///размер массива
[[:File:graph.png]]
+
        S = new double [Size1]; ///создаем массив для значений по х для метода верле
 
+
        Z = new double [Size1]; ///создаем массив для значений по у для метода верле
<syntaxhighlight lang="cpp" line start="1" enclose="div">
+
        vx = v * cos(a); ///формулы для вычисления скорости по оси х
#include <iostream>
+
        vy = v * sin(a); ///формулы для вычисления скорости по оси у
#include <math.h>
+
        S[1] = 0; ///значение х метод верле
#include <iomanip>
+
        S[0] = -vx * shag; ///значение в нуле
#include <fstream>
+
        Z[1] = 0; ///значение у метод верле
#include <conio.h>
+
        Z[0] = -vy * shag; ///значение в нуле
 
+
        for (int i = 0; i < Size1-2; i++) ///задаем цикл
 
+
        {
using namespace std;
+
            S[i+2] = 2.0 * S[i+1] - S[i] - (k / m) * v * vx * shag * shag;///значения по х для верле
 
+
            vx = 0.5 * ( 1.0 / shag )* ( S[i+2] - S[i]);///считаем значения скорости по оси х
ofstream outfile;
+
            Z[i+2] = 2.0 * Z[i+1] - Z[i] - ( g + (k / m) * v * vy ) * shag * shag;///значения по х для верле
 
+
            vy = 0.5 * ( 1.0 / shag )* ( Z[i+2] - Z[i]);///считаем значения скорости по оси х
double perevod (double angle) //перевод из градусов в радианы
+
            v = sqrt (vx * vx + vy * vy); ///модуль общей скорости
{
+
        }
    return (angle * M_PI / 180 );
+
     }
}
+
    void SetVerleLast() ///функция для точного метода верле
 
 
 
 
int main()
 
{
 
    //объявление переменных и задание начальных значений
 
    double X, Xnext, Xprev, Y, Ynext, Yprev, Vx, Vy, V,
 
    m = 1 , dt = 0.1 , g = 9.8,t = 0,
 
    ugol = 45, alpha, R = 0.023, Xo = 0, Yo = 0, Vo = 40;
 
 
 
    alpha = perevod (ugol);
 
 
 
    //точное решение для случая движения без сопротивления воздуха
 
    Y = Yo;
 
    X = Xo;
 
 
 
    outfile.open("1.txt");
 
 
 
     while (Y >= Yo)
 
 
     {
 
     {
         X = Xo + Vo * cos(alpha) * t;
+
         double k = 0.1, m = 0.5;///коэфф сопротивления водуха, масса тела
         Vx = Vo * cos(alpha);
+
        g = 9.8; /// коэфф свободного падения
         Y = Yo + Vo * sin(alpha) * - 0.5 * g * t * t;
+
        uint32_t Size2 = 1000000.0; ///размер массива
        Vy = Vo * sin(alpha) - g * t;
+
        float t = 0; ///время
         t += dt;
+
        V = new double [Size2]; ///создаем массив для значений по х для точного метода верле
 
+
        U = new double [Size2]; ///создаем массив для значений по у для точного метода верле
        outfile << X << ' ' << Y << endl;
+
        vx = v * cos(a); ///формулы для вычисления скорости по оси х
 +
         vy = v * sin(a); ///формулы для вычисления скорости по оси у
 +
        ///double e = 2.7 ;///значение экспоненты
 +
         V[0] = 0; ///значение х точный метод верле
 +
        U[0] = 0; ///значение у точный метод верле
 +
        for (int i = 1; i < Size2; i++)
 +
        {
 +
            t += shag; ///увеличиваем время на шаг
 +
            V[i] = vx * (m / k) * (1.0 - exp(((-k) / m) * t)); ///значения по х для точного верле
 +
            U[i] = (m / k) * (vy +  g * (m / k)) * (1.0 -  (exp(((-k) / m) * t))) - g * t * (m / k);///значения по х для точного верле
 +
         }
 
     }
 
     }
    outfile.close();
 
  
    //начальные условия для квадратичной зависимости (метод Верле)
+
public: ///в открытом
    Yprev = Yo - Vo*sin(alpha)*dt;
+
     pad()
    Xprev = Xo - Vo*cos(alpha)*dt;
 
    X = Xo;
 
    Y = Yo;
 
    V = Vo;
 
    Vx = Vo * cos(alpha);
 
    Vy = Vo * sin(alpha);
 
 
 
    outfile.open("2.txt");
 
 
 
     while (Y >= Yo)
 
 
     {
 
     {
         Xnext = 2.0 * X - Xprev - (R / m) * V * Vx * (dt * dt);
+
         X = 0; ///зануляем значения
         Vx = ( Xnext - Xprev )/ (2.0 * dt);
+
        Y = 0;
         Ynext = 2.0 * Y - Yprev - (g + (R / m) * V * Vy) * (dt * dt);
+
        Size = 0;
         Vy = (Ynext - Yprev)/ (2.0 * dt);
+
        v = 0;
         V = sqrt(Vy*Vy + Vx*Vx );
+
        shag = 0;
         outfile << X << ' ' << Y << endl;
+
         b = 0;
 
+
    }
         Xprev = X;
+
    pad(double _v, double _shag, double _b) ///конструктор с параметрами
         X = Xnext;
+
    {
         Yprev = Y;
+
        pi = M_PI; ///значение числа пи
         Y = Ynext;
+
        g = 9.8; ///коэфф свободного падения
 +
         v = _v;/// присваиваем значения переменных значению параметров в конструкторе
 +
        shag = _shag;
 +
        b = _b;
 +
         a = (pi * b) / 180.0 ; ///вычисляем значение угла в радианах
 +
         double t = (2.0 * v * sin(a)) / g; /// считаем значение времени
 +
         Size = abs( t / shag )+1;///ищем значение размера массива
 +
         SetX(); ///вызываем функции зависящие от параметров конструктора
 +
         SetY();
 +
         SetVerle();
 +
         SetVerleLast();
 
     }
 
     }
    outfile.close();
 
  
     //начальные условия для линейной зависимости (метод Верле)
+
     void FilePrint() ///функция записи в файл
    Yprev = Yo - Vo*sin(alpha)*dt;
 
    Xprev = Xo - Vo*cos(alpha)*dt;
 
    X = Xo;
 
    Y = Yo;
 
    V = Vo;
 
    Vx = Vo * cos(alpha);
 
    Vy = Vo * sin(alpha);
 
 
 
    outfile.open("3.txt");
 
 
 
    while (Y >= Yo)
 
 
     {
 
     {
         Xnext = 2.0 * X - Xprev - (R / m) * Vx * (dt * dt);
+
         ofstream fout("output.txt"); ///открываем файл уже созданный в папке с программой
         Vx = ( Xnext - Xprev )/ (2.0 * dt);
+
         fout << "X:    " << "    Y:    " << "    E:  " << "  G:  " << "  S:  " << "  Z:  "<< "  V:  "<< "    U:    "<<"\n" ; ///выводим стоку с разными названиями массивов, соотв. координатам по х и у различных методов
         Ynext = 2.0 * Y - Yprev - (g + (R / m) * Vy) * (dt * dt);
+
         for (int i = 0; i < Size; i++) ///цикл
         Vy =  (Ynext - Yprev)/ (2.0 * dt);
+
        fout << X[i] << "    " << Y[i] << "    " << E[i] << "    "  << G[i] << "  " << S[i] << "  " << Z[i] << "  " << V[i] <<"    "<< U[i] <<"\n"; ///забивает сами значения массивов
        V = sqrt(Vy*Vy + Vx*Vx );
+
         fout.close();///закрываем файл
        outfile << X << ' ' << Y << endl;
+
    };
 +
};
 +
 
 +
int main()/// основная функция
 +
{
 +
    double shag, b, v; ///шаг, угол в градусах, скорость начальная
 +
    cout << "vvedite v "; ///просим пользователя ввести значение скорости начальной
 +
    cin >> v; ///считываем начальную скорость
 +
    cout << "vvedite ygol ";///просим пользователя ввести угол в градусах
 +
    cin >> b;/// считываем угол
 +
    cout << "vvedite shag ";///просим пользователя ввести шаг по времени
 +
    cin >> shag; ///считываем значение шага
 +
    pad F1(v, shag, b); ///объявление коструктора, создание функции F1 с переменными v, shag, b
 +
    F1.FilePrint(); ///вызываем функцию для записи файла
 +
}
 +
</syntaxhighlight>
 +
</div>
 +
 
  
        Xprev = X;
 
        X = Xnext;
 
        Yprev = Y;
 
        Y = Ynext;
 
    }
 
    outfile.close();
 
  
    //точное решения для линейной зависимости
+
'''[[Иванова Яна]]'''
    Y = Yo;
 
    X = Xo;
 
    t = 0;
 
  
    outfile.open("4.txt");
+
'''Описание программы''': в программе выполняются четыре метода подсчета координат тела, брошенного под углом к горизонту. Координаты записываются в файл, строятся четыре графика, иллюстрирующие поведение тела при полете. Код написан для определенных начальных условий (для примера), если Вы хотите выполнить расчет для другой конфигурации, внесите изменения в начальные данные программы в самом коде.
 +
Начальная скорость: 40 м/с, угол бросания: 45 градусов, коэффициент сопротивления воздуха: 0.023, шаг по времени : 0.1 секунды.
  
    while (Y >= Yo)
+
Скачать программу можно [http://tm.spbstu.ru/File:main.zip здесь]
    {
 
        Vx = Vo * cos(alpha);
 
        Vy = Vo * sin(alpha);
 
        X = (m * Vx / R)* (1 - exp(-1 * R * t / m));
 
        Y = (m/R)*((Vy + g * m / R)*(1 - exp(-1 * R * t / m)) - g * t);
 
        t += dt;
 
        outfile << X << ' ' << Y << endl;
 
    }
 
    outfile.close();
 
  
    return 0;
+
<div class="mw-collapsible-content">
 +
'''Визуализированный результат работы программы'''[[File:graph.png]]
  
}
+
[[:File:graph.png]]
  
</syntaxhighlight>
+
<syntaxhighlight lang="cpp" line start="1" enclose="div">
</div>
+
#include <iostream>
 +
#include <math.h>
 +
#include <iomanip>
 +
#include <fstream>
 +
#include <conio.h>
  
<div>
 
  
'''[[Капитанюк Светлана]]'''
+
using namespace std;
  
'''Описание программы''' : программа записывает в четыре файла результаты вычисления:
+
ofstream outfile;
  
Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
+
double perevod (double angle) //перевод из градусов в радианы
Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
+
{
Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
+
    return (angle * M_PI / 180 );
Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
+
}
  
Скачивать [http://tm.spbstu.ru/File:Point_03.zip тут]
 
  
</div>
+
int main()
 +
{
 +
    //объявление переменных и задание начальных значений
 +
    double X, Xnext, Xprev, Y, Ynext, Yprev, Vx, Vy, V,
 +
    m = 1 , dt = 0.1 , g = 9.8,t = 0,
 +
    ugol = 45, alpha, R = 0.023, Xo = 0, Yo = 0, Vo = 40;
  
<div>
+
    alpha = perevod (ugol);
'''[[Киселёв Лев]]'''
 
  
'''Описание программы''': программа рассчитывает координаты точки при следующих случаях
+
    //точное решение для случая движения без сопротивления воздуха
#  Полет тела без сопротивления воздуха;
+
    Y = Yo;
#  Полет тела при линейной зависимости силы сопротивления воздуха от скорости, при котором координаты тела рассчитываются точным методом;
+
    X = Xo;
#  Полет тела при линейной зависимости силы сопротивления воздуха от скорости, при котором координаты тела рассчитываются методом Верле;
 
#  Полет тела при квадратичной зависимости силы сопротивлении воздуха от скорости, при котором координаты тела рассчитываются методом Верле;
 
  
Скачать можно [[http://mech.spbstu.ru/File:3zadanie.rar тут]]
+
    outfile.open("1.txt");
</div>
 
  
<div class="mw-collapsible mw-collapsed" style="width:100%" >
+
    while (Y >= Yo)
'''[[Лебедев Станислав]]'''
+
    {
 
+
        X = Xo + Vo * cos(alpha) * t;
'''Описание программы''': программа записывает в четыре файла результаты вычисления:
+
        Vx = Vo * cos(alpha);
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;  
+
        Y = Yo + Vo * sin(alpha) * t  - 0.5 * g * t * t;
# Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
+
        Vy = Vo * sin(alpha) - g * t;
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
+
        t += dt;
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
 
  
Скачать можно  [http://tm.spbstu.ru/Файл:Шарик.rar тут].
+
        outfile << X << ' ' << Y << endl;
 +
    }
 +
    outfile.close();
  
<div class="mw-collapsible-content">
+
    //начальные условия для квадратичной зависимости (метод Верле)
 +
    Yprev = Yo - Vo*sin(alpha)*dt;
 +
    Xprev = Xo - Vo*cos(alpha)*dt;
 +
    X = Xo;
 +
    Y = Yo;
 +
    V = Vo;
 +
    Vx = Vo * cos(alpha);
 +
    Vy = Vo * sin(alpha);
  
[[File:1.png]]
+
    outfile.open("2.txt");
  
 +
    while (Y >= Yo)
 +
    {
 +
        Xnext = 2.0 * X - Xprev - (R / m) * V * Vx * (dt * dt);
 +
        Vx = ( Xnext - Xprev )/ (2.0 * dt);
 +
        Ynext = 2.0 * Y - Yprev - (g + (R / m) * V * Vy) * (dt * dt);
 +
        Vy =  (Ynext - Yprev)/ (2.0 * dt);
 +
        V = sqrt(Vy*Vy + Vx*Vx );
 +
        outfile << X << ' ' << Y << endl;
  
'''Визуализированный результат работы программы'''
+
        Xprev = X;
[[File:graph.png]]
+
        X = Xnext;
 
+
        Yprev = Y;
# o1 - координаты, рассчитанные по формуле, при движении без сопротивления воздуха;  
+
        Y = Ynext;
# o2 - координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
+
    }
# o3 - координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
+
    outfile.close();
# o4 - координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
 
  
 +
    //начальные условия для линейной зависимости (метод Верле)
 +
    Yprev = Yo - Vo*sin(alpha)*dt;
 +
    Xprev = Xo - Vo*cos(alpha)*dt;
 +
    X = Xo;
 +
    Y = Yo;
 +
    V = Vo;
 +
    Vx = Vo * cos(alpha);
 +
    Vy = Vo * sin(alpha);
  
Для тела с массой 10,сопротивлением воздуха 1, угол бросания 30°, начальная скорость 30 м/с, ускорение свободного падения 9.8 м/c^2;
+
    outfile.open("3.txt");
  
''Примечание: графики o1 и o2 намеренно посчитаны с малой точностью, чтобы графики не сливались.''
+
    while (Y >= Yo)
 +
    {
 +
        Xnext = 2.0 * X - Xprev - (R / m) * Vx * (dt * dt);
 +
        Vx = ( Xnext - Xprev )/ (2.0 * dt);
 +
        Ynext = 2.0 * Y - Yprev - (g + (R / m) * Vy) * (dt * dt);
 +
        Vy =  (Ynext - Yprev)/ (2.0 * dt);
 +
        V = sqrt(Vy*Vy + Vx*Vx );
 +
        outfile << X << ' ' << Y << endl;
  
Файл "'''main.cpp'''"
+
        Xprev = X;
<syntaxhighlight lang="cpp" line start="1" enclose="div">
+
        X = Xnext;
#include <iostream>
+
        Yprev = Y;
#include <math.h>
+
        Y = Ynext;
#include "Vector.h"
+
    }
#include <cstring>
+
    outfile.close();
#include <cmath>
+
 
#include <malloc.h>
+
    //точное решения для линейной зависимости
#include <fstream>
+
    Y = Yo;
 +
    X = Xo;
 +
    t = 0;
 +
 
 +
    outfile.open("4.txt");
  
using namespace std;
+
    while (Y >= Yo)
 +
    {
 +
        Vx = Vo * cos(alpha);
 +
        Vy = Vo * sin(alpha);
 +
        X = (m * Vx / R)* (1 - exp(-1 * R * t / m));
 +
        Y = (m/R)*((Vy + g * m / R)*(1 - exp(-1 * R * t / m)) - g * t);
 +
        t += dt;
 +
        outfile << X << ' ' << Y << endl;
 +
    }
 +
    outfile.close();
  
int n = 100;
+
    return 0;
ofstream outfile;
 
  
class Ball                                          //класс бросаемого тела
+
}
{
 
    private:
 
        double angle,m,k;                          //угол броска,масса,коэффицент сопротивления воздуха
 
        Vector3D r,v,a;                            //радиус-вектор,вектор скорости,ускорения
 
    public:
 
  
        //задание начальных параметров через угол,начальное положение,скорость и ускорение,с которым движется тело. Без сопротивления воздуха
+
</syntaxhighlight>
        Ball(double _angle, Vector3D _r, Vector3D _v, Vector3D _a)
+
</div>
        {
 
            angle = _angle;
 
            r    = _r;
 
            v    = _v;
 
            a    = _a;
 
        }
 
  
        //задание начальных параметров через угол,начальное положение,скорость и ускорение,с которым движется тело. Без сопротивления воздуха
 
        Ball(double _angle, double _m, double _k, Vector3D _r, Vector3D _v, Vector3D _a)
 
        {
 
            angle = _angle;
 
            r    = _r;
 
            v    = _v;
 
            a    = _a;
 
            m    = _m;
 
            k    = _k;
 
        }
 
  
        //точная формула зависимости координаты от времени
+
<div class="mw-collapsible mw-collapsed" style="width:100%" >
        Vector3D positionReal(double t)
+
'''[[Уманский Александр]]'''
        {
 
            double c1 = m/k,c2 = fabs(a.y)*c1, c3 = exp(-t/c1), c4 = c2*t;
 
            return MakeVector(v.x*c1*(1 - c3), c1*(v.y + c2)*(1 - c3) - c4 , 0 );
 
        }
 
  
        //вывод положения на экран
+
'''Описание программы''': программа записывает в четыре файла результаты вычисления:
        void writePosToScreen()
+
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
        {
+
# Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
            cout << r.x << "  " << r.y << "  " << r.z << endl;
+
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
        }
+
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
  
        //вывод положения в файл
+
<div class="mw-collapsible-content">
        void writePosToFile(char s[])
 
        {
 
            outfile.open(s,ios :: app);
 
            outfile << r.x << "           " << r.y << endl;
 
            outfile.close();
 
        }
 
  
        //вывод произвольного вектора на экран
+
[[File:Methods.rar|Скачать архив]]
        void WVTS(Vector3D v)
 
        {
 
            cout.width(15);
 
            cout << v.x;
 
            cout.width(15);
 
            cout << v.y;
 
            cout.width(15);
 
            cout << v.z << endl;
 
        }
 
  
        //вывод произвольного вектора в файл
+
[[File:1.png]]
        void WVTF(Vector3D v,char s[])
 
        {
 
            outfile.open(s,ios :: app);
 
            outfile << v.x << "          " << v.y << endl;
 
            outfile.close();
 
        }
 
  
        //"пересчет" координаты по Верле(Линейная зависмость)
+
<syntaxhighlight lang="cpp" line start="1" enclose="div">
        void changeR(Vector3D r1, double dt)
 
        {
 
            r = MakeVector(2 * r.x -  r1.x - k/m*v.x*dt*dt,2*r.y - r1.y - (abs(a.y) + k/m*v.y)*dt*dt, 0 );
 
        }
 
  
        //"пересчет" координаты по Верле(Квадратичная зависимость)
+
</syntaxhighlight>
        void changeRSQ(Vector3D r1, double dt)
+
</div>
        {
 
            r = MakeVector(2 * r.x -  r1.x - k/m*Length(v)*v.x*dt*dt,2*r.y - r1.y - (abs(a.y) + k/m*Length(v)*v.y)*dt*dt, 0 );
 
        }
 
        //пересчет скорости по Верле
 
        void changeV(Vector3D r1,double dt)
 
        {
 
            v =VS((VmV(r,r1)),1/(2*dt));
 
        }
 
  
        //рассчет предыдущегт к 0ому элементу
 
        Vector3D MR1(double dt)
 
        {
 
            return MakeVector(r.x - v.x * dt,r.y - v.y * dt,0);
 
        }
 
  
        //возращает координату тела
+
<div class="mw-collapsible mw-collapsed" style="width:100%" >
        Vector3D getR()
+
'''[[Лосева Татьяна ]]'''
        {
 
            return r;
 
        }
 
  
        //рассчет времени полета
+
'''Описание:''' Пользователя попросят ввести начальную скорость,угол бросания,массу тела  и коэф.сопротивления воздуха,тогда программа запишет в 4 разных файла результаты следующих вычислений:
        double TimeOfFly()
+
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
        {
+
# Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
            return (2*Length(v)*sin(angle)/Length(a));
+
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
        }
+
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
  
        //рассчет координаты по точной формуле. без сопротивления воздуха.
+
<div class="mw-collapsible-content">
        Vector3D position(double t)
 
        {
 
            return MakeVector(r.x + v.x*t + a.x*t*t/2,r.y + v.y*t + a.y*t*t/2,r.z + v.z*t + a.z*t*t/2);
 
        }
 
  
};
+
''Графики полученные при скорости =10 m/c;угле = 30 градусам;массе=10 кг;коэф.сопротивления=1;''
  
int main()
+
[[File:загружено (1).png]][[:File:загружено (1).png]]
{
 
    //задание начальных параметров
 
    Vector3D g = {0,-9.8,0};
 
    double a,dt = 0;
 
    char s[20];
 
  
//    cin >> dt;
+
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 +
#include<iostream>
 +
using namespace std;
 +
#define N 1
 +
#define PI 3.14159265
 +
#include <fstream>
 +
#include<cmath>
 +
double g=9.8;
 +
double step=0.01;
 +
#include<math.h>
  
    dt = 0.1;
+
void Func(double v,double r)//1.Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
    a = (M_PI * 30)/180;
 
    Ball b1(a, MakeVector(0,0,0),MakeVector(30,a),g);
 
  
    double tof = b1.TimeOfFly()+1;   //единичка прибавлена,чтобы график красивым был
+
{
 +
double x,y;
 +
 +
ofstream fout;//открытие файла
 +
  fout.open("C:\\Users\\Light\\Desktop\\1.txt");//указываем путь записи
 +
cout<<"method1"<<endl;
  
    //Без сопротивления возлуха
+
  for(double t=0.01;t<N;t=t+0.01)
    strcpy(s,"");
+
{
    strcat(s, "o1.txt");
+
y=v*t*sin(r*PI/ 180)-g*t*t/2;//координата y
    outfile.open(s, ios :: trunc);
+
x=v*t*cos(r*PI / 180);//координата х
    outfile.close();
+
 
    for (double i = 0; i <= tof; i += dt)
+
fout<<x<<"   ";//запись в файл х
    {
+
cout<<"X="<<x<<endl;//вывод на экран
        b1.WVTS(b1.position(i));
+
    fout<<y<<"    ";//запись в файл
        b1.WVTF(b1.position(i), s);
+
cout<<"Y="<<y<<endl<<endl;//вывод на экран
    }
+
fout<<endl;
 +
  }
 +
}
 +
 
 +
void Verle1( double n,double m ,double v0,double r)//Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
  
 +
{
 +
double x,y,x0=0,y0=0,xn_1,yn_1;//x0,y0=Xn,Yn начальные значения;xn_1=X(n-1);yn_1=Y(n-1);
  
    //Верле(Линейная зависимость)
+
double vx=v0*cos(r*PI / 180);//рассчитваем Vn для первого случая n=0 для x
    dt = 0.1;
+
  double vy=v0*sin(r*PI/ 180)-g*step;//рассчитваем Vn для первого случая n=0 для y
    a = (M_PI * 30)/180;
 
    Ball b2(a,10 , 1, MakeVector(0,0,0),MakeVector(30,a),g);
 
  
    strcpy(s,"");
+
  xn_1=x0-vx*step;//X(n-1) для первого случая n=0
    strcat(s, "o2.txt");
+
  yn_1=y0-vy*step;//Y(n-1) для первого случая n=0
    outfile.open(s,ios :: trunc);
+
  ofstream fout;//открытие файла
    outfile.close();
+
fout.open("C:\\Users\\Light\\Desktop\\2.txt");//путь записи в файл
    Vector3D r1 = b2.MR1(dt),rp;
+
cout<<"Verle1"<<endl<<endl;
    for (double i = 0; i <= 20; i += dt)
+
for(double t=0.02;t<N;t=t+step)
    {
+
{
        rp = b2.getR();
+
x=2*x0-xn_1-(n*vx*step*step)/m;//считаем Хn+1
        b2.writePosToFile(s);
+
vx=(x-xn_1)/(2*step);
         b2.writePosToScreen();
+
         xn_1=x0;//для следущего шага Xn-1=Xn
         b2.changeR(r1,dt);
+
         x0=x;//для следущего шага Xn=Xn+1
        b2.changeV(r1,dt);
+
        r1.x = rp.x;
+
y=2*y0-yn_1-(g+(n*vy)/m)*step*step;//Yn+1
        r1.y = rp.y;
+
vy=(y-yn_1)/(2*0.01);//скорость
    }
+
yn_1=y0;//для следущего шага Yn-1=Yn
 +
y0=y;//для следущего шага Yn=Yn+1
 +
    cout<<"X="<<x<<endl;
 +
cout<<"Y="<<y<<endl<<endl;
 +
    fout<<x<<" ";
 +
fout<<y<<"  ";
 +
fout<<endl;  
 +
  
    //Точное решение (Линейная зависимость)
+
}
    dt = 0.1;
+
}
    a = (M_PI * 30)/180;
 
    Ball b3(a,10 , 1, MakeVector(0,0,0),MakeVector(30,a),g);
 
  
    strcpy(s,"");
+
void Verle2( double n,double m ,double v0,double r)//3.Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
    strcat(s, "o3.txt");
+
 
    outfile.open(s, ios :: trunc);
+
{
    outfile.close();
+
double x,y,x0=0,y0=0,xn_1,yn_1,v;//x0,y0=Xn,Yn начальные значения;xn_1=X(n-1);yn_1=Y(n-1);
    for (double i = 0; i <= 20; i += dt)
+
 
    {
+
double vx=v0*cos(r*PI / 180);//рассчитваем Vn для первого случая n=0 для x
        b3.WVTS(b3.positionReal(i));
+
  double vy=v0*sin(r*PI/ 180)-g*step;//рассчитваем Vn для первого случая n=0 для y
        b3.WVTF(b3.positionReal(i), s);
 
    }
 
  
 +
  xn_1=x0-vx*step;//X(n-1) для первого случая n=0
 +
  yn_1=y0-vy*step;//Y(n-1) для первого случая n=0
 +
  ofstream fout;//открытие файла
 +
  fout.open("C:\\Users\\Light\\Desktop\\3.txt");//путь записи
 +
cout<<"Verle2"<<endl<<endl;
 +
for(double t=0.02;t<N;t=t+step)
 +
{
  
    //Верле (Квадратичная зависимость)
+
  v=sqrt(vx*vx+vy*vy);//скорость V
    dt = 0.1;
 
    a = (M_PI * 30)/180;
 
    Ball b4(a,10 , 1, MakeVector(0,0,0),MakeVector(30,a),g);
 
  
    strcpy(s,"");
+
x=2*x0-xn_1-(n*v*vx*step*step)/m;//Xn+1
    strcat(s, "o4.txt");
+
vx=(x-xn_1)/(2*step);//скорость Vx
    outfile.open(s, ios :: trunc);
+
        xn_1=x0;//для следущего шага Xn-1=Xn
    outfile.close();
+
x0=x;//для следущего шага Xn=Xn+1
    r1 = b4.MR1(dt);
+
    for (double i = 0; i <= 20; i += dt)
+
y=2*y0-yn_1-(g+(n*vy*v)/m)*step*step;//Yn+1
    {
+
vy=(y-yn_1)/(2*0.01);//скорость Vy
        rp = b4.getR();
+
yn_1=y0;//для следущего шага Yn-1=Yn
        b4.writePosToFile(s);
+
y0=y;//для следущего шага Yn=Yn+1
        b4.writePosToScreen();
+
cout<<"X="<<x<<endl;
        b4.changeRSQ(r1,dt);
+
cout<<"Y="<<y<<endl<<endl;
        b4.changeV(r1,dt);
+
fout<<x<<" ";
        r1.x = rp.x;
+
fout<<y<<"  ";
        r1.y = rp.y;
+
fout<<endl;  
    }
+
}
 
+
    return 0;
 
 
}
 
}
</syntaxhighlight>
 
  
Файл "'''Vector.h'''"
+
void method4(double n,double m ,double v0,double r)//Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
#ifndef VECTOR_H_INCLUDED
 
#define VECTOR_H_INCLUDED
 
 
 
struct Vector3D
 
 
{
 
{
  double x,y,z;
+
double x,y,x0=0,y0=0;//x0,y0 начальные значения;
};
 
  
Vector3D VmV(Vector3D v1,Vector3D v2)               //векторное вычитание
+
double vx=v0*cos(r*PI / 180);//рассчитваем Vx
{
+
  double vy=v0*sin(r*PI/ 180)-g*step;//рассчитваем Vy
    Vector3D v = {v1.x - v2.x,v1.y - v2.y,v1.z - v2.z };
+
 
    return v;
+
  ofstream fout;//открытие файла
};
+
  fout.open("C:\\Users\\Light\\Desktop\\4.txt");
Vector3D VpV(Vector3D v1,Vector3D v2)               //векторное сложение
+
cout<<"4"<<endl<<endl;
{
+
for(double t=0.01;t<N;t=t+step)
    Vector3D v = {v1.x + v2.x,v1.y + v2.y,v1.z + v2.z };
+
{
    return v;
+
x=x0+m*vx*(1-(exp((-1*n)*t/m)))/n;//координата х
 +
 +
y = y0+(m/n)*((vy + g * m / n)*(1 - exp(-1 * n * t / m))) - g * t*m/n;//координата у
 +
 
 +
//вывод в файл  и на экран
 +
    cout<<"X="<<x<<endl;
 +
cout<<"Y="<<y<<endl<<endl;
 +
fout<<x<<" ";
 +
fout<<y<<" ";
 +
fout<<endl;  
 +
 
 +
}
 
}
 
}
 
+
 
double VV(Vector3D v1,Vector3D v2)               //скалярное умножение
+
int main(void)
 
{
 
{
  return (v1.x*v2.x + v1.y*v2.y + v1.z*v2.z);
 
}
 
  
Vector3D VxV(Vector3D v1,Vector3D v2)              //векторное умножение
+
double v0,r,m,n;//v0-начальная скорость,r-угол в градусах,m-масса;n-коэф.сопротивления ветра
{
 
  Vector3D v = {v1.y*v2.z - v1.z*v2.y, v1.z*v2.x - v1.x*v2.z,v1.x*v2.y - v1.y*v2.x};
 
  return v;
 
}
 
  
bool Kol(Vector3D v1,Vector3D v2)
+
cout<<"Enter  start speed:"<<endl;
{
+
cin>>v0;
  return ((v1.x/v2.x == v1.y/v2.y)&&(v1.z/v2.z == v1.y/v2.y))? true:false;
+
cout<<"Enter angle less than 90 deg:"<<endl;
}
+
cin>>r;
 +
cout<<"Enter mass:"<<endl;
 +
cin>>m;
 +
cout<<"Coefficient of resistance:"<<endl;
 +
cin>>n;
 +
 +
Func(v0,r);
 +
Verle1(n,m,v0,r);
 +
Verle2(n,m,v0,r);
 +
method4(n,m,v0,r);
  
Vector3D VS(Vector3D v1, double s)
 
{
 
    Vector3D v = {v1.x*s, v1.y*s, v1.z*s};
 
    return v;
 
}
 
  
double Length(Vector3D v1)
 
{
 
    return sqrt(VV(v1,v1));
 
}
 
  
Vector3D MakeVector(double x,double y,double z)
+
int k;
{
+
cin>>k;
    Vector3D v = {x,y,z};
+
return 0;
    return v;
 
 
}
 
}
  
Vector3D MakeVector(double length,double angle)
 
{
 
    Vector3D v = {length * cos(angle), length * sin(angle),0};
 
    return v;
 
}
 
 
double Proection(Vector3D base, Vector3D dir)
 
{
 
    return (VV(base,dir)/Length(base));
 
}
 
#endif // VECTOR_H_INCLUDED
 
 
</syntaxhighlight>
 
</syntaxhighlight>
 
</div>
 
</div>
  
 +
Скачать можно  [http://tm.spbstu.ru/Файл:Verle.rar  тут].
  
<div>
+
<div class="mw-collapsible mw-collapsed" style="width:100%" >
'''[[Лобанов Илья]]'''
+
'''[[Степанянц Степан]]'''  
  
'''Описание программы''' : программа записывает в четыре файла результаты вычисления:
+
'''Описание программы''': программа записывает в четыре файла результаты вычисления:
 +
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
 +
# Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
 +
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
 +
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
  
Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
+
Скачать можно  [http://tm.spbstu.ru/%D0%A4%D0%B0%D0%B9%D0%BB:Mainpr.rar тут].
Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
 
Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
 
Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
 
  
 +
<div class="mw-collapsible-content">
 +
[[File:graph239.png]]
  
'''Краткая инструкция''':
+
Для тела с массой 1,сопротивлением воздуха 0.05, угол бросания 30°, начальная скорость 40 м/с, ускорение свободного падения 9.8 м/c^2;
  
В окне консоли пользователю предлагается вывести следующие значения: начальную скорость , угол и шаг.
 
После этого полученные в результате работы программы данные выводятся в файл.
 
  
Скачивать [[http://tm.spbstu.ru/File:Air.rar тут]]
 
[[http://tm.spbstu.ru/File:phys.rar тут]]
 
 
</div>
 
 
<div class="mw-collapsible mw-collapsed" style="width:100%" >
 
'''[[Лосева Татьяна ]]'''
 
 
'''Описание:''' Пользователя попросят ввести начальную скорость,угол бросания,массу тела  и коэф.сопротивления воздуха,тогда программа запишет в 4 разных файла результаты следующих вычислений:
 
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
 
# Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
 
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
 
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
 
 
<div class="mw-collapsible-content">
 
 
''Графики полученные при скорости =10 m/c;угле = 30 градусам;массе=10 кг;коэф.сопротивления=1;''
 
 
[[File:загружено (1).png]][[:File:загружено (1).png]]
 
  
 +
Файл "'''main.cpp'''"
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
#include<iostream>
+
#include <iostream>
 +
#include <locale.h>
 +
#include <math.h>
 +
#include <fstream>
 +
#include<iomanip>
 +
#include <cmath>
 
using namespace std;
 
using namespace std;
#define N 1
+
main ()
#define PI 3.14159265
 
#include <fstream>
 
#include<cmath>
 
double g=9.8;
 
double step=0.01;
 
#include<math.h>
 
 
 
void Func(double v,double r)//1.Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
 
 
 
 
{
 
{
double x,y;
+
    ofstream F;                                                                    //a1-угол в градусах,dt-шаг,r-сопротивление воздуха
+
int u0=50;
ofstream fout;//открытие файла
+
double x,y,t,a,a1=30,dt=0.1,y0=0,x0=0,g=9.8,r=0.05,m=1,ux,uy,ypr,xpr,ysl,xsl,u,yt; //ux,uy - проэкции скорости на оси х и у.
  fout.open("C:\\Users\\Light\\Desktop\\1.txt");//указываем путь записи
+
a=a1*M_PI/180; //Градусы в радианы
cout<<"method1"<<endl;
+
t=0;
 
+
  for(double t=0.01;t<N;t=t+0.01)
+
                                        //Движение без сопротивления воздуха
{
+
F.open("C:\\1.txt",ios::out);
y=v*t*sin(r*PI/ 180)-g*t*t/2;//координата y
+
while(y>=0)
x=v*t*cos(r*PI / 180);//координата х
+
{
 
+
    x=x0+u0*cos(M_PI/6)*t;
fout<<x<<"   ";//запись в файл х
+
    y=y0+u0*sin(M_PI/6)*t - 0.5 * g * t * t; //Расчитываем координаты в каждой точке через шаг
cout<<"X="<<x<<endl;//вывод на экран
+
  F<<x<<" "<<y<<endl;
    fout<<y<<"   ";//запись в файл
+
   t=t+dt;
cout<<"Y="<<y<<endl<<endl;//вывод на экран
+
fout<<endl;
 
  }
 
 
}
 
}
 
+
void Verle1( double n,double m ,double v0,double r)//Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
+
F.close();
 
+
                                        //Точное решение для линейной зависимости
{
+
F.open("C:\\2.txt",ios::out);
double x,y,x0=0,y0=0,xn_1,yn_1;//x0,y0=Xn,Yn начальные значения;xn_1=X(n-1);yn_1=Y(n-1);
+
y=y0;
 
+
x=x0;
double vx=v0*cos(r*PI / 180);//рассчитваем Vn для первого случая n=0 для x
+
t=0;                                                                           //Расчитываем координаты в каждой точке через шаг
  double vy=v0*sin(r*PI/ 180)-g*step;//рассчитваем Vn для первого случая n=0 для y
+
while(y>=0)
 
+
{
   xn_1=x0-vx*step;//X(n-1) для первого случая n=0
+
        ux = u0 * cos(a);
  yn_1=y0-vy*step;//Y(n-1) для первого случая n=0
+
        uy = u0 * sin(a);
  ofstream fout;//открытие файла
+
        x = x0+ (m * ux / r)* (1 - exp(-1 * r * t / m));                     //подстановка формул
fout.open("C:\\Users\\Light\\Desktop\\2.txt");//путь записи в файл
+
        y = y0+(m/r)*((uy + g * m / r)*(1 - exp(-1 * r * t / m)) - g * t);
cout<<"Verle1"<<endl<<endl;
+
        t = t + dt;
for(double t=0.02;t<N;t=t+step)
+
{
+
      F << x << ' ' << y << endl;
x=2*x0-xn_1-(n*vx*step*step)/m;//считаем Хn+1
+
vx=(x-xn_1)/(2*step);
+
         xn_1=x0;//для следущего шага Xn-1=Xn
+
        x0=x;//для следущего шага Xn=Xn+1
+
}
+
   F.close();
y=2*y0-yn_1-(g+(n*vy)/m)*step*step;//Yn+1
+
                                                        //метод Верле 1
vy=(y-yn_1)/(2*0.01);//скорость
+
ypr = y0 - u0*sin(a)*dt;
yn_1=y0;//для следущего шага Yn-1=Yn
+
yt=ypr;
y0=y;//для следущего шага Yn=Yn+1
+
    xpr = x0 - u0*cos(a)*dt;
    cout<<"X="<<x<<endl;
+
    x = x0;                          //Начальные условия
cout<<"Y="<<y<<endl<<endl;
+
    y = y0;
    fout<<x<<" ";
+
    u = u0;
fout<<y<<"  ";
+
    ux = u0 * cos(a);
fout<<endl;  
+
    uy = u0 * sin(a);                      
+
F.open("C:\\3.txt",ios::out);
 
+
}
+
    while (y >= y0)
}
+
    {
 
+
        xsl = 2 * x - xpr - (r / m) * u * ux * (dt * dt);
void Verle2( double n,double m ,double v0,double r)//3.Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
+
        ux = ( xsl - xpr )/ (2 * dt);
 
+
         ysl = 2 * y - ypr - (g + (r / m) * u * uy) * (dt * dt);       //xsl,ysl - координаты на шаге вперед. xpr,ypr- назад
{
+
        uy = (ysl - ypr)/ (2 * dt);
double x,y,x0=0,y0=0,xn_1,yn_1,v;//x0,y0=Xn,Yn начальные значения;xn_1=X(n-1);yn_1=Y(n-1);
+
        u = sqrt(uy*uy + ux*ux );
 
+
        F << x << ' ' << y << endl;
double vx=v0*cos(r*PI / 180);//рассчитваем Vn для первого случая n=0 для x
+
  double vy=v0*sin(r*PI/ 180)-g*step;//рассчитваем Vn для первого случая n=0 для y
+
        xpr = x;
 
+
        x = xsl;
  xn_1=x0-vx*step;//X(n-1) для первого случая n=0
+
        ypr = y;
  yn_1=y0-vy*step;//Y(n-1) для первого случая n=0
+
        y = ysl;
  ofstream fout;//открытие файла
+
    }
  fout.open("C:\\Users\\Light\\Desktop\\3.txt");//путь записи
+
    F.close();
cout<<"Verle2"<<endl<<endl;
+
                                                      //Метод Верле 2
for(double t=0.02;t<N;t=t+step)
+
    ypr = y0 - u0*sin(a)*dt;
{
+
yt=ypr;
 
+
    xpr = x0 - u0*cos(a)*dt;
  v=sqrt(vx*vx+vy*vy);//скорость V
+
    x = x0;                                                                           //xsl,ysl - координаты на шаге вперед. xpr,ypr- назад
 
+
    y = y0;
x=2*x0-xn_1-(n*v*vx*step*step)/m;//Xn+1
+
    u = u0;
vx=(x-xn_1)/(2*step);//скорость Vx
+
    ux = u0 * cos(a);                           
         xn_1=x0;//для следущего шага Xn-1=Xn
+
    uy = u0 * sin(a);
x0=x;//для следущего шага Xn=Xn+1
+
F.open("C:\\4.txt",ios::out);
+
y=2*y0-yn_1-(g+(n*vy*v)/m)*step*step;//Yn+1
+
    while (y >= y0)
vy=(y-yn_1)/(2*0.01);//скорость Vy
+
    {
yn_1=y0;//для следущего шага Yn-1=Yn
+
        xsl = 2 * x - xpr - (r / m) * ux * (dt * dt);
y0=y;//для следущего шага Yn=Yn+1
+
        ux = ( xsl - xpr )/ (2 * dt);
cout<<"X="<<x<<endl;
+
         ysl = 2 * y - ypr - (g + (r / m) * uy) * (dt * dt);
cout<<"Y="<<y<<endl<<endl;
+
        uy = (ysl - ypr)/ (2 * dt);
fout<<x<<" ";
+
        u = sqrt(uy*uy + ux*ux );
fout<<y<<"  ";
+
        F << x << ' ' << y << endl;
fout<<endl;  
+
}
+
        xpr = x;
+
        x = xsl;
 +
        ypr = y;
 +
        y = ysl;
 +
    }
 +
    F.close();
 +
 +
 +
return 0;
 +
 +
 
}
 
}
  
void method4(double n,double m ,double v0,double r)//Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
+
</syntaxhighlight>
{
+
</div>
double x,y,x0=0,y0=0;//x0,y0 начальные значения;
 
  
double vx=v0*cos(r*PI / 180);//рассчитваем Vx
 
  double vy=v0*sin(r*PI/ 180)-g*step;//рассчитваем Vy
 
 
 
  ofstream fout;//открытие файла
 
  fout.open("C:\\Users\\Light\\Desktop\\4.txt");
 
cout<<"4"<<endl<<endl;
 
for(double t=0.01;t<N;t=t+step)
 
{
 
x=x0+m*vx*(1-(exp((-1*n)*t/m)))/n;//координата х
 
 
y = y0+(m/n)*((vy + g * m / n)*(1 - exp(-1 * n * t / m))) - g * t*m/n;//координата у
 
  
//вывод в файл  и на экран
+
<div class="mw-collapsible mw-collapsed" style="width:100%" >
    cout<<"X="<<x<<endl;
+
'''[[Александр Сюрис]]'''
cout<<"Y="<<y<<endl<<endl;
 
fout<<x<<" ";
 
fout<<y<<" ";
 
fout<<endl;
 
  
}
+
'''Описание программы''':
}
+
Программа записывает в текстовый файл результаты вычисления координат по x и y с шагом в 0.1 секунду(возможно изменить) четырьмя различными способами:
 
+
#Координаты, рассчитанные по формуле, при движении без сопротивления воздуха
int main(void)
+
#Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении          воздуха от скорости
{
+
#Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости
 
+
#Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости
double v0,r,m,n;//v0-начальная скорость,r-угол в градусах,m-масса;n-коэф.сопротивления ветра
+
Скачать можно  [http://mech.spbstu.ru/File:%D0%9F%D0%BE%D0%BB%D0%B5%D1%82_%D1%82%D0%B5%D0%BB%D0%B0(%D0%90%D0%BB%D0%B5%D0%BA%D1%81%D0%B0%D0%BD%D0%B4%D1%80%D0%A1%D1%8E%D1%80%D0%B8%D1%81).zip тут].
 
+
<div class="mw-collapsible-content">
cout<<"Enter  start speed:"<<endl;
+
[[File:Снимок.PNG]]
cin>>v0;
+
Для тела с массой 1,сопротивлением воздуха 0.05, угол бросания 45°, начальная скорость 30 м/с, ускорение свободного падения 9.8 м/c^2;
cout<<"Enter angle less than 90 deg:"<<endl;
+
Файл "'''main.cpp'''"
cin>>r;
+
<syntaxhighlight lang="cpp" line start="1" enclose="div">
cout<<"Enter mass:"<<endl;
+
#include <iostream>
cin>>m;
+
#include <fstream>
cout<<"Coefficient of resistance:"<<endl;
+
#include <math.h>
cin>>n;
+
#include <cmath>
+
using namespace std;
Func(v0,r);
+
int o;
Verle1(n,m,v0,r);
+
double v,a,m,k;
Verle2(n,m,v0,r);
+
ofstream fout("file.txt");//создаем объект, сяванный с файлом file.txt
method4(n,m,v0,r);
 
  
  
  
int k;
+
int rez_1(double v, double a)
cin>>k;
+
{
return 0;
+
    fout<<"---------------Первый режим-------------------------"<<endl;
}
+
    fout<<" T=0 x=0 y=0";
 +
    fout<<endl;
 +
    double x=0,y=0,t=0.1, V0x, V0y, g=9.8,t1, T=0.1, Ty;
 +
    V0x=v*cos(a/180*M_PI);//рассчет проекций начальных скоростей на оси x и y с переводом угла в радианы
 +
    V0y=v*sin(a/180*M_PI);
 +
    Ty=2*V0y/g;//время полета
 +
    while (y>0 || x==0)//условие: пока тело не упадет на землю(те y=0, при этом не учитывая начало полета
 +
    {
 +
        x=x+V0x*t;               //ф-лы для рассчета x и y в данный момент времени
 +
        y=y+V0y*t-g*pow(t,2)/2;
  
</syntaxhighlight>
+
        if (y<0) //если y<0
</div>
+
            {
 +
                t1=Ty-T; //рассчитываем время,которое осталось лететь телу до земли
 +
                x=x+V0x*t1;//используя это время находим координату по х
 +
                fout<<" T="<<Ty<<" x="<<x<<" y=0"<<endl;//ввод в текстовый файл
 +
                break;
 +
            }
 +
            else
 +
                {
 +
                    V0y=V0y-g*t;// иначе находим новую скорость по y (по x не меняется)
 +
                    fout<<" T="<<T<<" x="<<x<<" y="<<y<<endl;
 +
                    T=T+t;//увел время на шаг
 +
                }
 +
    }
  
Скачать можно  [http://tm.spbstu.ru/Файл:Verle.rar  тут].
 
  
<div>
+
}
  
'''[[Ляжков Сергей]]'''
 
  
'''Описание программы''': Программа рассчитывает координаты полета тела по х и у. Как и в программе шахмат и интерполяции, здесь представлено меню выбора функций. Вы вводите начальные координаты, начальную скорость и угол полета(например, мяча или снаряда)(Нет смысла вводить величину скорости света, так как парабола вряд ли получится).
+
int rez_2(double v, double a, double k, double m)
Затем Вы выбираете в меню "вариант" сопротивления воздуха, после чего вводите массу тела и коэффициент сопротивления среды(без сопротивления воздуха этим можно пренебречь). Программа выводит массив точек и сохраняет их в текстовый файл. Эти точки - координаты полета до тех пор, пока значения y не станет ОТРИЦАТЕЛЬНЫМИ...
+
{
Это мой первый проект по моделированию, спасибо за предоставленную возможность попрактиковаться.
+
    fout<<"---------------Второй режим работы-------------------------"<<endl;
Скачать можно [[http://mech.spbstu.ru/File:Полет.zip тут]]
+
    fout<<" T=0 x=0 y=0";
</div>
+
    fout<<endl;
 +
    double t=0.1, Vx=v*cos(a/180*M_PI), Vy=v*sin(a/180*M_PI),y,x,T=0.1,g=9.8;
 +
    x=(m*Vx/k)*(1-exp(-1*k*T/m));            //ф-лы для рассчета x и y в данный момент времени
 +
    y =(m/k)*((Vy+g*m/k)*(1-exp(-1*k*T/m))-g*T);  //точное решение при лин завсисимости
 +
    while (y>0)
 +
    {
 +
        x=(m*Vx/k)*(1-exp(-1*k*T/m));
 +
        y =(m/k)*((Vy+g*m/k)*(1-exp(-1*k*T/m))-g*T);
 +
        fout<<" T="<<T<<" x="<<x<<" y="<<y<<endl;
 +
        T=T+t;
 +
    }
  
<br>'''[[Нарядчиков Александр]]'''<br>
 
'''Инструкция:''' Пользователю достаточно просто запустить программу.<br>
 
'''Описание программы:''' В комнате скачут 4 мячика, первый двигается без сопротивления воздуха, второй двигается с квадратичной зависимостью сопротивления воздуха от скорости (Метод Верле), третий двигается с линейной зависимостью сопротивления воздуха от скорости (точное решение), четвертый двигается с линейной зависимостью сопротивления воздуха от скорости (Метод Верле).<br>
 
'''Описание алгоритма:''' Программа реализована с помощью системы анимации(class anim), используя библиотеки OpenGl и GLUT. Изменения координат мячей проходят в режиме реального времени в векторной форме.<br>
 
<div class="mw-collapsible mw-collapsed" style="width:100%" >
 
"'''T06BALL.CPP'''"
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
/* FILENAME: T06BALL.CPP
 
* LAST UPDATE: 17.01.2016
 
*/
 
  
#include "ANIM.H"
+
}
#include "SAMPLE.H"
 
  
/* Main function */
 
void main( void )
 
{
 
// Получение единственного экземпляра класса анимации
 
sagl::anim &My = sagl::anim::Get();
 
 
 
// Шар, летящий без сопротивлением воздуха
 
        for (int i = 0; i < 1; i++)
 
                My << new ball(Pi / 6, 10 + i);
 
  
// Шар, летящий с сопротивлением воздуха
 
// Координаты получены методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости
 
for (int i = 0; i < 1; i++)
 
My << new ball_air(Pi / 6, 10 + i, 10, 0.01);
 
  
// Шар, летящий с сопротивлением воздуха
+
int rez_3(double v, double a, double k, double m)
// Координаты получены из точного решения при линейной зависимости силы сопротивлении воздуха от скорости
+
{
for (int i = 0; i < 1; i++)
+
  fout<<"---------------Третий режим работы-------------------------"<<endl;
My << new ball_air_2(Pi / 6, 10 + i, 10, 0.01);
+
    fout<<" T=0 x=0 y=0";
 +
    fout<<endl;
 +
    double t=0.1, Vxn=v*cos(a/180*M_PI), Vyn=v*sin(a/180*M_PI),
 +
    x3=0,x2=0,x1=x2-Vxn*t,  y3=0,
 +
    y2=0, y1=y2-Vyn*t, g=9.8, t1, T=0.1;//шаг, скорость по х в момент времени T, -\\- по y в момент времени Т
 +
    //координата по х в в момент времени T, -\\- в n-1 шаг, -\\- в n шаге, аналогично для y,
  
// Шар, летящий с сопротивлением воздуха
 
// Координаты получены методом Верле при линейной зависимости силы сопротивлении воздуха от скорости
 
for (int i = 0; i < 1; i++)
 
My << new ball_air_3(Pi / 6, 10 + i, 10, 0.01);
 
  
// Запуск главного цикла
+
    x3=2*x2-x1-k/m*Vxn*pow(t,2);  //координаты в момент времени T
  My.Run();
+
    y3=2*y2-y1-(g-+k/m*Vyn)*pow(t,2);
} // End of 'main' function
+
    Vxn=(x3-x1)/(2.0*t); //скорость в момент времени T
 +
    Vyn=(y3-y1)/(2.0*t);
 +
    x1=x2;// приравнивание к координате на n-1 шаге значение координаты в n шаге
 +
    y1=y2;
 +
    x2=x3;//-//- к координате в n шаге значение в момент времени T
 +
    y2=y3;
 +
    while (y2>0)
 +
    {
 +
        x3=2*x2-x1-k/m*Vxn*pow(t,2);
 +
        y3=2*y2-y1-(g+k/m*Vyn)*pow(t,2);
 +
        Vxn=(x3-x1)/(2.0*t);
 +
        Vyn=(y3-y1)/(2.0*t);
 +
        fout<<" T="<<T<<" x="<<x2<<" y="<<y2<<endl;
  
// END OF 'T43ANIM.CPP' FILE
+
        if (y3<0)
</syntaxhighlight>
+
        {
"'''ANIM.CPP'''"
+
            t1=sqrt(abs((-y1+2*y2)/(g+k/m*Vyn)));
<syntaxhighlight lang="cpp" line start="1" enclose="div">
+
            x3=2*x2-x1-k/m*Vxn*pow((t+t1),2);
/* FILENAME: ANIM.CPP
+
            fout<<" T="<<T+t1<<" x="<<x3<<" y="<<0<<endl;
* LAST UPDATE: 17.01.2016
+
        }
*/
+
 
 +
        T=T+t;
 +
        x1=x2;
 +
        y1=y2;
 +
        x2=x3;
 +
        y2=y3;
  
#include <stdio.h>
+
    }
#include <stdlib.h>
 
#include <time.h>
 
  
#include "ANIM.H"
+
}
  
// Единственный экземпляр класса
 
sagl::anim sagl::anim::Instance;
 
  
/* Reshape function */
+
int rez_4(double v, double a, double k, double m)
// Стандартная функция, вызываемая при изменении размеров окна
 
void sagl::anim::Reshape( int W, int H )
 
 
{
 
{
   // Установка области просмотра - все окно
+
   fout<<"---------------Четвертый режим работы-------------------------"<<endl;
glViewport(0, 0, W, H);
+
    fout<<" T=0 x=0 y=0";
  Instance.WinW = W;
+
    fout<<endl;
  Instance.WinH = H;
+
    double t=0.1, Vxn=v*cos(a/180*M_PI), Vyn=v*sin(a/180*M_PI),
  double ratio_x = 1, ratio_y = 1;
+
     x3=0,x1=0, x2=x1+Vxn*t, y3=0, y1=0,
  if (W > H)
+
    y2=y1+Vyn*t, g=9.8, t1, T=0.1, V=v;//шаг, скорость по х в момент времени T, -\\- по y в момент времени Т
    ratio_x = (double)W / H;
+
    //координата по х в в момент времени T, -\\- в n-1 шаг, -\\- в n шаге, аналогично для y,
  else
 
     ratio_y = (double)H / W;
 
  double Size = 1, Near = 1, Far = 500;
 
  // Установка системы координат "камеры"
 
glMatrixMode(GL_PROJECTION);
 
  glLoadIdentity();
 
  glFrustum(-Size * ratio_x, Size * ratio_x,
 
            -Size * ratio_y, Size * ratio_y,
 
            Near, Far);
 
// Установка "мировой" СК в состояние без преобразований
 
  glMatrixMode(GL_MODELVIEW);
 
} // End of 'Reshape' function
 
  
/* Timer function */
 
// Подсчет времени
 
void sagl::anim::Timer( void )
 
{
 
  long Time = clock();
 
 
 
  if (IsPause)
 
    DeltaTime = 0, PauseTime += Time - OldTime;
 
  else
 
    DeltaTime = (Time - OldTime) / (double)CLOCKS_PER_SEC;
 
  OldTime = Time;
 
  
  SyncTime = (Time - PauseTime - StartTime) / (double)CLOCKS_PER_SEC;
+
    x3=2.0*x2-x1-(k/m)*V*Vxn*pow(t,2);
} /* End of 'Timer' function */
+
    y3=2.0*y2-y1-(g+(k/m)*V*Vyn)*pow(t,2);
 +
    Vxn=(x3-x1)/(2.0*t);
 +
    Vyn=(y3-y1)/(2.0*t);
 +
    V=sqrt(pow(Vxn,2)+pow(Vyn,2.0));
 +
    x1=x2;
 +
    y1=y2;
 +
    x2=x3;
 +
    y2=y3;
 +
    while (y2>0)
 +
    {
 +
        x3=2.0*x2-x1-(k/m)*Vxn*V*pow(t,2);
 +
        y3=2.0*y2-y1-(g+(k/m)*Vyn*V)*pow(t,2);
 +
        Vxn=(x3-x1)/(2.0*t);
 +
        Vyn=(y3-y1)/(2.0*t);
 +
        V=sqrt(pow(Vxn,2)+pow(Vyn,2));
 +
        fout<<" T="<<T<<" x="<<x2<<" y="<<y2<<endl;
  
/* Display function */
+
        if (y3<0)
// Стандартная функция, вызываемая при перерисовке окна
+
        {
void sagl::anim::Display( void )
+
            t1=sqrt(abs((-y1+2.0*y2)/(g+(k/m)*Vyn*V)));
{
+
            x3=2.0*x2-x1-(k/m)*Vxn*V*pow((t+t1),2);
// Запуск времени
+
            fout<<" T="<<T+t1<<" x="<<x3<<" y="<<0<<endl;
Instance.Timer();
+
        }
// Очищаем цветовой буфер для создания нового изображения
 
  glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
 
  
  glLoadIdentity();
 
  // Позиционирование СК
 
gluLookAt(-40, 0, 0, 0, 0, 0, 0, 1, 0);
 
  
// Отрисовка объектов
+
        T=T+t;
  Instance.Render();
+
        x1=x2;
 +
        y1=y2;
 +
        x2=x3;
 +
        y2=y3;
  
  glFinish();
+
    }
// Копируем вторичный буфер в окно
+
 
glutSwapBuffers();
+
}
// Вызываем функцию обновления кадра
 
glutPostRedisplay();
 
} // End of 'Display' function
 
  
/* Keyboard function */
 
// Стандартная функция, вызываемая при нажатие клавиш на клавиатуре
 
void sagl::anim::Keyboard( unsigned char Key, int X, int Y )
 
{
 
// Выход из программы
 
if (Key == 27)
 
    exit(0);
 
// Открытие программы в полном экране
 
else if (Key == 'f')
 
    glutFullScreen();
 
  // Пауза
 
else if (Key == 'p' || Key == 'P')
 
    Instance.IsPause = !Instance.IsPause;
 
} // End of 'Keyboard' function
 
  
sagl::anim::anim( void ) : IsPause(false), SyncTime(0), DeltaTime(0),
+
int main()
  StartTime(clock()), OldTime(StartTime), PauseTime(0), StockSize(0)
 
 
{
 
{
// Инициализации OpenGL и GLUT
 
glutInitDisplayMode(GLUT_RGB | GLUT_DOUBLE | GLUT_DEPTH);
 
 
 
// Задача размеров и позиции окна
 
glutInitWindowPosition(0, 0);
 
  glutInitWindowSize(700, 700);
 
// Создание окна
 
glutCreateWindow("T06BALL");
 
  
// Установка функций 'обратного вызова'
+
setlocale(LC_ALL, "rus");
  glutDisplayFunc(Display);
+
cout<<"Введите скорость тела и угол"<<endl;
  glutKeyboardFunc(Keyboard);
+
cin>>v>>a;
  glutReshapeFunc(Reshape);
 
  
// Установка цвета закраски фона
+
while (1>0){
  glClearColor(0.3, 0.5, 0.7, 1);
+
cout<<"Выберите режим работы программы:"<<endl;
  // Включение буфера глубины
+
cout<<"1 - Координаты, рассчитанные по формуле, при движении без сопротивления воздуха"<<endl;
glEnable(GL_DEPTH_TEST);
+
cout<<"2 - Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости"<<endl;
  // Включение режима вычисления цвета согласно освещенности от источников света
+
cout<<"3- Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости"<<endl;
glEnable(GL_LIGHTING);
+
cout<<"4 - Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости"<<endl;
// Включение источника света
+
cout<<"5 - Выйти";
  glEnable(GL_LIGHT0);
+
cin>>o;
// Включение упрощенного режима освещенности для простого способа описания свойств поверхности
 
  glEnable(GL_COLOR_MATERIAL);
 
// Приведение нормалей к единичной длине
 
  glEnable(GL_NORMALIZE);
 
}
 
  
// Деструктор
+
if (o==1)
sagl::anim::~anim( void )
+
    rez_1(v,a);
{
+
if (o==2)
   // Чистка памяти
+
    {
for (int i = 0; i < StockSize; i++)
+
    cout<<"Введите массу тела и коэф сопротивления воздуха:"<<endl;
     delete Stock[i];
+
    cin>>m>>k;
 +
    rez_2(v,a,k,m);
 +
    }
 +
 
 +
if (o==3)
 +
    {
 +
    cout<<"Введите массу тела и коэф сопротивления воздуха:"<<endl;
 +
    cin>>m>>k;
 +
    rez_3(v,a,k,m);
 +
    }
 +
   if (o==4)
 +
    {
 +
    cout<<"Введите массу тела и коэф сопротивления воздуха:"<<endl;
 +
    cin>>m>>k;
 +
    rez_4(v,a,k,m);
 +
     }
 +
  if (o==5)
 +
        break;
 +
 
 +
            }
 
}
 
}
  
/* Render function */
 
// Отрисовка объектов
 
void sagl::anim::Render( void )
 
{
 
for (int i = 0; i < StockSize; i++)
 
Stock[i]->Render(*this);
 
} // End of 'Render' function
 
  
/* Run function */
+
</syntaxhighlight>
// Запуск главного цикла
+
</div>
void sagl::anim::Run( void )
+
 
{
 
// Запуск основного цикла построения
 
glutMainLoop();
 
} // End of 'Run' function
 
  
// END OF 'ANIM.CPP' FILE
+
<div class="mw-collapsible mw-collapsed" style="width:100%" >
</syntaxhighlight>
+
'''[[Тимошенко Валентина]]'''  
"'''ANIM.H'''"
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
/* FILENAME: ANIM.H
 
* LAST UPDATE: 17.01.2016
 
*/
 
  
#ifndef __ANIM_H_
+
'''Описание программы''': при запуске пользователь вводит шаг функции, угол, под которым бросают тело, массу тела, сопротивление воздуха и скорость.
#define __ANIM_H_
+
Программа записывает в четыре файла результаты вычисления:
 +
#Координаты, рассчитанные по формуле для движения без сопротивления воздуха;
 +
#Координаты, рассчитанные по формуле для движения с учетом сопротивления воздуха;
 +
#Координаты, полученные методом Верле при квадратичной зависимости силы сопротивления воздуха от скорости.
 +
#Координаты, полученные методом Верле при линейной зависимости силы сопротивления воздуха от скорости;
  
#include <stdio.h>
+
Скачать можно  [http://tm.spbstu.ru/Файл:motion.zip тут.]
#include <stdlib.h>
 
#include <time.h>
 
  
#include <GL\glut.h>
+
<div class="mw-collapsible-content">
  
#include "VEC.H"
+
'''Визуализированный результат работы программы'''
 +
[[File:Grafics.png]]
  
// Константы
+
Графики приведены для движения тела массой 1, со скоростью 50, под углом 45 градусов. Сопротивление воздуха принято равным 0.0001, шаг 0,1.
#define Pi 3.14159265358979323846
 
#define E 2.71828182845904523536
 
  
// Собственное пространство имен 'sagl'
+
<syntaxhighlight lang="cpp" line start="1" enclose="div">
namespace sagl
+
 
 +
#include <iostream> ///программа, подсчитывающая и записывающая в файл координаты движения тела для двух вариантов метода Верле
 +
#include <fstream> /// и для движений с учётом сопротивления и без его учёта
 +
#include <math.h>
 +
#include<stdlib.h>
 +
using namespace std;
 +
 
 +
int main()
 
{
 
{
  // Объявления класса анимации наперед
+
    double a, step, Pi, g, Vo, m, r;
class anim;
+
    ///а - угол, под которым движется тело, step - шаг функции, Vo - начальная скорость тела, m - масса тела, r - величина сопротивления
 
+
 
// Функции получения случайных чисел
+
    double x, y, x_0, y_0, x0, y0, Vx, Vy;
inline double r0( void )
+
    ///переменные для движения точки без учёта сопротивления и с его учётом
  {
+
    ///х - изменяющаяся пошагово координата тела по оси Ох, у - изменяющаяся пошагово координата тела по оси Оу,
     return rand() / (double)RAND_MAX;
+
    ///х0 - начальная координата тела по оси Ох, у0 - начальная координата тела по оси Оу
  }
+
    ///Vx - скорость тела по оси Ох, Vу - скорость тела по оси Оу
  inline double r1( void )
+
    ///x_0 - изменяющаяся пошагово координата тела по оси Ох с учётом сопротивления, у_0 - изменяющаяся пошагово координата тела по оси Оу с учётом сопротивления
  {
+
 
     return 2.0 * rand() / RAND_MAX - 1;
+
    double Vy0, Vx0, x1, x2, x3, y1, y2, y3, Vxn, Vyn, Vn;
  }
+
    ///переменные для 1го варианта метода Верле
 
+
     ///х1 - координата тела по оси Ох на (n-1) шаге, х2 - координата тела по оси Ох на (n) шаге, х3 - координата тела по оси Ох на (n+1) шаге
// Класс объектов
+
     ///у1 - координата тела по оси Оу на (n-1) шаге, у2 - координата тела по оси Оу на (n) шаге, у3 - координата тела по оси Оу на (n+1) шаге
class object
+
    ///Vx0 - начальная скорость тела по оси Ох, Vy0 - начальная скорость тела по оси Оу
  {
+
     ///Vxn - скорость тела в данный момент времени по оси Ох, Vyn - скорость тела в данный момент времени по оси Оу
  public:
+
 
     // Вектора перемещения и скоростей
+
    double Vxn2, Vyn2, x_1, x_2, x_3, y_1, y_2, y_3;
vec P, V, AbsV;
+
     ///переменные для 2го варианта метода Верле
      
+
    ///х_1 - координата тела по оси Ох на (n-1) шаге, х_2 - координата тела по оси Ох на (n) шаге, х_3 - координата тела по оси Ох на (n+1) шаге
// Конструктор
+
    ///у_1 - координата тела по оси Оу на (n-1) шаге, у_2 - координата тела по оси Оу на (n) шаге, у_3 - координата тела по оси Оу на (n+1) шаге
object( void ) : P(vec::Rnd1()), V(vec::Rnd()), AbsV(V)
+
    ///Vxn2 - скорость тела в данный момент времени по оси Ох, Vyn2 - скорость тела в данный момент времени по оси Оу
 +
 
 +
    g=10; ///значение ускорения свободного падения
 +
    Pi=3.14159265; /// значение числа П, используем для перевода радиан в градусы
 +
 
 +
    do ///цикл, запрашивающий ввод пользователем значения шага функции
 
     {
 
     {
 +
        cout << "Input the step, it must be less than 1" << endl; ///ввод с клавиатуры шага(то же самое, что дельта t), шаг должен быть маленьким (меньше 1)
 +
        cin >> step;  ///вывод величины шага на экран
 
     }
 
     }
+
    while (step>=1); ///выход из цикла не будет обеспечен, пока пользователь не введет число, меньшее 1
// Отрисовка объектов
+
 
virtual void Render( anim &Ani )
+
    cout << '\n' << "Input the corner in degrees,the corner is in the range from 0 to 90 degrees" << endl; ///ввод с клавиатуры угла в радианах (угол от 0 до 90 градусов)
 +
    cin >> a; ///вывод значение угла на экран
 +
    a=(Pi*a)/180.0;
 +
    cout << '\n' << "Input the weight" << endl; ///ввод с клавиатуры значения массы
 +
    cin >> m; ///вывод величины массы на экран
 +
 
 +
    do ///цикл, запрашивающий ввод пользователем значения сопротивления воздуха
 
     {
 
     {
    } // End of 'Render' function
+
        cout << '\n' << "Input the value of the resistance, it must be less than 1" << endl; ///ввод с клавиатуры величины сопротивления
  }; // end of 'object' class
+
        cin >> r; ///вывод значения сопротивления на экран
 
+
    }
// Класс анимации
+
     while (r>=1); ///выход из цикла не будет обеспечен, пока пользователь не введет число, меньшее 1
class anim
+
 
  {
+
     cout << '\n' << "Input the speed" << endl; ///ввод с клавиатуры значения начальной скорости
  private:
+
     cin >> Vo; ///вывод значения скорости на экран
     // Функции 'обратного вызова'
 
static void Display( void );
 
     static void Keyboard( unsigned char Key, int X, int Y );
 
     static void Reshape( int W, int H );
 
  
     // Единственный экземпляр класса
+
     ///для движения без учёта сопротивления
static anim Instance;
+
    x0=0; ///обнуление переменных
      
+
     y0=0;
     // Конструктор
+
     x=0;
anim( void );
+
    y=0;
  
// Максимальное количество объектов
+
     ///для движения с учётом сопротивления
    static const int Max = 100;
+
     x_0=0; ///обнуление переменных
     // 'Контейнер' объектов
+
     y_0=0;
object *Stock[Max];
 
    // Размер 'контейнера' объектов
 
int StockSize;
 
      
 
// Переменные, хранящие время в секундах
 
    long StartTime, OldTime, PauseTime;
 
   
 
// Отрисовка объектов
 
void Render( void );
 
 
// Подсчет времени
 
void Timer( void );
 
  public:
 
    // Добавление объектов в 'контейнер'
 
anim & operator<<( object *Obj )
 
     {
 
      if (StockSize < Max )
 
        Stock[StockSize++] = Obj;
 
      else
 
        delete Obj;
 
     
 
return *this;
 
    }
 
   
 
// Ширина и высота окна
 
    int WinW, WinH;
 
  
// Переменные, хранящие время в секундах
+
    ///для 1го варианта метода Верле
    double SyncTime, DeltaTime;
 
  
     // Переменная, отвечающая за паузу
+
     Vx0=Vo*cos(a); ///расчет проекции начальной скорости по оси Ох
bool IsPause;
+
    Vy0=Vo*sin(a); ///расчет проекции начальной скорости по оси Оу
  
     // Деструктор
+
     x2=0; ///обнуление переменных
~anim( void );
+
     y2=0;
      
+
     x3=0;
// Запуск главного цикла
+
     y3=0;
void Run( void );
 
      
 
    // Метод, возвращающий переменную - единственный экземпляр данного типа
 
static anim & Get( void )
 
    {
 
      return Instance;
 
     }
 
  }; // end of 'anim' class
 
} // end of 'sagl' namespace
 
  
#endif /*__ANIM_H_ */
+
    y1=y2-Vy0*step; ///расчет начального значения координаты по оси Оу
 +
    x1=x2-Vx0*step; ///расчет начального значения координаты по оси Ох
  
// END OF 'ANIM.H' FILE
+
    ///для 2го варианта метода Верле
</syntaxhighlight>
 
"'''VEC.H'''"
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
/* FILENAME: VEC.H
 
* LAST UPDATE: 17.01.2016
 
*/
 
  
#ifndef __VEC_H_
+
    x_2=0; ///обнуление переменных
#define __VEC_H_
+
    y_2=0;
 +
    x_3=0;
 +
    y_3=0;
  
#include <stdlib.h>
+
    Vxn2=Vo*cos(a); ///расчет скорости тела на начальный момент времени по оси Ох
#include <math.h>
+
    Vyn2=Vo*sin(a); ///расчет скорости тела на начальный момент времени по оси Оу
  
// Собственное пространство имен 'sagl'
+
    y_1=y_2-Vo*sin(a)*step; ///расчет начального значения координаты на (п-1) шаге по оси Оу
namespace sagl
+
    x_1=-Vo*cos(a)*step;    ///расчет начального значения координаты на (п-1) шаге по оси Ох
{
+
 
  // Класс векторов
+
    ofstream out("For method without resistance.txt");
class vec
+
     ///запись в файл значений координат по осям Ох и Оу для движения без сопротивления
  {
+
 
  public:
+
     for (int i=0; y>=0; ++i) ///цикл для подсчета координат при движении тела без учёта сопротивления
     // Координаты вектора
 
double X, Y, Z;
 
      
 
// Конструктор
 
vec( void ) : X(0), Y(0), Z(0)
 
 
     {
 
     {
 +
        x=Vo*step*i*cos(a); ///расчет координаты тела по оси х
 +
        y=Vo*sin(a)*i*step-(g*i*step*i*step)*0.5; ///расчет координаты тела по оси y
 +
 +
        out << x << "    " << y <<'\n';  ///вывод всех значений координат по оси х и по оси у при движении тела без учёта сопротивления
 
     }
 
     }
      
+
     out.close();
// Конструктор
+
 
vec( double A, double B, double C ) : X(A), Y(B), Z(C)
+
    ofstream out1 ("For method with resistance.txt");
 +
    ///запись в файл значений координат по осям Ох и Оу для движения с учётом сопротивления
 +
 
 +
    for (int i=0; y_0>=0; ++i) ///цикл для подсчета координат при движении тела с учётом сопротивления
 
     {
 
     {
 +
        Vx=Vo*cos(a); ///расчет скорости тела по оси Ох
 +
        Vy=Vo*sin(a); ///расчет скорости тела по оси Оу
 +
        x_0=x0+(m/r)*Vx*(1.0 - exp((-r*i*step)/m)); ///расчет координаты тела по оси х
 +
        y_0=y0+(m/r)*(Vy+g*(m/r))*(1.0 - exp((-r*i*step)/m))-g*i*step*(m/r); ///расчет координаты тела по оси y
 +
 +
        out1 << x_0 << "    " << y_0 <<'\n';  ///вывод всех значений координат по оси х и по оси у при движении c учётом сопротивления
 
     }
 
     }
      
+
     out1.close();
// Функции получения случайных чисел
+
 
static double R0( void )
+
    ofstream out2 ("For method Verle 1.txt");
 +
    ///запись в файл значений координат по осям Ох и Оу для 1го варианта метода Верле
 +
 
 +
    for (int i=0; y3>=0; ++i) ///цикл для подсчета координат и скорости по времени для 1го варианта метода Верле
 
     {
 
     {
      return rand() / (double)RAND_MAX;
+
        x3=2*x2-x1-(r/m)*Vn*Vxn*step*step; ///расчет координаты в данный момент времени по оси Ох
 +
        y3=2*y2-y1-(g+(r/m)*Vn*Vyn)*step*step; ///расчет координаты в данный момент времени по оси Оу
 +
        Vxn=(x3-x1)/(2.0*step); ///расчет скорости в данный момент времени по оси Оу
 +
        Vyn=(y3-y1)/(2.0*step); /// расчет скорости в данный момент времени по оси Ох
 +
        Vn=sqrt(Vxn*Vxn+Vyn*Vyn); ///расчет скорости тела по модулю
 +
 
 +
        x1=x2; ///присваивание значению координаты х1 на (n-1) шаге значение координаты х2 на n шаге
 +
        x2=x3; ///присваивание значению координаты х2 на (n) шаге значение координаты х3 на (n+1) шаге
 +
        y1=y2; ///присваивание значению координаты у1 на (n-1) шаге значение координаты у2 на n шаге
 +
        y2=y3; ///присваивание значению координаты у2 на (n) шаге значение координаты у3 на (n+1) шаге
 +
 
 +
        out2 << x3 << "  " << y3 <<'\n'; ///вывод всех значений координат по оси Ох и по оси Оу на экран для 1го варианта метода Верле
 
     }
 
     }
      
+
     out2.close();
static double R1( void )
+
 
 +
    ofstream out3 ("For method Verle 2.txt");
 +
    ///запись в файл значений координат по осям Ох и Оу для 2го варианта метода Верле
 +
 
 +
    for (int i=0; y_3>=0; ++i) ///цикл для подсчета координат и скорости по времени для 2го варианта метода Верле
 
     {
 
     {
      return 2 * rand() / (double)RAND_MAX - 1;
+
        x_3=2*x_2-x_1-(r/m)*Vxn2*step*step; ///расчет координаты в данный момент времени по оси Ох
    }
+
        y_3=2*y_2-y_1-(g+(r/m)*Vyn2)*step*step; ///расчет координаты в данный момент времени по оси Оу
   
+
        Vxn2=(x_3-x_1)/(2.0*step); ///расчет скорости в данный момент времени по оси Оу
// Функции получения случайных векторов
+
        Vyn2=(y_3-y_1)/(2.0*step); ///расчет скорости в данный момент времени по оси Ох
static vec Rnd( void )
+
 
    {
+
        x_1=x_2; ///присваивание значению координаты х_1 на (n-1) шаге значение координаты х_2 на n шаге
      return vec(R0(), R0(), R0());
+
        x_2=x_3; ///присваивание значению координаты х_2 на (n) шаге значение координаты х_3 на (n+1) шаге
 +
        y_1=y_2; ///присваивание значению координаты у_1 на (n-1) шаге значение координаты у_2 на n шаге
 +
        y_2=y_3; ///присваивание значению координаты у_2 на (n-1) шаге значение координаты у_3 на (n+1) шаге
 +
 
 +
        out3 << x_3 << "  " << y_3 <<'\n'; ///вывод на экран всех значений координат по оси Ох и по оси Оу для 2го варианта метода Верле
 +
 
 
     }
 
     }
      
+
     out3.close();
static vec Rnd1( void )
+
 
     {
+
     cout << '\n' << "All results are saved in files." << endl; ///вывод на экран сообщения о записи в файл всех результатов
      return vec(R1(), R1(), R1());
+
     cout << '\n' << "The program is finished." << endl; ///вывод на экран сообщения о завершении работы программы
     }
+
     return 0;
+
}
vec operator+( vec V )
+
</syntaxhighlight>
{
+
</div>
return vec(X + V.X, Y + V.Y, Z + V.Z);
+
 
}
+
<div class="mw-collapsible mw-collapsed" style="width:100%" >
+
'''[[Савельева Ольга]]'''
vec operator*( double t )
+
 
     {
+
'''Описание:''' Пользователя попросят ввести начальную скорость, угол бросания, тогда программа запишет в файл результаты следующих вычислений:
      return vec(X * t, Y * t, Z * t);
+
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;  
    }
+
# Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
   
+
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
vec & operator+=( const vec &V )
+
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
    {
 
      X += V.X;
 
      Y += V.Y;
 
      Z += V.Z;
 
     
 
return *this;
 
    }
 
 
// Длина вектора
 
double operator!(void) const
 
{
 
return sqrt(X * X + Y * Y + Z * Z);
 
} /* end of 'operator!' function */
 
  }; // end of 'vec' class
 
} // end of 'sagl' namespace
 
  
#endif /*__VEC_H_ */
+
<div class="mw-collapsible-content">
  
// END OF 'VEC.H' FILE
 
</syntaxhighlight>
 
"'''SAMPLE.H'''"
 
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
/* FILENAME: SAMPLE.H
+
#include <stdio.h>
* LAST UPDATE: 17.01.2016
+
#include <stdlib.h>
*/
+
#include <cmath>
  
#ifndef __SAMPLE_H_
+
using namespace std;
#define __SAMPLE_H_
 
  
#include <math.h>
+
FILE *output;
  
#include "ANIM.H"
+
double e = 0.0000001; //точность
 +
double g = 9.8; //ускорение свободного падения
 +
double dt = 0.00001;  //шаг по времени
 +
double windageLinearCoefficient = 0.1;
 +
double windageSquareCoefficient = 0.00001;
  
// Шар, летящий без сопротивлением воздуха
+
struct Vector  //вектор
class ball : public sagl::object
 
 
{
 
{
private:
+
    double x, y;
  double angle, v; // угол вектора скорости к горизонту; модуль скорости
+
    Vector():x(0), y(0)
public:
+
    {}
  // Конструктор
+
    Vector(double x, double y):x(x), y(y)
ball( void ) : angle(Pi / 3), v(1)
+
    {}
  {
+
    const Vector operator+(const Vector &v) const
P = sagl::vec(sagl::r0() + 5, 5, 0);
+
    {
V.X = 0;
+
        return Vector(this -> x + v.x, this -> y + v.y);
V.Y = sin(angle) * v;
+
    }
V.Z = cos(angle) * v;
+
    const Vector operator-(const Vector &v) const
  }
+
    {
+
        return Vector(this -> x - v.x, this -> y - v.y);
// Конструктор
+
    }
ball( double angle1, double v1 ) : angle(angle1), v(v1)
+
    const Vector operator*(const double k) const
{
+
    {
P = sagl::vec(sagl::r0() + 5, 5, 0);
+
        return Vector(this -> x * k, this -> y * k);
V.X = 0;
+
    }
V.Y = sin(angle) * v;
+
    const Vector operator*(const int k) const
V.Z = cos(angle) * v;
+
    {
}
+
        return Vector(this -> x * k, this -> y * k);
 
+
    }
// Отрисовка объекта
+
    const Vector operator/(const double k) const
void Render( sagl::anim &Ani )
+
    {
  {
+
        return Vector(this -> x / k, this -> y / k);
// Вектор ускорения свободного падения
+
    }
sagl::vec g = sagl::vec(0, -9.8, 0);
+
};
// Размер комнаты
 
double Size = 120;
 
  
// Изменение вектора скорости
+
const Vector operator*(const double a, const Vector &v)
V += g * Ani.DeltaTime;
+
{
// Изменение вектора перемещения
+
    return Vector(v.x * a, v.y * a);
P += V * Ani.DeltaTime;
+
}
  
// Ограничения - стенки
+
const Vector operator*(const int k, const Vector &v)
if (P.X > Size / 4)
+
{
V.X = -fabs(V.X);
+
    return Vector(v.x * k, v.y * k);
if (P.X < -Size / 4)
+
}
V.X = fabs(V.X);
 
  
if (P.Y > Size / 4)
+
double abs(const Vector &v)
V.Y = -fabs(V.Y);
+
{
if (P.Y < -Size / 4)
+
    return sqrt(v.x * v.x + v.y * v.y);
      V.Y = fabs(V.Y);
+
}
  
if (P.Z > Size / 4)
+
void printCoordinate(const char *description, const Vector &v)  //выводит координаты в более читаемом виде
V.Z = -fabs(V.Z);
+
{
if (P.Z < -Size / 4)
+
     fputs(description, output);
V.Z = fabs(V.Z);
+
    fputs(": ", output);
+
    fprintf(output, "%lf", v.x);
     // Запоминание состояния изменения текущей СК
+
     fputs(", ", output);
glPushMatrix();
+
    fprintf(output, "%lf\n", v.y);
+
}
// Рисование стенок
 
glutWireCube(Size / 2);
 
// Задача перемещения мяча
 
glTranslated(P.X, P.Y, P.Z);
 
     // Цвет мяча
 
glColor3d(0, 1, 0);
 
// Рисование мяча
 
glutSolidSphere(0.5, 30, 30);
 
   
 
// Восстановление последнего запоминания состояния изменения текущей СК
 
glPopMatrix();
 
  }
 
}; // end of 'ball' class
 
  
// Шар, летящий с сопротивлением воздуха
+
Vector getCoordinatesWithoutWindage(double velocity, double angle, double time = -1)
// Координаты получены методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости
 
class ball_air : public sagl::object
 
 
{
 
{
private:
+
    double fallTime = 2 * velocity * sin(angle) / g; //расчет времени падения
double angle, v, m, n;
+
    if((time < 0) or (time > fallTime))
public:
+
        time = fallTime;
// Конструктор
+
    double x = velocity * cos(angle) * time;    // x = vx*t;
ball_air( void ) : angle(Pi / 3), v(1), m(1), n(0.1)
+
    double y = velocity * sin(angle) * time - g * time * time / 2;  // y = vy*t-(g*t^2)/2;
{
+
    return Vector(x, y);
P = sagl::vec(sagl::r0() + 5, 5, 0);
+
}
V.X = 0;
+
 
V.Y = sin(angle) * v;
+
Vector getCoordinatesVerletLinear(double velocity, double angle, double time = -1)
V.Z = cos(angle) * v;
+
{
}
+
    double nowTime = dt;
+
    Vector rsb(0, 0);
// Конструктор
+
    if((time >= 0) and (dt / 2 - time > 0)) //если время расчета дается слишком малого промежутка
ball_air( double angle1, double v1, double m1, double n1 ) : angle(angle1), v(v1), m(m1), n(n1)
+
        return rsb; //вернитесь в начальную точку
{
+
    Vector v(velocity * cos(angle), velocity * sin(angle)); //проекции начальной скорости
P = sagl::vec(sagl::r0() + 5, 5, 0);
+
    Vector r = v * dt;   //вторая точка
V.X = 0;
+
    Vector a = -windageLinearCoefficient * v; //ускорение в начальной точке
V.Y = sin(angle) * v;
+
    a.y -= g;
V.Z = cos(angle) * v;
+
    v = v + a * dt; //скорость во второй точке
}
+
    a = -windageLinearCoefficient * v; //ускорение во второй точке
+
    a.y -= g;
// Отрисовка объекта
+
    while((r.y > 0) or ((time > 0) and (nowTime <= time))) //пока точка выше 0 или не достигла заданного времени
void Render( sagl::anim &Ani )
+
    {
{
+
        Vector rn = 2 * r - rsb + a * dt * dt;  // r(t+dt) = 2*r(t)-r(t-dt)+a(t)*dt^2;
// Вектор ускорения свободного падения и вектор полного ускорения
+
        v = (rn - rsb) / (2 * dt);  // v(t) = (r(t+dt)-r(t-dt))/(2*dt);
sagl::vec g = sagl::vec(0, -9.8, 0), a;
+
        rsb = r;    //обновление r(t-dt) and r(t)
// Размер комнаты
+
        r = rn;
double Size = 120;
+
        a = -windageLinearCoefficient * v;  //обновление a(t)
 +
        a.y -= g;
 +
        nowTime += dt;  //обновленное время
 +
    }
 +
    return r;
 +
}
  
// Изменение вектора ускорения
+
Vector calculateForTime(Vector &v, double time)
a = sagl::vec(0, g.Y - n / m * !V * V.Y, -n / m * !V * V.Z);
+
{
 +
    Vector r;
 +
    // x = vx/k*(1-e^(-k*t));
 +
    r.x = v.x / windageLinearCoefficient * (1 - exp(-windageLinearCoefficient * time));
 +
    // y = ((vy+g/k)*(1-e^(-k*t))-g*t)/k;
 +
    r.y = ((v.y + g / windageLinearCoefficient) * (1 - exp(-windageLinearCoefficient * time)) - g * time) / windageLinearCoefficient;
 +
    return r;
 +
}
  
// Изменение вектора скорости
+
Vector getCoordinatesAccurateLinear(double velocity, double angle, double time = -1)
V += a * Ani.DeltaTime;
+
{
// Изменение вектора перемещения
+
    if(windageLinearCoefficient < e)  //если коэффициент слишком близок к нулю
P += V * Ani.DeltaTime;
+
        return getCoordinatesWithoutWindage(velocity, angle, time);  //вычисляй будто это 0
 
+
    Vector r;
// Ограничения - стенки
+
    Vector v(velocity * cos(angle), velocity * sin(angle)); //проекции начальной скорости
if (P.X > Size / 4)
+
    if(time >= 0)  //время данное
V.X = -fabs(V.X);
+
    {
if (P.X < -Size / 4)
+
        r = calculateForTime(v, time);
V.X = fabs(V.X);
+
        if(r.y >= 0)    //если объект в воздухе или только приземлился
 +
            return r;  //затем верните координаты объекта
 +
        else    //еще
 +
            return getCoordinatesAccurateLinear(velocity, angle);  //верните координаты приземления
 +
    }
 +
    else
 +
    {
 +
        double timer, timel, timem;
 +
        timer = v.y / g;
 +
        timel = 0;
 +
        while(calculateForTime(v, timer).y > 0) //смотрим на некоторые значения времени, которые больше времени посадки
 +
            timer *= 1.5;
 +
        timem = timel + (timer - timel) / 2;
 +
        r = calculateForTime(v, timem);
 +
        while(abs(r.y) > e)    //бинарный поиск времени посадки
 +
        {
 +
            if(r.y > 0)
 +
                timel = timem;
 +
            else
 +
                timer = timem;
 +
            timem = timel + (timer - timel) / 2;
 +
            r = calculateForTime(v, timem);
 +
        }
 +
        return r;
 +
    }
 +
}
 +
 
 +
Vector getCoordinatesVerletSquare(double velocity, double angle, double time = -1)
 +
{
 +
    double nowTime = dt;
 +
    Vector rsb(0, 0);
 +
    if((dt / 2 - time > 0)and(time >= 0))  //если время слишком малое для рсчета
 +
        return rsb; //вернитесь в начальную точку
 +
    Vector v(velocity * cos(angle), velocity * sin(angle)); //проекции начальной скорости
 +
    Vector r = v * dt;  //вторая точка
 +
    Vector a = -abs(v) * v * windageSquareCoefficient;  //ускорение в начальной точке
 +
    a.y -= g;
 +
    v = v + a * dt; //скорость во второй точке
 +
    a = -abs(v) * v * windageSquareCoefficient; //ускорение во второй точке
 +
    a.y -= g;
 +
    while((r.y > 0) or ((time > 0) and (nowTime <= time)))  //когда точка выше нулевой отметки и не достигает заданного времени
 +
    {
 +
        Vector rn = 2 * r - rsb + a * dt * dt;  // r(t+dt) = 2*r(t)-r(t-dt)+a(t)*dt^2;
 +
        v = (rn - rsb) / (2 * dt);  // v(t) = (r(t+dt)-r(t-dt))/(2*dt);
 +
        rsb = r;    //updating r(t-dt) and r(t)
 +
        r = rn;
 +
        a = -abs(v) * v * windageSquareCoefficient; //новое a(t)
 +
        a.y -= g;
 +
        nowTime += dt;  //новое a(t)
 +
    }
 +
    return r;
 +
}
 +
 
 +
void err(const char *s) //печатает сообщение об ошибке и завершает работу
 +
{
 +
    fputs(s, output);
 +
    exit(1);
 +
}
 +
 
 +
int main(int argc, const char *argv[])
 +
{
 +
    double velocity, angle;
 +
    bool needRead = true;
 +
    if(argc==3) //если даны 2 аргумента
 +
    {
 +
        velocity = atof(argv[1]);  //истолкование его как скорости и угла
 +
        angle = atof(argv[2]);
 +
        needRead = false;
 +
    }
 +
    if(needRead)
 +
    {
 +
        puts("Enter initial velocity (m/s)");
 +
        scanf("%lf", &velocity);
 +
    }
 +
    if(velocity < 0)    //проверка, если скорость меньше 0
 +
        err("Initial velocity must be above 0");
 +
    if(needRead)
 +
    {
 +
        puts("Enter initial angle (0-180 degrees)");
 +
        scanf("%lf", &angle);
 +
    }
 +
    if((angle < 0) or (angle > 180))    //проверка, что угол в нужном интервале
 +
        err("Initial angle must be from 0 to 180");
 +
    angle = angle / 180 * M_PI; // a = a/180*pi; преобразование угла из градусов в радианы
 +
    output = fopen("Coordinates.txt", "w"); //открытие результативного файла
 +
    //вычисление и печать 4 значений
 +
    printCoordinate("Without windage", getCoordinatesWithoutWindage(velocity, angle));
 +
    printCoordinate("Verlet, linear dependence", getCoordinatesVerletLinear(velocity, angle));
 +
    printCoordinate("Accurate, linear dependence", getCoordinatesAccurateLinear(velocity, angle));
 +
    printCoordinate("Verlet, square dependence", getCoordinatesVerletSquare(velocity, angle));
 +
    fclose(output); //закрытие файла
 +
    return 0;
 +
}
 +
</syntaxhighlight>
 +
</div>
 +
Скачать можно [http://tm.spbstu.ru/%D0%A4%D0%B0%D0%B9%D0%BB:%D0%9A%D0%BE%D0%BE%D1%80%D0%B4%D0%B8%D0%BD%D0%B0%D1%82%D1%8B.zip здесь]
  
if (P.Y > Size / 4)
 
V.Y = -fabs(V.Y);
 
if (P.Y < -Size / 4)
 
V.Y = fabs(V.Y);
 
  
if (P.Z > Size / 4)
 
V.Z = -fabs(V.Z);
 
if (P.Z < -Size / 4)
 
V.Z = fabs(V.Z);
 
 
// Запоминание состояния изменения текущей СК
 
glPushMatrix();
 
 
// Рисование стенок
 
glutWireCube(Size / 2);
 
// Задача перемещения мяча
 
glTranslated(P.X, P.Y, P.Z);
 
// Цвет мяча
 
glColor3d(1, 0, 0);
 
// Рисование мяча
 
glutSolidSphere(0.5, 30, 30);
 
 
// Восстановление последнего запоминания состояния изменения текущей СК
 
glPopMatrix();
 
}
 
}; // end of 'ball_air' class
 
 
// Шар, летящий с сопротивлением воздуха
 
// Координаты получены из точного решения при линейной зависимости силы сопротивлении воздуха от скорости
 
class ball_air_2 : public sagl::object
 
{
 
private:
 
double angle, v, m, n;
 
public:
 
// Конструктор
 
ball_air_2( void ) : angle(Pi / 3), v(1), m(1), n(0.1)
 
{
 
P = sagl::vec(sagl::r0() + 5, 5, 0);
 
V.X = 0;
 
V.Y = sin(angle) * v;
 
V.Z = cos(angle) * v;
 
}
 
 
// Конструктор
 
ball_air_2( double angle1, double v1, double m1, double n1 ) : angle(angle1), v(v1), m(m1), n(n1)
 
{
 
P = sagl::vec(sagl::r0() + 5, 5, 0);
 
V.X = 0;
 
V.Y = sin(angle) * v;
 
V.Z = cos(angle) * v;
 
}
 
 
// Отрисовка объекта
 
void Render( sagl::anim &Ani )
 
{
 
// Вектор ускорения свободного падения и вектор полного ускорения
 
sagl::vec g = sagl::vec(0, -9.8, 0), a;
 
// Размер комнаты
 
double Size = 120;
 
  
// Изменение вектора скорости
+
<div class="mw-collapsible mw-collapsed" style="width:100%" >
V.Z = V.Z * exp(-n / m * Ani.DeltaTime);
 
V.Y = (V.Y - g.Y * m / n) * exp(-n / m * Ani.DeltaTime) + g.Y * m / n;
 
// Изменение вектора перемещения
 
P += V * Ani.DeltaTime;
 
  
// Ограничения - стенки
 
if (P.X > Size / 4)
 
V.X = -fabs(V.X);
 
if (P.X < -Size / 4)
 
V.X = fabs(V.X);
 
  
if (P.Y > Size / 4)
+
'''[[Сенников Иван]]'''
V.Y = -fabs(V.Y);
 
if (P.Y < -Size / 4)
 
V.Y = fabs(V.Y);
 
  
if (P.Z > Size / 4)
+
'''Суть программы:'''Программа позволяет отслеживать траекторию движения тела, брошенного под углом к горизонту, в каждом из четырех случаев/методов.
V.Z = -fabs(V.Z);
 
if (P.Z < -Size / 4)
 
V.Z = fabs(V.Z);
 
  
// Запоминание состояния изменения текущей СК
+
'''Идея:''' Программа состоит из четырех методов: 1) движение тела без учета сопротивления воздуха; 2) движение тела с учетом сопротивления воздуха по первому методу Верле; 3) движение тела с учетом сопротивления воздуха по точному методу; 4) движение тела с учетом сопротивления воздуха по второму методу Верле.
glPushMatrix();
 
  
// Рисование стенок
+
'''Инструкция:''' Результаты программы будут записаны в соответствующий файл (подробности смотри в самой программе). Пользователю будет предоставлена возможность ввести начальную скорость и угол, под которым и бросают тело.
glutWireCube(Size / 2);
+
 
// Задача перемещения мяча
+
Ссылка для скачиваний: [http://tm.spbstu.ru/Файл:Throws_v2.0.zip здесь].
glTranslated(P.X, P.Y, P.Z);
+
 
// Цвет мяча
+
 
glColor3d(0, 1, 1);
+
'''[[Рубинова Раиса]]'''
// Рисование мяча
+
 
glutSolidSphere(0.5, 30, 30);
+
'''Описание программы''': программа состоит из четырех независимых друг от друга частей:
+
#  Полет тела без сопротивления воздуха;
// Восстановление последнего запоминания состояния изменения текущей СК
+
#  Полет тела при линейной зависимости силы сопротивления воздуха от скорости, при котором координаты тела рассчитываются точным методом;
glPopMatrix();
+
#  Полет тела при линейной зависимости силы сопротивления воздуха от скорости, при котором координаты тела рассчитываются методом Верле;
}
+
#  Полет тела при квадратичной зависимости силы сопротивлении воздуха от скорости, при котором координаты тела рассчитываются методом Верле;
}; // end of 'ball_air_2' class
 
  
// Шар, летящий с сопротивлением воздуха
+
Скачать можно [http://tm.spbstu.ru/File:Полет.rar тут].
// Координаты получены методом Верле при линейной зависимости силы сопротивлении воздуха от скорости
 
class ball_air_3 : public sagl::object
 
{
 
private:
 
double angle, v, m, n;
 
public:
 
// Конструктор
 
ball_air_3( void ) : angle(Pi / 3), v(1), m(1), n(0.1)
 
{
 
P = sagl::vec(sagl::r0() + 5, 5, 0);
 
V.X = 0;
 
V.Y = sin(angle) * v;
 
V.Z = cos(angle) * v;
 
}
 
 
// Конструктор
 
ball_air_3( double angle1, double v1, double m1, double n1 ) : angle(angle1), v(v1), m(m1), n(n1)
 
{
 
P = sagl::vec(sagl::r0() + 5, 5, 0);
 
V.X = 0;
 
V.Y = sin(angle) * v;
 
V.Z = cos(angle) * v;
 
}
 
 
// Отрисовка объекта
 
void Render( sagl::anim &Ani )
 
{
 
// Вектор ускорения свободного падения и вектор полного ускорения
 
sagl::vec g = sagl::vec(0, -9.8, 0), a;
 
// Размер комнаты
 
double Size = 120;
 
  
// Изменение вектора ускорения
+
<div class="mw-collapsible-content">
a = sagl::vec(0, g.Y - n / m * V.Y, -n / m * V.Z);
 
  
// Изменение вектора скорости
+
[[File:Обычный.png]]
V += a * Ani.DeltaTime;
+
[[File:Точный.png]]
// Изменение вектора перемещения
+
[[File:Верле2.png]]
P += V * Ani.DeltaTime;
+
[[File:Верле1.png]]
  
// Ограничения - стенки
+
<syntaxhighlight lang="cpp" line start="1" enclose="div">
if (P.X > Size / 4)
+
// Первый случай
V.X = -fabs(V.X);
 
if (P.X < -Size / 4)
 
V.X = fabs(V.X);
 
  
if (P.Y > Size / 4)
+
#include <iostream>
V.Y = -fabs(V.Y);
+
#include <math.h>
if (P.Y < -Size / 4)
+
#include <cstdlib>
V.Y = fabs(V.Y);
+
#include <fstream>
  
if (P.Z > Size / 4)
+
/// Программа, анализирующая полет тела;
V.Z = -fabs(V.Z);
 
if (P.Z < -Size / 4)
 
V.Z = fabs(V.Z);
 
  
// Запоминание состояния изменения текущей СК
+
using namespace std;
glPushMatrix();
+
double a,s,H,p1,p2,X,f;    /// Создание переменных, необходимых для работы:
 +
                                                                                /// a - угол к горизонту, под которым летит тело, вводится пользователем;
 +
                                                                                /// s - начальная скорость, с которой тело начинает лететь, вводится пользователем;
 +
                                                                                /// H - координата тела по оси Oy;
 +
                                                                                /// p1, p2 - промежуточные переменные, предназначенные для расчетов;
 +
                                                                                /// X - координата тела по оси Oy;
 +
                                                                                /// f - шаг по времени;
  
// Рисование стенок
+
int main()
glutWireCube(Size / 2);
+
{
// Задача перемещения мяча
+
    cout << "Enter speed and angle and step of time" << endl;  /// Обращение к пользователю, где требуется ввести скорость тела, угол к горизонту и шаг по времени;
glTranslated(P.X, P.Y, P.Z);
+
    cin >> s >> a >> f;    /// Считывание данных, введенных пользователем, в переменные;
// Цвет мяча
+
    double t=s*sin(a*3.14159/180.0)/9.8;        /// Создание новой переменной t, хранящей значение времени полета тела вверх (вычисленное через уравнение скорости по оси Oy);
glColor3d(1, 0.5, 0);
+
    for (double i=f; i<(2*t+f); i+=f)      /// Для вычисления координат тела в n-ом количестве точек мы создаем цикл, который повторяется то количество раз, сколько раз шаг по времени, введенным пользователем, вмещается во время полета всего тела;
// Рисование мяча
+
    {
glutSolidSphere(0.5, 30, 30);
+
        p1=s*sin(a*3.14159/180)*i;      /// Вычисление первой компоненты координаты тела по оси Oy, представляемй как произведение скорости по этой оси на время (выражено из уравнения равноускоренного прямолинейного движения);
+
        p2=4.9*i*i;        /// Вычисление второй компоненты координаты тела по оси Oy, представляемой как произведение квадрата времени на половину укорения свободного падения (выражено из уравнения РУПД);
// Восстановление последнего запоминания состояния изменения текущей СК
+
        H=double(p1)-p2;    /// Вычисление координаты тела по оси Oy;
glPopMatrix();
+
        X=s*cos(a*3.14159/180)*i;      /// Вычисление координаты тела по оси Ox как произведение скорости по оси Ox на время (выражено из уравнения равномерного движения);
}
+
        cerr << X << " ";      /// Вывод на экран значения по оси Ox
}; // end of 'ball_air_3' class
+
        cerr << H << endl;      /// и по оси Oy;
 +
    }
 +
    ofstream out("zap.txt");        /// Так как результаты анализа не только выводятся на экран, но и записываются в файл, мы создаем переменную, соответствующую файлу "Res.txt", находящемуся в папке с программой, и открываем файл для записи;
 +
    for (double i=0; i<(2*t+f); i+=f)        /// Для вычисления координат тела в n-ом количестве точек мы создаем цикл, который повторяется то количество раз, сколько раз шаг по времени, введенным пользователем, вмещается во время полета всего тела;
 +
    {
 +
        p1=s*sin(a*3.14159/180)*i;      /// Вычисление первой компоненты координаты тела по оси Oy, представляемй как произведение скорости по этой оси на время (выражено из уравнения равноускоренного прямолинейного движения);
 +
        p2=4.9*i*i;            /// Вычисление второй компоненты координаты тела по оси Oy, представляемой как произведение квадрата времени на половину укорения свободного падения (выражено из уравнения РУПД);
 +
        H=double(p1)-p2;        /// Вычисление координаты тела по оси Oy;
 +
        X=s*cos(a*3.14159/180)*i;      /// Вычисление координаты тела по оси Ox как произведение скорости по оси Ox на время (выражено из уравнения равномерного движения);
 +
        out << X << " ";        /// Запись в файл значения по оси Ox
 +
        out << H << endl;      /// и по оси Oy;
 +
    }
 +
    out.close();        /// Закрываем файл, с которым работали в течение программы;
 +
    return 0;           /// По умолчанию возвращаем функции int main значение 0, тем самым завершая программу;
 +
}
  
#endif /*__SAMPLE_H_ */
+
// Второй случай
  
// END OF 'SAMPLE.H' FILE
+
#include <iostream>
</syntaxhighlight>
+
#include <math.h>
</div>
 
[http://tm.spbstu.ru/File:T06BALL.7z Скачать архив]
 
<br>
 
 
 
'''[[Рубинова Раиса]]'''
 
 
 
'''Описание программы''': программа состоит из четырех независимых друг от друга частей:
 
#  Полет тела без сопротивления воздуха;
 
#  Полет тела при линейной зависимости силы сопротивления воздуха от скорости, при котором координаты тела рассчитываются точным методом;
 
#  Полет тела при линейной зависимости силы сопротивления воздуха от скорости, при котором координаты тела рассчитываются методом Верле;
 
#  Полет тела при квадратичной зависимости силы сопротивлении воздуха от скорости, при котором координаты тела рассчитываются методом Верле;
 
 
 
Скачать можно [http://tm.spbstu.ru/File:Полет.rar тут].
 
 
 
<div class="mw-collapsible-content">
 
 
 
[[File:Обычный.png]]
 
[[File:Точный.png]]
 
[[File:Верле2.png]]
 
[[File:Верле1.png]]
 
 
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
// Первый случай
 
 
 
#include <iostream>
 
#include <math.h>
 
 
#include <cstdlib>
 
#include <cstdlib>
 
#include <fstream>
 
#include <fstream>
  
/// Программа, анализирующая полет тела;
+
/// Программа, позволяющая описать полет точки при помощи точного метода;
  
 
using namespace std;
 
using namespace std;
double a,s,H,p1,p2,X,f;    /// Создание переменных, необходимых для работы:
+
double v,a,st,m;    /// Создание переменных, необходимых для работы:
                                                                                /// a - угол к горизонту, под которым летит тело, вводится пользователем;
+
                        /// v - модуль скорости, который задает сам пользователь;
                                                                                /// s - начальная скорость, с которой тело начинает лететь, вводится пользователем;
+
                        /// a - угол относительно горизонта, под которым летит тело, задается пользователем;
                                                                                /// H - координата тела по оси Oy;
+
                        /// st - шаг по времени, через который расчитываются координаты точек, задается пользователем;
                                                                                /// p1, p2 - промежуточные переменные, предназначенные для расчетов;
+
                        /// m - масса тела, задается пользователем;
                                                                                /// X - координата тела по оси Oy;
+
double *V,*X, *Y, *U;  /// Создание массивов, хранящих значения типа double, в которых хранятся значения:
                                                                                /// f - шаг по времени;
+
                        /// V - массив, хранящий значения скорости по оси Ox;
 +
                        /// X - массив, хранящий координаты точки по оси Ox;
 +
                        /// Y - массив, хранящий значения скорости по оси Oy;
 +
                        /// U - массив, хранящий координаты точки по оси Oy;
  
 
int main()
 
int main()
 
{
 
{
     cout << "Enter speed and angle and step of time" << endl;   /// Обращение к пользователю, где требуется ввести скорость тела, угол к горизонту и шаг по времени;
+
     cout << "Enter speed and angle and step of time and weight" << endl;       /// Обращение к пользователю, где требуется ввести скорость тела, угол к горизонту, шаг по времени и массу тела;
     cin >> s >> a >> f;     /// Считывание данных, введенных пользователем, в переменные;
+
     cin >> v >> a >> st >> m;           /// Считывание данных, введенных пользователей в переменные;
     double t=s*sin(a*3.14159/180.0)/9.8;       /// Создание новой переменной t, хранящей значение времени полета тела вверх (вычисленное через уравнение скорости по оси Oy);
+
     double t=(v/9.8)*sin(3.14159*a/180.0);         /// Создание новой переменной t, хранящей значение времени всего полета тела, вычисленного, как два времени взлета (через уравнение скорости по оси Oy);
     for (double i=f; i<(2*t+f); i+=f)       /// Для вычисления координат тела в n-ом количестве точек мы создаем цикл, который повторяется то количество раз, сколько раз шаг по времени, введенным пользователем, вмещается во время полета всего тела;
+
     int n=2*t/st;      /// Создание новой целочисленной переменной, которая равна времени полета тела (преобразование типов для переменной t) деленного на шаг, которая будет использоваться при создании массивов для размера;
 +
    //int p=1/st;
 +
    V = new double [n+2];      /// Создание динамического массива V, предназначенного для хранения значений скорости по оси Ox, размером (n+2) (n показывает, сколько раз шаг по времени помещается во все время, то есть, сколько точек мы будем рассматривать, анализируя полет точки);
 +
    X = new double [n+2];      /// Создание динамического массива X, предназначенного для хранения координаты тела по оси Ox и имеющего схожие характеристики с массивом V;
 +
    Y = new double [n+2];      /// Создание динамического массива X, предназначенного для хранения координаты тела по оси Oy и имеющего схожие характеристики с массивом V;
 +
    U = new double [n+2];      /// Создание динамического массива U, предназначенного для хранения значений скорости тела по оси Oy и имеющего схожие характеристики с массивом V;
 +
    V[0]=v*cos(3.14159*a/180.0);        /// Вычисление значения скорости по оси Ox в начальный момент времени, как состовляющая модуля скорости, заданного пользователем;
 +
    X[0]=0;        /// Задание координаты точки по оси Ox в начальный момент времени. Мы рассматриваем движение тела под углом к горизонту из начала координат, поэтому x=0;
 +
    U[0]=v*sin(3.14159*a/180.0);        /// Вычисление значения скорости по оси Oy в начальный момент времени, как компонента модуля скорости, заданного пользователем, по вертикальной оси;
 +
    Y[0]=0;        /// Задание координаты точки по оси Oy в начальный момент времени. Мы рассматриваем движение тела под углом к горизонту из начала координат, поэтому y=0;
 +
    ofstream out("Res.txt");       /// Так как результаты анализа не только выводятся на экран, но и записываются в файл, мы создаем переменную, соответствующую файлу "Res.txt", находящемуся в папке с программой, и открываем файл для записи;
 +
    for (int i=1; i<n; ++i)         /// Для вычисления координат тела в пространстве в зависимости от времени мы создаем цикл, который позволяет, использая общую формулу нахождкения координат и компонент скорости, вычислять эти значения
 +
                                    /// Цикл повторяется (n-1) раз, так как значения в начальный момент времени были найдены отдельно от цикла, и повторяется столько раз, сколько точек траектории мы рассматриваем;
 
     {
 
     {
         p1=s*sin(a*3.14159/180)*i;      /// Вычисление первой компоненты координаты тела по оси Oy, представляемй как произведение скорости по этой оси на время (выражено из уравнения равноускоренного прямолинейного движения);
+
         Y[i]=(m/0.001)*(U[0]+9.8*(m/0.001))*(1-exp(((0-0.001)/m)*i*st))-9.8*(m/0.001)*i*st;        /// Вычисление координаты тела в момент времени (i*st) по оси Oy по формуле, выведенной через дифференциальное уравнение точки для вертикальной оси и находящей координату как функцию от времени и координаты тела в предыдущей рассматриваемой нами точке;
        p2=4.9*i*i;        /// Вычисление второй компоненты координаты тела по оси Oy, представляемой как произведение квадрата времени на половину укорения свободного падения (выражено из уравнения РУПД);
+
         X[i]=V[0]*(m/0.001)*(1-exp(((0-0.001)/m)*i*st));         /// Аналогично вычисляем координаты тела в момент времени (i*st) по оси Ox как функцию от времени и координате в предыдущей рассматриваемой точке;
        H=double(p1)-p2;    /// Вычисление координаты тела по оси Oy;
+
                                                                  /// В приведенных выше формулах зачение 0.001 - это коэффициент сопротивления воздуха;
         X=s*cos(a*3.14159/180)*i;       /// Вычисление координаты тела по оси Ox как произведение скорости по оси Ox на время (выражено из уравнения равномерного движения);
+
                                                                  /// Движение по горизонтальной оси рассматривается как равномерное прямолинейное движение;
        cerr << X << " ";      /// Вывод на экран значения по оси Ox
+
                                                                  /// Движение по вертикальной оси рассматривается как равноускоренное прямолинейное движение;
        cerr << H << endl;      /// и по оси Oy;
+
         cerr << X[i] << " " << Y[i] << endl;       /// Выведение рассчитанных значений на экран в виде строки, где первым идет координата по оси Ox, вторым - по оси Oy;
    }
+
         out << X[i] << " " << Y[i] << endl;         /// Запись рассчитанных значений в файл "Res.txt" в виде строки, где первым идет координата по оси Ox, вторым - по оси Oy;
    ofstream out("zap.txt");        /// Так как результаты анализа не только выводятся на экран, но и записываются в файл, мы создаем переменную, соответствующую файлу "Res.txt", находящемуся в папке с программой, и открываем файл для записи;
+
                                                    /// Таким образом, в результате работы программы мы получаем два столбика значений для координат по обеим осям, которые как записаны в файл, так и выведены на экран;
    for (double i=0; i<(2*t+f); i+=f)        /// Для вычисления координат тела в n-ом количестве точек мы создаем цикл, который повторяется то количество раз, сколько раз шаг по времени, введенным пользователем, вмещается во время полета всего тела;
 
    {
 
        p1=s*sin(a*3.14159/180)*i;      /// Вычисление первой компоненты координаты тела по оси Oy, представляемй как произведение скорости по этой оси на время (выражено из уравнения равноускоренного прямолинейного движения);
 
        p2=4.9*i*i;            /// Вычисление второй компоненты координаты тела по оси Oy, представляемой как произведение квадрата времени на половину укорения свободного падения (выражено из уравнения РУПД);
 
        H=double(p1)-p2;        /// Вычисление координаты тела по оси Oy;
 
         X=s*cos(a*3.14159/180)*i;       /// Вычисление координаты тела по оси Ox как произведение скорости по оси Ox на время (выражено из уравнения равномерного движения);
 
         out << X << " ";       /// Запись в файл значения по оси Ox
 
        out << H << endl;      /// и по оси Oy;
 
 
     }
 
     }
 
     out.close();        /// Закрываем файл, с которым работали в течение программы;
 
     out.close();        /// Закрываем файл, с которым работали в течение программы;
 
     return 0;          /// По умолчанию возвращаем функции int main значение 0, тем самым завершая программу;
 
     return 0;          /// По умолчанию возвращаем функции int main значение 0, тем самым завершая программу;
 +
 +
 
}
 
}
  
// Второй случай  
+
// Третий случай
  
 
#include <iostream>
 
#include <iostream>
Строка 2196: Строка 2022:
 
#include <fstream>
 
#include <fstream>
  
/// Программа, позволяющая описать полет точки при помощи точного метода;
+
/// Программа, анализирующая полет тела при помощи модифицированного метода Верле;
  
 
using namespace std;
 
using namespace std;
double v,a,st,m;    /// Создание переменных, необходимых для работы:
+
double v,a,st,m,x,y;    /// Создание переменных, необходимых для работы;
 
                         /// v - модуль скорости, который задает сам пользователь;
 
                         /// v - модуль скорости, который задает сам пользователь;
 
                         /// a - угол относительно горизонта, под которым летит тело, задается пользователем;
 
                         /// a - угол относительно горизонта, под которым летит тело, задается пользователем;
 
                         /// st - шаг по времени, через который расчитываются координаты точек, задается пользователем;
 
                         /// st - шаг по времени, через который расчитываются координаты точек, задается пользователем;
 
                         /// m - масса тела, задается пользователем;
 
                         /// m - масса тела, задается пользователем;
 +
                        /// x - координата тела по оси Ox в мнимый момент времени t=-1;
 +
                        /// y - координата тела по оси Oy в мнимый момент времени t=-1;
 
double *V,*X, *Y, *U;  /// Создание массивов, хранящих значения типа double, в которых хранятся значения:
 
double *V,*X, *Y, *U;  /// Создание массивов, хранящих значения типа double, в которых хранятся значения:
 
                         /// V - массив, хранящий значения скорости по оси Ox;
 
                         /// V - массив, хранящий значения скорости по оси Ox;
Строка 2212: Строка 2040:
 
int main()
 
int main()
 
{
 
{
     cout << "Enter speed and angle and step of time and weight" << endl;       /// Обращение к пользователю, где требуется ввести скорость тела, угол к горизонту, шаг по времени и массу тела;
+
     cout << "Enter speed and angle and step of time and weight" << endl;   /// Обращение к пользователю, где требуется ввести скорость тела, угол к горизонту, шаг по времени и массу тела;
     cin >> v >> a >> st >> m;           /// Считывание данных, введенных пользователей в переменные;
+
     cin >> v >> a >> st >> m;       /// Считывание данных, введенных пользователей в переменные;
     double t=(v/9.8)*sin(3.14159*a/180.0);         /// Создание новой переменной t, хранящей значение времени всего полета тела, вычисленного, как два времени взлета (через уравнение скорости по оси Oy);
+
     double t=(v/9.8)*sin(3.14159*a/180.0);     /// Создание новой переменной t, хранящей значение времени всего полета тела, вычисленного, как два времени взлета (через уравнение скорости по оси Oy);
     int n=2*t/st;       /// Создание новой целочисленной переменной, которая равна времени полета тела (преобразование типов для переменной t) деленного на шаг, которая будет использоваться при создании массивов для размера;
+
     int n=2*t/st;   /// Создание новой целочисленной переменной, которая равна времени полета тела (преобразование типов для переменной t) деленного на шаг, которая будет использоваться при создании массивов для размера;
 
     //int p=1/st;
 
     //int p=1/st;
 
     V = new double [n+2];      /// Создание динамического массива V, предназначенного для хранения значений скорости по оси Ox, размером (n+2) (n показывает, сколько раз шаг по времени помещается во все время, то есть, сколько точек мы будем рассматривать, анализируя полет точки);
 
     V = new double [n+2];      /// Создание динамического массива V, предназначенного для хранения значений скорости по оси Ox, размером (n+2) (n показывает, сколько раз шаг по времени помещается во все время, то есть, сколько точек мы будем рассматривать, анализируя полет точки);
Строка 2221: Строка 2049:
 
     Y = new double [n+2];      /// Создание динамического массива X, предназначенного для хранения координаты тела по оси Oy и имеющего схожие характеристики с массивом V;
 
     Y = new double [n+2];      /// Создание динамического массива X, предназначенного для хранения координаты тела по оси Oy и имеющего схожие характеристики с массивом V;
 
     U = new double [n+2];      /// Создание динамического массива U, предназначенного для хранения значений скорости тела по оси Oy и имеющего схожие характеристики с массивом V;
 
     U = new double [n+2];      /// Создание динамического массива U, предназначенного для хранения значений скорости тела по оси Oy и имеющего схожие характеристики с массивом V;
     V[0]=v*cos(3.14159*a/180.0);       /// Вычисление значения скорости по оси Ox в начальный момент времени, как состовляющая модуля скорости, заданного пользователем;
+
     V[0]=v*cos(3.14159*a/180.0);   /// Вычисление значения скорости по оси Ox в начальный момент времени, как состовляющая модуля скорости, заданного пользователем;
     X[0]=0;         /// Задание координаты точки по оси Ox в начальный момент времени. Мы рассматриваем движение тела под углом к горизонту из начала координат, поэтому x=0;
+
     X[0]=0;     /// Задание координаты точки по оси Ox в начальный момент времени. Мы рассматриваем движение тела под углом к горизонту из начала координат, поэтому x=0;
     U[0]=v*sin(3.14159*a/180.0);       /// Вычисление значения скорости по оси Oy в начальный момент времени, как компонента модуля скорости, заданного пользователем, по вертикальной оси;
+
    x=X[0]-V[0]*st;    /// Суть данного метода заключается в том, что мы находим значение параметров тела по предыдущим двум состояниям, поэтому нам нужно вычислить мнимые координаты тела в -1 момент времени. Это расчет коордлинаты по оси Ox;
     Y[0]=0;         /// Задание координаты точки по оси Oy в начальный момент времени. Мы рассматриваем движение тела под углом к горизонту из начала координат, поэтому y=0;
+
    X[1]=2*X[0]-x-(0.01/m)*V[0]*st*st;  /// Вычисление координаты тела по оси Ox в момент времени t=1;
 +
     U[0]=v*sin(3.14159*a/180.0);   /// Вычисление значения скорости по оси Oy в начальный момент времени, как компонента модуля скорости, заданного пользователем, по вертикальной оси;
 +
     Y[0]=0;     /// Задание координаты точки по оси Oy в начальный момент времени. Мы рассматриваем движение тела под углом к горизонту из начала координат, поэтому y=0;
 +
    y=Y[0]-U[0]*st;    /// Суть данного метода заключается в том, что мы находим значение параметров тела по предыдущим двум состояниям, поэтому нам нужно вычислить мнимые координаты тела в -1 момент времени. Это расчет коордлинаты по оси Oу;
 +
    Y[1]=2*Y[0]-y-(0.01/m)*U[0]*st*st;      /// Вычисление координаты тела по оси Oу в момент времени t=1;
 +
    cerr << X[1] << " " << Y[1] << endl;    /// Вывод на экран значений координат по обеим осям в момент времени t=1;
 
     ofstream out("Res.txt");        /// Так как результаты анализа не только выводятся на экран, но и записываются в файл, мы создаем переменную, соответствующую файлу "Res.txt", находящемуся в папке с программой, и открываем файл для записи;
 
     ofstream out("Res.txt");        /// Так как результаты анализа не только выводятся на экран, но и записываются в файл, мы создаем переменную, соответствующую файлу "Res.txt", находящемуся в папке с программой, и открываем файл для записи;
     for (int i=1; i<n; ++i)         /// Для вычисления координат тела в пространстве в зависимости от времени мы создаем цикл, который позволяет, использая общую формулу нахождкения координат и компонент скорости, вычислять эти значения
+
    out << X[1] << " " << Y[1] << endl;    /// Записываем в файл полученные значения координат тела в момент времени t=1;
                                    /// Цикл повторяется (n-1) раз, так как значения в начальный момент времени были найдены отдельно от цикла, и повторяется столько раз, сколько точек траектории мы рассматриваем;
+
    int k=1;        /// Создаем целочисленную переменную k=1 для работы в цикле;
 +
    //cerr<<"N "<<n<<"\n";
 +
     for (int i=0; i<n; ++i)     /// Для вычисления координат тела в пространстве в зависимости от времени мы создаем цикл, который позволяет, использая общую формулу нахождкения координат и компонент скорости, вычислять эти значения
 +
                                /// Цикл повторяется (n-1) раз, так как значения в начальный момент времени были найдены отдельно от цикла, и повторяется столько раз, сколько точек траектории мы рассматриваем;
 
     {
 
     {
         Y[i]=(m/0.001)*(U[0]+9.8*(m/0.001))*(1-exp(((0-0.001)/m)*i*st))-9.8*(m/0.001)*i*st;         /// Вычисление координаты тела в момент времени (i*st) по оси Oy по формуле, выведенной через дифференциальное уравнение точки для вертикальной оси и находящей координату как функцию от времени и координаты тела в предыдущей рассматриваемой нами точке;
+
         X[k+1]=2.0*X[k]-X[k-1]-(0.001/m)*V[k]*st*st;   /// Нахождение координаты тела по оси Ox в момент времени t, основываясь на известных параметрах за моменты времени t-1 и t-2;
         X[i]=V[0]*(m/0.001)*(1-exp(((0-0.001)/m)*i*st));         /// Аналогично вычисляем координаты тела в момент времени (i*st) по оси Ox как функцию от времени и координате в предыдущей рассматриваемой точке;
+
        V[k]=(X[k+1]-X[k-1])/(2*st);        /// Нахождение значения скорости тела по оси Ox в момент времени t-1, основываясь на рассчитанных выше координатах тела по оси Ox длямоментов времени t и t-2;
                                                                  /// В приведенных выше формулах зачение 0.001 - это коэффициент сопротивления воздуха;
+
         Y[k+1]=2.0*Y[k]-Y[k-1]-(9.8+(0.001/m)*U[k])*st*st;     /// Нахождение координаты тела по оси Oy в момент времени t, основываясь на известных параметрах за моменты времени t-1 и t-2;
                                                                  /// Движение по горизонтальной оси рассматривается как равномерное прямолинейное движение;
+
        U[k]=(Y[k+1]-Y[k-1])/(2*st);       /// Нахождение значения скорости тела по оси Oy в момент времени t-1, основываясь на рассчитанных выше координатах тела по оси Ox длямоментов времени t и t-2;
                                                                  /// Движение по вертикальной оси рассматривается как равноускоренное прямолинейное движение;
+
        //cerr <<i<<" "<<k<<" "<<
         cerr << X[i] << " " << Y[i] << endl;       /// Выведение рассчитанных значений на экран в виде строки, где первым идет координата по оси Ox, вторым - по оси Oy;
+
         cerr << X[k+1] << " " << Y[k+1] << endl;   /// Выведение рассчитанных значений на экран в виде строки, где первым идет координата по оси Ox, вторым - по оси Oy;
         out << X[i] << " " << Y[i] << endl;         /// Запись рассчитанных значений в файл "Res.txt" в виде строки, где первым идет координата по оси Ox, вторым - по оси Oy;
+
         out << X[k+1] << " " << Y[k+1] << endl;     /// Запись рассчитанных значений в файл "Res.txt" в виде строки, где первым идет координата по оси Ox, вторым - по оси Oy;
                                                    /// Таким образом, в результате работы программы мы получаем два столбика значений для координат по обеим осям, которые как записаны в файл, так и выведены на экран;
+
        k=k+1;      /// Увеличиваем число k на единицу, чтобы в следующем шаге цикла рассчитать значения для следующего момента времени;
 +
                    /// Таким образом, в результате работы программы мы получаем два столбика значений для координат по обеим осям, которые как записаны в файл, так и выведены на экран;
 
     }
 
     }
     out.close();       /// Закрываем файл, с которым работали в течение программы;
+
     out.close();   /// Закрываем файл, с которым работали в течение программы;
     return 0;           /// По умолчанию возвращаем функции int main значение 0, тем самым завершая программу;
+
     return 0;       /// По умолчанию возвращаем функции int main значение 0, тем самым завершая программу;
 
 
 
 
 
}
 
}
  
// Третий случай
+
// Четвертый случай
  
 
#include <iostream>
 
#include <iostream>
Строка 2251: Строка 2086:
 
#include <fstream>
 
#include <fstream>
  
/// Программа, анализирующая полет тела при помощи модифицированного метода Верле;
+
/// Программа, анализирующая полет тела при помощи метода Верле;
  
 
using namespace std;
 
using namespace std;
double v,a,st,m,x,y;   /// Создание переменных, необходимых для работы;
+
double v,a,st,m,x,y;       /// Создание переменных, необходимых для работы:
                        /// v - модуль скорости, который задает сам пользователь;
+
                            /// v - модуль скорости, который задает сам пользователь;
                        /// a - угол относительно горизонта, под которым летит тело, задается пользователем;
+
                            /// a - угол относительно горизонта, под которым летит тело, задается пользователем;
                        /// st - шаг по времени, через который расчитываются координаты точек, задается пользователем;
+
                            /// st - шаг по времени, через который расчитываются координаты точек, задается пользователем;
                        /// m - масса тела, задается пользователем;
+
                            /// m - масса тела, задается пользователем;
                        /// x - координата тела по оси Ox в мнимый момент времени t=-1;
+
                            /// x - координата тела по оси Ox в мнимый момент времени t=-1;
                        /// y - координата тела по оси Oy в мнимый момент времени t=-1;
+
                            /// y - координата тела по оси Oy в мнимый момент времени t=-1;
double *V,*X, *Y, *U;   /// Создание массивов, хранящих значения типа double, в которых хранятся значения:
+
double *V,*X, *Y, *U;       /// Создание массивов, хранящих значения типа double, в которых хранятся значения:
                        /// V - массив, хранящий значения скорости по оси Ox;
+
                            /// V - массив, хранящий значения скорости по оси Ox;
                        /// X - массив, хранящий координаты точки по оси Ox;
+
                            /// X - массив, хранящий координаты точки по оси Ox;
                        /// Y - массив, хранящий значения скорости по оси Oy;
+
                            /// Y - массив, хранящий значения скорости по оси Oy;
                        /// U - массив, хранящий координаты точки по оси Oy;
+
                            /// U - массив, хранящий координаты точки по оси Oy;
  
 
int main()
 
int main()
 
{
 
{
     cout << "Enter speed and angle and step of time and weight" << endl;   /// Обращение к пользователю, где требуется ввести скорость тела, угол к горизонту, шаг по времени и массу тела;
+
     cout << "Enter speed and angle and step of time and weight" << endl;       /// Обращение к пользователю, где требуется ввести скорость тела, угол к горизонту, шаг по времени и массу тела;
     cin >> v >> a >> st >> m;      /// Считывание данных, введенных пользователей в переменные;
+
     cin >> v >> a >> st >> m;      /// Считывание данных, введенных пользователем, в переменные;
 
     double t=(v/9.8)*sin(3.14159*a/180.0);      /// Создание новой переменной t, хранящей значение времени всего полета тела, вычисленного, как два времени взлета (через уравнение скорости по оси Oy);
 
     double t=(v/9.8)*sin(3.14159*a/180.0);      /// Создание новой переменной t, хранящей значение времени всего полета тела, вычисленного, как два времени взлета (через уравнение скорости по оси Oy);
     int n=2*t/st;   /// Создание новой целочисленной переменной, которая равна времени полета тела (преобразование типов для переменной t) деленного на шаг, которая будет использоваться при создании массивов для размера;
+
     int n=2*t/st;           /// Создание новой целочисленной переменной, которая равна времени полета тела (преобразование типов для переменной t) деленного на шаг, которая будет использоваться при создании массивов для размера;
 
     //int p=1/st;
 
     //int p=1/st;
     V = new double [n+2];       /// Создание динамического массива V, предназначенного для хранения значений скорости по оси Ox, размером (n+2) (n показывает, сколько раз шаг по времени помещается во все время, то есть, сколько точек мы будем рассматривать, анализируя полет точки);
+
     V = new double [n+2];   /// Создание динамического массива V, предназначенного для хранения значений скорости по оси Ox, размером (n+2) (n показывает, сколько раз шаг по времени помещается во все время, то есть, сколько точек мы будем рассматривать, анализируя полет точки);
     X = new double [n+2];       /// Создание динамического массива X, предназначенного для хранения координаты тела по оси Ox и имеющего схожие характеристики с массивом V;
+
     X = new double [n+2];   /// Создание динамического массива X, предназначенного для хранения координаты тела по оси Ox и имеющего схожие характеристики с массивом V;
     Y = new double [n+2];       /// Создание динамического массива X, предназначенного для хранения координаты тела по оси Oy и имеющего схожие характеристики с массивом V;
+
     Y = new double [n+2];   /// Создание динамического массива X, предназначенного для хранения координаты тела по оси Oy и имеющего схожие характеристики с массивом V;
     U = new double [n+2];       /// Создание динамического массива U, предназначенного для хранения значений скорости тела по оси Oy и имеющего схожие характеристики с массивом V;
+
     U = new double [n+2];   /// Создание динамического массива U, предназначенного для хранения значений скорости тела по оси Oy и имеющего схожие характеристики с массивом V;
     V[0]=v*cos(3.14159*a/180.0);   /// Вычисление значения скорости по оси Ox в начальный момент времени, как состовляющая модуля скорости, заданного пользователем;
+
     V[0]=v*cos(3.14159*a/180.0);       /// Вычисление значения скорости по оси Ox в начальный момент времени, как состовляющая модуля скорости, заданного пользователем;
     X[0]=0;     /// Задание координаты точки по оси Ox в начальный момент времени. Мы рассматриваем движение тела под углом к горизонту из начала координат, поэтому x=0;
+
     X[0]=0;                 /// Задание координаты точки по оси Ox в начальный момент времени. Мы рассматриваем движение тела под углом к горизонту из начала координат, поэтому x=0;
     x=X[0]-V[0]*st;     /// Суть данного метода заключается в том, что мы находим значение параметров тела по предыдущим двум состояниям, поэтому нам нужно вычислить мнимые координаты тела в -1 момент времени. Это расчет коордлинаты по оси Ox;
+
     x=X[0]-V[0]*st;         /// Суть данного метода заключается в том, что мы находим значение параметров тела по предыдущим двум состояниям, поэтому нам нужно вычислить мнимые координаты тела в -1 момент времени. Это расчет коордлинаты по оси Ox;
     X[1]=2*X[0]-x-(0.01/m)*V[0]*st*st; /// Вычисление координаты тела по оси Ox в момент времени t=1;
+
     X[1]=2*X[0]-x-(0.01/m)*V[0]*V[0]/cos(3.14159*a/180.0)*st*st;   /// Вычисление координаты тела по оси Ox в момент времени t=1;
 
     U[0]=v*sin(3.14159*a/180.0);    /// Вычисление значения скорости по оси Oy в начальный момент времени, как компонента модуля скорости, заданного пользователем, по вертикальной оси;
 
     U[0]=v*sin(3.14159*a/180.0);    /// Вычисление значения скорости по оси Oy в начальный момент времени, как компонента модуля скорости, заданного пользователем, по вертикальной оси;
     Y[0]=0;     /// Задание координаты точки по оси Oy в начальный момент времени. Мы рассматриваем движение тела под углом к горизонту из начала координат, поэтому y=0;
+
     Y[0]=0;                 /// Задание координаты точки по оси Oy в начальный момент времени. Мы рассматриваем движение тела под углом к горизонту из начала координат, поэтому y=0;
     y=Y[0]-U[0]*st;     /// Суть данного метода заключается в том, что мы находим значение параметров тела по предыдущим двум состояниям, поэтому нам нужно вычислить мнимые координаты тела в -1 момент времени. Это расчет коордлинаты по оси Oу;
+
     y=Y[0]-U[0]*st;         /// Суть данного метода заключается в том, что мы находим значение параметров тела по предыдущим двум состояниям, поэтому нам нужно вычислить мнимые координаты тела в -1 момент времени. Это расчет коордлинаты по оси Oу;
     Y[1]=2*Y[0]-y-(0.01/m)*U[0]*st*st;     /// Вычисление координаты тела по оси Oу в момент времени t=1;
+
     Y[1]=2*Y[0]-y-(0.01/m)*U[0]*U[0]/sin(3.14159*a/180.0)*st*st;   /// Вычисление координаты тела по оси Oу в момент времени t=1;
 
     cerr << X[1] << " " << Y[1] << endl;    /// Вывод на экран значений координат по обеим осям в момент времени t=1;
 
     cerr << X[1] << " " << Y[1] << endl;    /// Вывод на экран значений координат по обеим осям в момент времени t=1;
 
     ofstream out("Res.txt");        /// Так как результаты анализа не только выводятся на экран, но и записываются в файл, мы создаем переменную, соответствующую файлу "Res.txt", находящемуся в папке с программой, и открываем файл для записи;
 
     ofstream out("Res.txt");        /// Так как результаты анализа не только выводятся на экран, но и записываются в файл, мы создаем переменную, соответствующую файлу "Res.txt", находящемуся в папке с программой, и открываем файл для записи;
     out << X[1] << " " << Y[1] << endl;     /// Записываем в файл полученные значения координат тела в момент времени t=1;
+
     out << X[1] << " " << Y[1] << endl;         /// Записываем в файл полученные значения координат тела в момент времени t=1;
     int k=1;       /// Создаем целочисленную переменную k=1 для работы в цикле;
+
     int k=1;           /// Создаем целочисленную переменную k=1 для работы в цикле;
 
     //cerr<<"N "<<n<<"\n";
 
     //cerr<<"N "<<n<<"\n";
     for (int i=0; i<n; ++i)     /// Для вычисления координат тела в пространстве в зависимости от времени мы создаем цикл, который позволяет, использая общую формулу нахождкения координат и компонент скорости, вычислять эти значения
+
     for (int i=0; i<n; ++i)         /// Для вычисления координат тела в пространстве в зависимости от времени мы создаем цикл, который позволяет, использая общую формулу нахождкения координат и компонент скорости, вычислять эти значения
                                /// Цикл повторяется (n-1) раз, так как значения в начальный момент времени были найдены отдельно от цикла, и повторяется столько раз, сколько точек траектории мы рассматриваем;
+
                                    /// Цикл повторяется (n-1) раз, так как значения в начальный момент времени были найдены отдельно от цикла, и повторяется столько раз, сколько точек траектории мы рассматриваем;
 
     {
 
     {
         X[k+1]=2.0*X[k]-X[k-1]-(0.001/m)*V[k]*st*st;   /// Нахождение координаты тела по оси Ox в момент времени t, основываясь на известных параметрах за моменты времени t-1 и t-2;
+
         X[k+1]=2.0*X[k]-X[k-1]-(0.001/m)*V[k]*V[k]*st*st;       /// Нахождение координаты тела по оси Ox в момент времени t, основываясь на известных параметрах за моменты времени t-1 и t-2;
 
         V[k]=(X[k+1]-X[k-1])/(2*st);        /// Нахождение значения скорости тела по оси Ox в момент времени t-1, основываясь на рассчитанных выше координатах тела по оси Ox длямоментов времени t и t-2;
 
         V[k]=(X[k+1]-X[k-1])/(2*st);        /// Нахождение значения скорости тела по оси Ox в момент времени t-1, основываясь на рассчитанных выше координатах тела по оси Ox длямоментов времени t и t-2;
         Y[k+1]=2.0*Y[k]-Y[k-1]-(9.8+(0.001/m)*U[k])*st*st;     /// Нахождение координаты тела по оси Oy в момент времени t, основываясь на известных параметрах за моменты времени t-1 и t-2;
+
         Y[k+1]=2.0*Y[k]-Y[k-1]-(9.8+(0.001/m)*U[k]*U[k])*st*st;     /// Нахождение координаты тела по оси Oy в момент времени t, основываясь на известных параметрах за моменты времени t-1 и t-2;
         U[k]=(Y[k+1]-Y[k-1])/(2*st);       /// Нахождение значения скорости тела по оси Oy в момент времени t-1, основываясь на рассчитанных выше координатах тела по оси Ox длямоментов времени t и t-2;
+
         U[k]=(Y[k+1]-Y[k-1])/(2*st);   /// Нахождение значения скорости тела по оси Oy в момент времени t-1, основываясь на рассчитанных выше координатах тела по оси Ox длямоментов времени t и t-2;
 
         //cerr <<i<<" "<<k<<" "<<
 
         //cerr <<i<<" "<<k<<" "<<
 
         cerr << X[k+1] << " " << Y[k+1] << endl;    /// Выведение рассчитанных значений на экран в виде строки, где первым идет координата по оси Ox, вторым - по оси Oy;
 
         cerr << X[k+1] << " " << Y[k+1] << endl;    /// Выведение рассчитанных значений на экран в виде строки, где первым идет координата по оси Ox, вторым - по оси Oy;
 
         out << X[k+1] << " " << Y[k+1] << endl;    /// Запись рассчитанных значений в файл "Res.txt" в виде строки, где первым идет координата по оси Ox, вторым - по оси Oy;
 
         out << X[k+1] << " " << Y[k+1] << endl;    /// Запись рассчитанных значений в файл "Res.txt" в виде строки, где первым идет координата по оси Ox, вторым - по оси Oy;
 
         k=k+1;      /// Увеличиваем число k на единицу, чтобы в следующем шаге цикла рассчитать значения для следующего момента времени;
 
         k=k+1;      /// Увеличиваем число k на единицу, чтобы в следующем шаге цикла рассчитать значения для следующего момента времени;
                    /// Таким образом, в результате работы программы мы получаем два столбика значений для координат по обеим осям, которые как записаны в файл, так и выведены на экран;
+
                                                    /// Таким образом, в результате работы программы мы получаем два столбика значений для координат по обеим осям, которые как записаны в файл, так и выведены на экран;
 
     }
 
     }
 
     out.close();    /// Закрываем файл, с которым работали в течение программы;
 
     out.close();    /// Закрываем файл, с которым работали в течение программы;
Строка 2308: Строка 2143:
 
}
 
}
  
// Четвертый случай
+
</syntaxhighlight>
 +
</div>
  
#include <iostream>
 
#include <math.h>
 
#include <cstdlib>
 
#include <fstream>
 
  
/// Программа, анализирующая полет тела при помощи метода Верле;
+
'''[[Козловская Анна]]'''
  
using namespace std;
 
double v,a,st,m,x,y;        /// Создание переменных, необходимых для работы:
 
                            /// v - модуль скорости, который задает сам пользователь;
 
                            /// a - угол относительно горизонта, под которым летит тело, задается пользователем;
 
                            /// st - шаг по времени, через который расчитываются координаты точек, задается пользователем;
 
                            /// m - масса тела, задается пользователем;
 
                            /// x - координата тела по оси Ox в мнимый момент времени t=-1;
 
                            /// y - координата тела по оси Oy в мнимый момент времени t=-1;
 
double *V,*X, *Y, *U;      /// Создание массивов, хранящих значения типа double, в которых хранятся значения:
 
                            /// V - массив, хранящий значения скорости по оси Ox;
 
                            /// X - массив, хранящий координаты точки по оси Ox;
 
                            /// Y - массив, хранящий значения скорости по оси Oy;
 
                            /// U - массив, хранящий координаты точки по оси Oy;
 
  
int main()
+
'''Описание программы''': программа записывает в четыре файла результаты вычисления:
{
+
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;  
    cout << "Enter speed and angle and step of time and weight" << endl;        /// Обращение к пользователю, где требуется ввести скорость тела, угол к горизонту, шаг по времени и массу тела;
+
# Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
    cin >> v >> a >> st >> m;      /// Считывание данных, введенных пользователем, в переменные;
+
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
    double t=(v/9.8)*sin(3.14159*a/180.0);      /// Создание новой переменной t, хранящей значение времени всего полета тела, вычисленного, как два времени взлета (через уравнение скорости по оси Oy);
+
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
    int n=2*t/st;          /// Создание новой целочисленной переменной, которая равна времени полета тела (преобразование типов для переменной t) деленного на шаг, которая будет использоваться при создании массивов для размера;
 
    //int p=1/st;
 
    V = new double [n+2];  /// Создание динамического массива V, предназначенного для хранения значений скорости по оси Ox, размером (n+2) (n показывает, сколько раз шаг по времени помещается во все время, то есть, сколько точек мы будем рассматривать, анализируя полет точки);
 
    X = new double [n+2];  /// Создание динамического массива X, предназначенного для хранения координаты тела по оси Ox и имеющего схожие характеристики с массивом V;
 
    Y = new double [n+2];  /// Создание динамического массива X, предназначенного для хранения координаты тела по оси Oy и имеющего схожие характеристики с массивом V;
 
    U = new double [n+2];  /// Создание динамического массива U, предназначенного для хранения значений скорости тела по оси Oy и имеющего схожие характеристики с массивом V;
 
    V[0]=v*cos(3.14159*a/180.0);        /// Вычисление значения скорости по оси Ox в начальный момент времени, как состовляющая модуля скорости, заданного пользователем;
 
    X[0]=0;                /// Задание координаты точки по оси Ox в начальный момент времени. Мы рассматриваем движение тела под углом к горизонту из начала координат, поэтому x=0;
 
    x=X[0]-V[0]*st;        /// Суть данного метода заключается в том, что мы находим значение параметров тела по предыдущим двум состояниям, поэтому нам нужно вычислить мнимые координаты тела в -1 момент времени. Это расчет коордлинаты по оси Ox;
 
    X[1]=2*X[0]-x-(0.01/m)*V[0]*V[0]/cos(3.14159*a/180.0)*st*st;    /// Вычисление координаты тела по оси Ox в момент времени t=1;
 
    U[0]=v*sin(3.14159*a/180.0);    /// Вычисление значения скорости по оси Oy в начальный момент времени, как компонента модуля скорости, заданного пользователем, по вертикальной оси;
 
    Y[0]=0;                /// Задание координаты точки по оси Oy в начальный момент времени. Мы рассматриваем движение тела под углом к горизонту из начала координат, поэтому y=0;
 
    y=Y[0]-U[0]*st;        /// Суть данного метода заключается в том, что мы находим значение параметров тела по предыдущим двум состояниям, поэтому нам нужно вычислить мнимые координаты тела в -1 момент времени. Это расчет коордлинаты по оси Oу;
 
    Y[1]=2*Y[0]-y-(0.01/m)*U[0]*U[0]/sin(3.14159*a/180.0)*st*st;    /// Вычисление координаты тела по оси Oу в момент времени t=1;
 
    cerr << X[1] << " " << Y[1] << endl;    /// Вывод на экран значений координат по обеим осям в момент времени t=1;
 
    ofstream out("Res.txt");        /// Так как результаты анализа не только выводятся на экран, но и записываются в файл, мы создаем переменную, соответствующую файлу "Res.txt", находящемуся в папке с программой, и открываем файл для записи;
 
    out << X[1] << " " << Y[1] << endl;        /// Записываем в файл полученные значения координат тела в момент времени t=1;
 
    int k=1;            /// Создаем целочисленную переменную k=1 для работы в цикле;
 
    //cerr<<"N "<<n<<"\n";
 
    for (int i=0; i<n; ++i)        /// Для вычисления координат тела в пространстве в зависимости от времени мы создаем цикл, который позволяет, использая общую формулу нахождкения координат и компонент скорости, вычислять эти значения
 
                                    /// Цикл повторяется (n-1) раз, так как значения в начальный момент времени были найдены отдельно от цикла, и повторяется столько раз, сколько точек траектории мы рассматриваем;
 
    {
 
        X[k+1]=2.0*X[k]-X[k-1]-(0.001/m)*V[k]*V[k]*st*st;      /// Нахождение координаты тела по оси Ox в момент времени t, основываясь на известных параметрах за моменты времени t-1 и t-2;
 
        V[k]=(X[k+1]-X[k-1])/(2*st);        /// Нахождение значения скорости тела по оси Ox в момент времени t-1, основываясь на рассчитанных выше координатах тела по оси Ox длямоментов времени t и t-2;
 
        Y[k+1]=2.0*Y[k]-Y[k-1]-(9.8+(0.001/m)*U[k]*U[k])*st*st;    /// Нахождение координаты тела по оси Oy в момент времени t, основываясь на известных параметрах за моменты времени t-1 и t-2;
 
        U[k]=(Y[k+1]-Y[k-1])/(2*st);    /// Нахождение значения скорости тела по оси Oy в момент времени t-1, основываясь на рассчитанных выше координатах тела по оси Ox длямоментов времени t и t-2;
 
        //cerr <<i<<" "<<k<<" "<<
 
        cerr << X[k+1] << " " << Y[k+1] << endl;    /// Выведение рассчитанных значений на экран в виде строки, где первым идет координата по оси Ox, вторым - по оси Oy;
 
        out << X[k+1] << " " << Y[k+1] << endl;    /// Запись рассчитанных значений в файл "Res.txt" в виде строки, где первым идет координата по оси Ox, вторым - по оси Oy;
 
        k=k+1;      /// Увеличиваем число k на единицу, чтобы в следующем шаге цикла рассчитать значения для следующего момента времени;
 
                                                    /// Таким образом, в результате работы программы мы получаем два столбика значений для координат по обеим осям, которые как записаны в файл, так и выведены на экран;
 
    }
 
    out.close();    /// Закрываем файл, с которым работали в течение программы;
 
    return 0;      /// По умолчанию возвращаем функции int main значение 0, тем самым завершая программу;
 
}
 
  
</syntaxhighlight>
+
Скачать можно  [http://tm.spbstu.ru/File:project2.rar тут].
</div>
 
  
 +
<br>'''[[Нарядчиков Александр]]'''<br>
 +
'''Инструкция:''' Пользователю достаточно просто запустить программу.<br>
 +
'''Описание программы:''' В комнате скачут 4 мячика, первый двигается без сопротивления воздуха, второй двигается с квадратичной зависимостью сопротивления воздуха от скорости (Метод Верле), третий двигается с линейной зависимостью сопротивления воздуха от скорости (точное решение), четвертый двигается с линейной зависимостью сопротивления воздуха от скорости (Метод Верле).<br>
 +
'''Описание алгоритма:''' Программа реализована с помощью системы анимации(class anim), используя библиотеки OpenGl и GLUT. Изменения координат мячей проходят в режиме реального времени в векторной форме.<br>
 
<div class="mw-collapsible mw-collapsed" style="width:100%" >
 
<div class="mw-collapsible mw-collapsed" style="width:100%" >
'''[[Савельева Ольга]]'''
+
"'''T06BALL.CPP'''"
 
 
'''Описание:''' Пользователя попросят ввести начальную скорость, угол бросания, тогда программа запишет в файл результаты следующих вычислений:
 
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
 
# Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
 
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
 
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
 
 
 
<div class="mw-collapsible-content">
 
 
 
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
#include <stdio.h>
+
/* FILENAME: T06BALL.CPP
#include <stdlib.h>
+
* LAST UPDATE: 17.01.2016
#include <cmath>
+
*/
  
using namespace std;
+
#include "ANIM.H"
 +
#include "SAMPLE.H"
  
FILE *output;
+
/* Main function */
 +
void main( void )
 +
{
 +
// Получение единственного экземпляра класса анимации
 +
sagl::anim &My = sagl::anim::Get();
 +
 
 +
// Шар, летящий без сопротивлением воздуха
 +
        for (int i = 0; i < 1; i++)
 +
                My << new ball(Pi / 6, 10 + i);
  
double e = 0.0000001; //точность
+
// Шар, летящий с сопротивлением воздуха
double g = 9.8; //ускорение свободного падения
+
// Координаты получены методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости
double dt = 0.00001;   //шаг по времени
+
for (int i = 0; i < 1; i++)
double windageLinearCoefficient = 0.1;
+
My << new ball_air(Pi / 6, 10 + i, 10, 0.01);
double windageSquareCoefficient = 0.00001;
+
 
 +
// Шар, летящий с сопротивлением воздуха
 +
// Координаты получены из точного решения при линейной зависимости силы сопротивлении воздуха от скорости
 +
for (int i = 0; i < 1; i++)
 +
My << new ball_air_2(Pi / 6, 10 + i, 10, 0.01);
 +
 
 +
// Шар, летящий с сопротивлением воздуха
 +
// Координаты получены методом Верле при линейной зависимости силы сопротивлении воздуха от скорости
 +
for (int i = 0; i < 1; i++)
 +
My << new ball_air_3(Pi / 6, 10 + i, 10, 0.01);
 +
 
 +
// Запуск главного цикла
 +
  My.Run();
 +
} // End of 'main' function
  
struct Vector  //вектор
+
// END OF 'T43ANIM.CPP' FILE
{
+
</syntaxhighlight>
    double x, y;
+
"'''ANIM.CPP'''"
    Vector():x(0), y(0)
+
<syntaxhighlight lang="cpp" line start="1" enclose="div">
    {}
+
/* FILENAME: ANIM.CPP
    Vector(double x, double y):x(x), y(y)
+
* LAST UPDATE: 17.01.2016
    {}
+
*/
    const Vector operator+(const Vector &v) const
 
    {
 
        return Vector(this -> x + v.x, this -> y + v.y);
 
    }
 
    const Vector operator-(const Vector &v) const
 
    {
 
        return Vector(this -> x - v.x, this -> y - v.y);
 
    }
 
    const Vector operator*(const double k) const
 
    {
 
        return Vector(this -> x * k, this -> y * k);
 
    }
 
    const Vector operator*(const int k) const
 
    {
 
        return Vector(this -> x * k, this -> y * k);
 
    }
 
    const Vector operator/(const double k) const
 
    {
 
        return Vector(this -> x / k, this -> y / k);
 
    }
 
};
 
  
const Vector operator*(const double a, const Vector &v)
+
#include <stdio.h>
{
+
#include <stdlib.h>
    return Vector(v.x * a, v.y * a);
+
#include <time.h>
}
 
  
const Vector operator*(const int k, const Vector &v)
+
#include "ANIM.H"
{
 
    return Vector(v.x * k, v.y * k);
 
}
 
  
double abs(const Vector &v)
+
// Единственный экземпляр класса
 +
sagl::anim sagl::anim::Instance;
 +
 
 +
/* Reshape function */
 +
// Стандартная функция, вызываемая при изменении размеров окна
 +
void sagl::anim::Reshape( int W, int H )
 
{
 
{
     return sqrt(v.x * v.x + v.y * v.y);
+
  // Установка области просмотра - все окно
}
+
glViewport(0, 0, W, H);
 +
  Instance.WinW = W;
 +
  Instance.WinH = H;
 +
  double ratio_x = 1, ratio_y = 1;
 +
  if (W > H)
 +
    ratio_x = (double)W / H;
 +
  else
 +
     ratio_y = (double)H / W;
 +
  double Size = 1, Near = 1, Far = 500;
 +
  // Установка системы координат "камеры"
 +
glMatrixMode(GL_PROJECTION);
 +
  glLoadIdentity();
 +
  glFrustum(-Size * ratio_x, Size * ratio_x,
 +
            -Size * ratio_y, Size * ratio_y,
 +
            Near, Far);
 +
// Установка "мировой" СК в состояние без преобразований
 +
  glMatrixMode(GL_MODELVIEW);
 +
} // End of 'Reshape' function
  
void printCoordinate(const char *description, const Vector &v) //выводит координаты в более читаемом виде
+
/* Timer function */
 +
// Подсчет времени
 +
void sagl::anim::Timer( void )
 
{
 
{
    fputs(description, output);
+
  long Time = clock();
    fputs(": ", output);
+
 
     fprintf(output, "%lf", v.x);
+
  if (IsPause)
     fputs(", ", output);
+
     DeltaTime = 0, PauseTime += Time - OldTime;
    fprintf(output, "%lf\n", v.y);
+
  else
}
+
     DeltaTime = (Time - OldTime) / (double)CLOCKS_PER_SEC;
 +
  OldTime = Time;
 +
 
 +
  SyncTime = (Time - PauseTime - StartTime) / (double)CLOCKS_PER_SEC;
 +
} /* End of 'Timer' function */
  
Vector getCoordinatesWithoutWindage(double velocity, double angle, double time = -1)
+
/* Display function */
 +
// Стандартная функция, вызываемая при перерисовке окна
 +
void sagl::anim::Display( void )
 
{
 
{
    double fallTime = 2 * velocity * sin(angle) / g;  //расчет времени падения
+
// Запуск времени
    if((time < 0) or (time > fallTime))
+
Instance.Timer();
        time = fallTime;
+
// Очищаем цветовой буфер для создания нового изображения
    double x = velocity * cos(angle) * time;    // x = vx*t;
+
  glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
    double y = velocity * sin(angle) * time - g * time * time / 2;  // y = vy*t-(g*t^2)/2;
 
    return Vector(x, y);
 
}
 
  
Vector getCoordinatesVerletLinear(double velocity, double angle, double time = -1)
+
  glLoadIdentity();
{
+
  // Позиционирование СК
    double nowTime = dt;
+
gluLookAt(-40, 0, 0, 0, 0, 0, 0, 1, 0);
    Vector rsb(0, 0);
+
 
    if((time >= 0) and (dt / 2 - time > 0)) //если время расчета дается слишком малого промежутка
+
// Отрисовка объектов
        return rsb; //вернитесь в начальную точку
+
  Instance.Render();
    Vector v(velocity * cos(angle), velocity * sin(angle)); //проекции начальной скорости
 
    Vector r = v * dt;    //вторая точка
 
    Vector a = -windageLinearCoefficient * v; //ускорение в начальной точке
 
    a.y -= g;
 
    v = v + a * dt; //скорость во второй точке
 
    a = -windageLinearCoefficient * v; //ускорение во второй точке
 
    a.y -= g;
 
    while((r.y > 0) or ((time > 0) and (nowTime <= time)))  //пока точка выше 0 или не достигла заданного времени
 
    {
 
        Vector rn = 2 * r - rsb + a * dt * dt;  // r(t+dt) = 2*r(t)-r(t-dt)+a(t)*dt^2;
 
        v = (rn - rsb) / (2 * dt);  // v(t) = (r(t+dt)-r(t-dt))/(2*dt);
 
        rsb = r;    //обновление r(t-dt) and r(t)
 
        r = rn;
 
        a = -windageLinearCoefficient * v;  //обновление a(t)
 
        a.y -= g;
 
        nowTime += dt;  //обновленное время
 
    }
 
    return r;
 
}
 
  
Vector calculateForTime(Vector &v, double time)
+
  glFinish();
{
+
// Копируем вторичный буфер в окно
    Vector r;
+
glutSwapBuffers();
    // x = vx/k*(1-e^(-k*t));
+
// Вызываем функцию обновления кадра
    r.x = v.x / windageLinearCoefficient * (1 - exp(-windageLinearCoefficient * time));
+
glutPostRedisplay();
    // y = ((vy+g/k)*(1-e^(-k*t))-g*t)/k;
+
} // End of 'Display' function
    r.y = ((v.y + g / windageLinearCoefficient) * (1 - exp(-windageLinearCoefficient * time)) - g * time) / windageLinearCoefficient;
 
    return r;
 
}
 
  
Vector getCoordinatesAccurateLinear(double velocity, double angle, double time = -1)
+
/* Keyboard function */
 +
// Стандартная функция, вызываемая при нажатие клавиш на клавиатуре
 +
void sagl::anim::Keyboard( unsigned char Key, int X, int Y )
 +
{
 +
// Выход из программы
 +
if (Key == 27)
 +
    exit(0);
 +
// Открытие программы в полном экране
 +
else if (Key == 'f')
 +
    glutFullScreen();
 +
  // Пауза
 +
else if (Key == 'p' || Key == 'P')
 +
    Instance.IsPause = !Instance.IsPause;
 +
} // End of 'Keyboard' function
 +
 
 +
sagl::anim::anim( void ) : IsPause(false), SyncTime(0), DeltaTime(0),
 +
  StartTime(clock()), OldTime(StartTime), PauseTime(0), StockSize(0)
 
{
 
{
    if(windageLinearCoefficient < e)  //если коэффициент слишком близок к нулю
+
// Инициализации OpenGL и GLUT
        return getCoordinatesWithoutWindage(velocity, angle, time);  //вычисляй будто это 0
+
glutInitDisplayMode(GLUT_RGB | GLUT_DOUBLE | GLUT_DEPTH);
    Vector r;
+
    
    Vector v(velocity * cos(angle), velocity * sin(angle)); //проекции начальной скорости
+
// Задача размеров и позиции окна
    if(time >= 0)  //время данное
+
glutInitWindowPosition(0, 0);
    {
+
   glutInitWindowSize(700, 700);
        r = calculateForTime(v, time);
+
// Создание окна
        if(r.y >= 0)    //если объект в воздухе или только приземлился
+
glutCreateWindow("T06BALL");
            return r;   //затем верните координаты объекта
+
 
        else    //еще
+
// Установка функций 'обратного вызова'
            return getCoordinatesAccurateLinear(velocity, angle);   //верните координаты приземления
+
  glutDisplayFunc(Display);
    }
+
  glutKeyboardFunc(Keyboard);
    else
+
  glutReshapeFunc(Reshape);
    {
 
        double timer, timel, timem;
 
        timer = v.y / g;
 
        timel = 0;
 
        while(calculateForTime(v, timer).y > 0) //смотрим на некоторые значения времени, которые больше времени посадки
 
            timer *= 1.5;
 
        timem = timel + (timer - timel) / 2;
 
        r = calculateForTime(v, timem);
 
        while(abs(r.y) > e)    //бинарный поиск времени посадки
 
        {
 
            if(r.y > 0)
 
                timel = timem;
 
            else
 
                timer = timem;
 
            timem = timel + (timer - timel) / 2;
 
            r = calculateForTime(v, timem);
 
        }
 
        return r;
 
    }
 
}
 
  
Vector getCoordinatesVerletSquare(double velocity, double angle, double time = -1)
+
// Установка цвета закраски фона
{
+
  glClearColor(0.3, 0.5, 0.7, 1);
    double nowTime = dt;
+
  // Включение буфера глубины
    Vector rsb(0, 0);
+
glEnable(GL_DEPTH_TEST);
    if((dt / 2 - time > 0)and(time >= 0))  //если время слишком малое для рсчета
+
  // Включение режима вычисления цвета согласно освещенности от источников света
        return rsb; //вернитесь в начальную точку
+
glEnable(GL_LIGHTING);
    Vector v(velocity * cos(angle), velocity * sin(angle)); //проекции начальной скорости
+
// Включение источника света
    Vector r = v * dt;  //вторая точка
+
  glEnable(GL_LIGHT0);
    Vector a = -abs(v) * v * windageSquareCoefficient;  //ускорение в начальной точке
+
// Включение упрощенного режима освещенности для простого способа описания свойств поверхности
    a.y -= g;
+
  glEnable(GL_COLOR_MATERIAL);
    v = v + a * dt; //скорость во второй точке
+
// Приведение нормалей к единичной длине
    a = -abs(v) * v * windageSquareCoefficient; //ускорение во второй точке
+
  glEnable(GL_NORMALIZE);
    a.y -= g;
 
    while((r.y > 0) or ((time > 0) and (nowTime <= time)))  //когда точка выше нулевой отметки и не достигает заданного времени
 
    {
 
        Vector rn = 2 * r - rsb + a * dt * dt;  // r(t+dt) = 2*r(t)-r(t-dt)+a(t)*dt^2;
 
        v = (rn - rsb) / (2 * dt);  // v(t) = (r(t+dt)-r(t-dt))/(2*dt);
 
        rsb = r;    //updating r(t-dt) and r(t)
 
        r = rn;
 
        a = -abs(v) * v * windageSquareCoefficient; //новое a(t)
 
        a.y -= g;
 
        nowTime += dt;  //новое a(t)
 
    }
 
    return r;
 
 
}
 
}
  
void err(const char *s) //печатает сообщение об ошибке и завершает работу
+
// Деструктор
 +
sagl::anim::~anim( void )
 
{
 
{
    fputs(s, output);
+
  // Чистка памяти
     exit(1);
+
for (int i = 0; i < StockSize; i++)
 +
     delete Stock[i];
 
}
 
}
  
int main(int argc, const char *argv[])
+
/* Render function */
 +
// Отрисовка объектов
 +
void sagl::anim::Render( void )
 +
{
 +
for (int i = 0; i < StockSize; i++)
 +
Stock[i]->Render(*this);
 +
} // End of 'Render' function
 +
 
 +
/* Run function */
 +
// Запуск главного цикла
 +
void sagl::anim::Run( void )
 
{
 
{
    double velocity, angle;
+
// Запуск основного цикла построения
    bool needRead = true;
+
glutMainLoop();
    if(argc==3) //если даны 2 аргумента
+
} // End of 'Run' function
    {
+
 
        velocity = atof(argv[1]);  //истолкование его как скорости и угла
+
// END OF 'ANIM.CPP' FILE
        angle = atof(argv[2]);
+
</syntaxhighlight>
        needRead = false;
+
"'''ANIM.H'''"
    }
+
<syntaxhighlight lang="cpp" line start="1" enclose="div">
    if(needRead)
+
/* FILENAME: ANIM.H
    {
+
* LAST UPDATE: 17.01.2016
        puts("Enter initial velocity (m/s)");
+
*/
        scanf("%lf", &velocity);
 
    }
 
    if(velocity < 0)    //проверка, если скорость меньше 0
 
        err("Initial velocity must be above 0");
 
    if(needRead)
 
    {
 
        puts("Enter initial angle (0-180 degrees)");
 
        scanf("%lf", &angle);
 
    }
 
    if((angle < 0) or (angle > 180))    //проверка, что угол в нужном интервале
 
        err("Initial angle must be from 0 to 180");
 
    angle = angle / 180 * M_PI; // a = a/180*pi; преобразование угла из градусов в радианы
 
    output = fopen("Coordinates.txt", "w"); //открытие результативного файла
 
    //вычисление и печать 4 значений
 
    printCoordinate("Without windage", getCoordinatesWithoutWindage(velocity, angle));
 
    printCoordinate("Verlet, linear dependence", getCoordinatesVerletLinear(velocity, angle));
 
    printCoordinate("Accurate, linear dependence", getCoordinatesAccurateLinear(velocity, angle));
 
    printCoordinate("Verlet, square dependence", getCoordinatesVerletSquare(velocity, angle));
 
    fclose(output); //закрытие файла
 
    return 0;
 
}
 
</syntaxhighlight>
 
</div>
 
Скачать можно [http://tm.spbstu.ru/%D0%A4%D0%B0%D0%B9%D0%BB:%D0%9A%D0%BE%D0%BE%D1%80%D0%B4%D0%B8%D0%BD%D0%B0%D1%82%D1%8B.zip здесь]
 
  
<div class="mw-collapsible mw-collapsed" style="width:100%" >
+
#ifndef __ANIM_H_
 +
#define __ANIM_H_
  
 +
#include <stdio.h>
 +
#include <stdlib.h>
 +
#include <time.h>
  
'''[[Сенников Иван]]'''
+
#include <GL\glut.h>
  
'''Суть программы:'''Программа позволяет отслеживать траекторию движения тела, брошенного под углом к горизонту, в каждом из четырех случаев/методов.
+
#include "VEC.H"
  
'''Идея:''' Программа состоит из четырех методов: 1) движение тела без учета сопротивления воздуха; 2) движение тела с учетом сопротивления воздуха по первому методу Верле; 3) движение тела с учетом сопротивления воздуха по точному методу; 4) движение тела с учетом сопротивления воздуха по второму методу Верле.
+
// Константы
 +
#define Pi 3.14159265358979323846
 +
#define E 2.71828182845904523536
  
'''Инструкция:''' Результаты программы будут записаны в соответствующий файл (подробности смотри в самой программе). Пользователю будет предоставлена возможность ввести начальную скорость и угол, под которым и бросают тело.
+
// Собственное пространство имен 'sagl'
 
+
namespace sagl
Ссылка для скачиваний: [http://tm.spbstu.ru/Файл:Throws_v2.0.zip здесь].
 
 
 
</div>
 
 
 
<div class="mw-collapsible mw-collapsed" style="width:100%" >
 
'''[[Степанянц Степан]]'''
 
 
 
'''Описание программы''': программа записывает в четыре файла результаты вычисления:
 
# Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
 
# Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
 
# Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
 
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
 
 
 
Скачать можно  [http://tm.spbstu.ru/%D0%A4%D0%B0%D0%B9%D0%BB:Mainpr.rar тут].
 
 
 
<div class="mw-collapsible-content">
 
[[File:graph239.png]]
 
 
 
Для тела с массой 1,сопротивлением воздуха 0.05, угол бросания 30°, начальная скорость 40 м/с, ускорение свободного падения 9.8 м/c^2;
 
 
 
 
 
 
 
Файл "'''main.cpp'''"
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
#include <iostream>
 
#include <locale.h>
 
#include <math.h>
 
#include <fstream>
 
#include<iomanip>
 
#include <cmath>
 
using namespace std;
 
main ()
 
 
{
 
{
    ofstream F;                                                                    //a1-угол в градусах,dt-шаг,r-сопротивление воздуха
+
  // Объявления класса анимации наперед
int u0=50;
+
class anim;
double x,y,t,a,a1=30,dt=0.1,y0=0,x0=0,g=9.8,r=0.05,m=1,ux,uy,ypr,xpr,ysl,xsl,u,yt; //ux,uy - проэкции скорости на оси х и у.
+
 
a=a1*M_PI/180; //Градусы в радианы
+
// Функции получения случайных чисел
t=0;
+
inline double r0( void )
+
  {
                                        //Движение без сопротивления воздуха
+
     return rand() / (double)RAND_MAX;
F.open("C:\\1.txt",ios::out);
+
  }
while(y>=0)
+
  inline double r1( void )
{
+
  {
     x=x0+u0*cos(M_PI/6)*t;
+
    return 2.0 * rand() / RAND_MAX - 1;
    y=y0+u0*sin(M_PI/6)*t - 0.5 * g * t * t; //Расчитываем координаты в каждой точке через шаг
+
  }
  F<<x<<" "<<y<<endl;
+
 
  t=t+dt;
+
// Класс объектов
+
class object
}
+
  {
+
  public:
F.close();
+
     // Вектора перемещения и скоростей
                                        //Точное решение для линейной зависимости
+
vec P, V, AbsV;
F.open("C:\\2.txt",ios::out);
+
      
y=y0;
+
// Конструктор
x=x0;
+
object( void ) : P(vec::Rnd1()), V(vec::Rnd()), AbsV(V)
t=0;                                                                            //Расчитываем координаты в каждой точке через шаг
 
while(y>=0)
 
{
 
        ux = u0 * cos(a);
 
        uy = u0 * sin(a);
 
        x = x0+ (m * ux / r)* (1 - exp(-1 * r * t / m));                      //подстановка формул
 
        y = y0+(m/r)*((uy + g * m / r)*(1 - exp(-1 * r * t / m)) - g * t);
 
        t = t + dt;
 
 
      F << x << ' ' << y << endl;
 
 
 
 
}
 
  F.close();
 
                                                        //метод Верле 1
 
ypr = y0 - u0*sin(a)*dt;
 
yt=ypr;
 
    xpr = x0 - u0*cos(a)*dt;
 
     x = x0;                          //Начальные условия
 
    y = y0;
 
     u = u0;
 
    ux = u0 * cos(a);
 
    uy = u0 * sin(a);                       
 
F.open("C:\\3.txt",ios::out);
 
 
    while (y >= y0)
 
 
     {
 
     {
        xsl = 2 * x - xpr - (r / m) * u * ux * (dt * dt);
+
     }
        ux = ( xsl - xpr )/ (2 * dt);
+
        ysl = 2 * y - ypr - (g + (r / m) * u * uy) * (dt * dt);      //xsl,ysl - координаты на шаге вперед. xpr,ypr- назад
+
// Отрисовка объектов
        uy =  (ysl - ypr)/ (2 * dt);
+
virtual void Render( anim &Ani )
        u = sqrt(uy*uy + ux*ux );
 
        F << x << ' ' << y << endl;
 
 
        xpr = x;
 
        x = xsl;
 
        ypr = y;
 
        y = ysl;
 
     }
 
    F.close();
 
                                                      //Метод Верле 2
 
    ypr = y0 - u0*sin(a)*dt;
 
yt=ypr;
 
    xpr = x0 - u0*cos(a)*dt;
 
    x = x0;                                                                            //xsl,ysl - координаты на шаге вперед. xpr,ypr- назад
 
    y = y0;
 
    u = u0;
 
    ux = u0 * cos(a);                           
 
    uy = u0 * sin(a);
 
F.open("C:\\4.txt",ios::out);
 
 
    while (y >= y0)
 
 
     {
 
     {
        xsl = 2 * x - xpr - (r / m) * ux * (dt * dt);
+
    } // End of 'Render' function
        ux = ( xsl - xpr )/ (2 * dt);
+
  }; // end of 'object' class
        ysl = 2 * y - ypr - (g + (r / m) * uy) * (dt * dt);
+
 
        uy =  (ysl - ypr)/ (2 * dt);
+
// Класс анимации
        u = sqrt(uy*uy + ux*ux );
+
class anim
        F << x << ' ' << y << endl;
+
  {
+
  private:
        xpr = x;
+
     // Функции 'обратного вызова'
        x = xsl;
+
static void Display( void );
        ypr = y;
+
     static void Keyboard( unsigned char Key, int X, int Y );
        y = ysl;
+
    static void Reshape( int W, int H );
     }
 
     F.close();
 
 
 
return 0;
 
 
 
}
 
  
</syntaxhighlight>
+
    // Единственный экземпляр класса
</div>
+
static anim Instance;
 +
   
 +
    // Конструктор
 +
anim( void );
  
 +
// Максимальное количество объектов
 +
    static const int Max = 100;
 +
    // 'Контейнер' объектов
 +
object *Stock[Max];
 +
    // Размер 'контейнера' объектов
 +
int StockSize;
 +
   
 +
// Переменные, хранящие время в секундах
 +
    long StartTime, OldTime, PauseTime;
 +
   
 +
// Отрисовка объектов
 +
void Render( void );
 +
 +
// Подсчет времени
 +
void Timer( void );
 +
  public:
 +
    // Добавление объектов в 'контейнер'
 +
anim & operator<<( object *Obj )
 +
    {
 +
      if (StockSize < Max )
 +
        Stock[StockSize++] = Obj;
 +
      else
 +
        delete Obj;
 +
     
 +
return *this;
 +
    }
 +
   
 +
// Ширина и высота окна
 +
    int WinW, WinH;
  
<div class="mw-collapsible mw-collapsed" style="width:100%" >
+
// Переменные, хранящие время в секундах
'''[[Александр Сюрис]]'''
+
    double SyncTime, DeltaTime;
 
 
'''Описание программы''':
 
Программа записывает в текстовый файл результаты вычисления координат по x и y с шагом в 0.1 секунду(возможно изменить) четырьмя различными способами:
 
#Координаты, рассчитанные по формуле, при движении без сопротивления воздуха
 
#Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении          воздуха от скорости
 
#Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости
 
#Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости
 
Скачать можно  [http://mech.spbstu.ru/File:%D0%9F%D0%BE%D0%BB%D0%B5%D1%82_%D1%82%D0%B5%D0%BB%D0%B0(%D0%90%D0%BB%D0%B5%D0%BA%D1%81%D0%B0%D0%BD%D0%B4%D1%80%D0%A1%D1%8E%D1%80%D0%B8%D1%81).zip тут].
 
<div class="mw-collapsible-content">
 
[[File:Снимок.PNG]]
 
Для тела с массой 1,сопротивлением воздуха 0.05, угол бросания 45°, начальная скорость 30 м/с, ускорение свободного падения 9.8 м/c^2;
 
Файл "'''main.cpp'''"
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
#include <iostream>
 
#include <fstream>
 
#include <math.h>
 
#include <cmath>
 
using namespace std;
 
int o;
 
double v,a,m,k;
 
ofstream fout("file.txt");//создаем объект, сяванный с файлом file.txt
 
 
 
  
 +
    // Переменная, отвечающая за паузу
 +
bool IsPause;
  
int rez_1(double v, double a)
+
    // Деструктор
{
+
~anim( void );
    fout<<"---------------Первый режим-------------------------"<<endl;
+
      
     fout<<" T=0 x=0 y=0";
+
// Запуск главного цикла
    fout<<endl;
+
void Run( void );
    double x=0,y=0,t=0.1, V0x, V0y, g=9.8,t1, T=0.1, Ty;
+
      
    V0x=v*cos(a/180*M_PI);//рассчет проекций начальных скоростей на оси x и y с переводом угла в радианы
+
     // Метод, возвращающий переменную - единственный экземпляр данного типа
     V0y=v*sin(a/180*M_PI);
+
static anim & Get( void )
     Ty=2*V0y/g;//время полета
 
    while (y>0 || x==0)//условие: пока тело не упадет на землю(те y=0, при этом не учитывая начало полета
 
 
     {
 
     {
        x=x+V0x*t;               //ф-лы для рассчета x и y в данный момент времени
+
      return Instance;
        y=y+V0y*t-g*pow(t,2)/2;
+
    }
 +
  }; // end of 'anim' class
 +
} // end of 'sagl' namespace
  
        if (y<0) //если y<0
+
#endif /*__ANIM_H_ */
            {
 
                t1=Ty-T; //рассчитываем время,которое осталось лететь телу до земли
 
                x=x+V0x*t1;//используя это время находим координату по х
 
                fout<<" T="<<Ty<<" x="<<x<<" y=0"<<endl;//ввод в текстовый файл
 
                break;
 
            }
 
            else
 
                {
 
                    V0y=V0y-g*t;// иначе находим новую скорость по y (по x не меняется)
 
                    fout<<" T="<<T<<" x="<<x<<" y="<<y<<endl;
 
                    T=T+t;//увел время на шаг
 
                }
 
    }
 
  
 +
// END OF 'ANIM.H' FILE
 +
</syntaxhighlight>
 +
"'''VEC.H'''"
 +
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 +
/* FILENAME: VEC.H
 +
* LAST UPDATE: 17.01.2016
 +
*/
  
}
+
#ifndef __VEC_H_
 +
#define __VEC_H_
  
 +
#include <stdlib.h>
 +
#include <math.h>
  
int rez_2(double v, double a, double k, double m)
+
// Собственное пространство имен 'sagl'
 +
namespace sagl
 
{
 
{
    fout<<"---------------Второй режим работы-------------------------"<<endl;
+
  // Класс векторов
    fout<<" T=0 x=0 y=0";
+
class vec
    fout<<endl;
+
  {
     double t=0.1, Vx=v*cos(a/180*M_PI), Vy=v*sin(a/180*M_PI),y,x,T=0.1,g=9.8;
+
  public:
     x=(m*Vx/k)*(1-exp(-1*k*T/m));            //ф-лы для рассчета x и y в данный момент времени
+
     // Координаты вектора
    y =(m/k)*((Vy+g*m/k)*(1-exp(-1*k*T/m))-g*T);  //точное решение при лин завсисимости
+
double X, Y, Z;
    while (y>0)
+
      
 +
// Конструктор
 +
vec( void ) : X(0), Y(0), Z(0)
 +
    {
 +
    }
 +
   
 +
// Конструктор
 +
vec( double A, double B, double C ) : X(A), Y(B), Z(C)
 +
    {
 +
    }
 +
   
 +
// Функции получения случайных чисел
 +
static double R0( void )
 
     {
 
     {
        x=(m*Vx/k)*(1-exp(-1*k*T/m));
+
      return rand() / (double)RAND_MAX;
        y =(m/k)*((Vy+g*m/k)*(1-exp(-1*k*T/m))-g*T);
 
        fout<<" T="<<T<<" x="<<x<<" y="<<y<<endl;
 
        T=T+t;
 
 
     }
 
     }
 
+
      
 
+
static double R1( void )
}
+
     {
 
+
      return 2 * rand() / (double)RAND_MAX - 1;
 
+
     }
 
+
      
int rez_3(double v, double a, double k, double m)
+
// Функции получения случайных векторов
{
+
static vec Rnd( void )
  fout<<"---------------Третий режим работы-------------------------"<<endl;
 
    fout<<" T=0 x=0 y=0";
 
     fout<<endl;
 
    double t=0.1, Vxn=v*cos(a/180*M_PI), Vyn=v*sin(a/180*M_PI),
 
     x3=0,x2=0,x1=x2-Vxn*t,  y3=0,
 
    y2=0, y1=y2-Vyn*t, g=9.8, t1, T=0.1;//шаг, скорость по х в момент времени T, -\\- по y в момент времени Т
 
    //координата по х в в момент времени T, -\\- в n-1 шаг, -\\- в n шаге, аналогично для y,
 
 
 
 
 
    x3=2*x2-x1-k/m*Vxn*pow(t,2);  //координаты в момент времени T
 
    y3=2*y2-y1-(g-+k/m*Vyn)*pow(t,2);
 
    Vxn=(x3-x1)/(2.0*t); //скорость в момент времени T
 
    Vyn=(y3-y1)/(2.0*t);
 
     x1=x2;// приравнивание к координате на n-1 шаге значение координаты в n шаге
 
     y1=y2;
 
    x2=x3;//-//- к координате в n шаге значение в момент времени T
 
    y2=y3;
 
    while (y2>0)
 
 
     {
 
     {
        x3=2*x2-x1-k/m*Vxn*pow(t,2);
+
      return vec(R0(), R0(), R0());
        y3=2*y2-y1-(g+k/m*Vyn)*pow(t,2);
+
    }
        Vxn=(x3-x1)/(2.0*t);
+
   
        Vyn=(y3-y1)/(2.0*t);
+
static vec Rnd1( void )
        fout<<" T="<<T<<" x="<<x2<<" y="<<y2<<endl;
+
    {
 
+
      return vec(R1(), R1(), R1());
        if (y3<0)
+
    }
        {
+
            t1=sqrt(abs((-y1+2*y2)/(g+k/m*Vyn)));
+
vec operator+( vec V )
            x3=2*x2-x1-k/m*Vxn*pow((t+t1),2);
+
{
            fout<<" T="<<T+t1<<" x="<<x3<<" y="<<0<<endl;
+
return vec(X + V.X, Y + V.Y, Z + V.Z);
        }
+
}
 
+
        T=T+t;
+
vec operator*( double t )
        x1=x2;
+
    {
        y1=y2;
+
      return vec(X * t, Y * t, Z * t);
        x2=x3;
 
        y2=y3;
 
 
 
 
     }
 
     }
 +
   
 +
vec & operator+=( const vec &V )
 +
    {
 +
      X += V.X;
 +
      Y += V.Y;
 +
      Z += V.Z;
 +
     
 +
return *this;
 +
    }
 +
 +
// Длина вектора
 +
double operator!(void) const
 +
{
 +
return sqrt(X * X + Y * Y + Z * Z);
 +
} /* end of 'operator!' function */
 +
  }; // end of 'vec' class
 +
} // end of 'sagl' namespace
 +
 +
#endif /*__VEC_H_ */
  
}
+
// END OF 'VEC.H' FILE
 
+
</syntaxhighlight>
 
+
"'''SAMPLE.H'''"
int rez_4(double v, double a, double k, double m)
+
<syntaxhighlight lang="cpp" line start="1" enclose="div">
{
+
/* FILENAME: SAMPLE.H
  fout<<"---------------Четвертый режим работы-------------------------"<<endl;
+
* LAST UPDATE: 17.01.2016
    fout<<" T=0 x=0 y=0";
+
*/
    fout<<endl;
 
    double t=0.1, Vxn=v*cos(a/180*M_PI), Vyn=v*sin(a/180*M_PI),
 
    x3=0,x1=0, x2=x1+Vxn*t, y3=0, y1=0,
 
    y2=y1+Vyn*t, g=9.8, t1, T=0.1, V=v;//шаг, скорость по х в момент времени T, -\\- по y в момент времени Т
 
    //координата по х в в момент времени T, -\\- в n-1 шаг, -\\- в n шаге, аналогично для y,
 
 
 
  
    x3=2.0*x2-x1-(k/m)*V*Vxn*pow(t,2);
+
#ifndef __SAMPLE_H_
    y3=2.0*y2-y1-(g+(k/m)*V*Vyn)*pow(t,2);
+
#define __SAMPLE_H_
    Vxn=(x3-x1)/(2.0*t);
 
    Vyn=(y3-y1)/(2.0*t);
 
    V=sqrt(pow(Vxn,2)+pow(Vyn,2.0));
 
    x1=x2;
 
    y1=y2;
 
    x2=x3;
 
    y2=y3;
 
    while (y2>0)
 
    {
 
        x3=2.0*x2-x1-(k/m)*Vxn*V*pow(t,2);
 
        y3=2.0*y2-y1-(g+(k/m)*Vyn*V)*pow(t,2);
 
        Vxn=(x3-x1)/(2.0*t);
 
        Vyn=(y3-y1)/(2.0*t);
 
        V=sqrt(pow(Vxn,2)+pow(Vyn,2));
 
        fout<<" T="<<T<<" x="<<x2<<" y="<<y2<<endl;
 
  
        if (y3<0)
+
#include <math.h>
        {
 
            t1=sqrt(abs((-y1+2.0*y2)/(g+(k/m)*Vyn*V)));
 
            x3=2.0*x2-x1-(k/m)*Vxn*V*pow((t+t1),2);
 
            fout<<" T="<<T+t1<<" x="<<x3<<" y="<<0<<endl;
 
        }
 
  
 +
#include "ANIM.H"
  
        T=T+t;
+
// Шар, летящий без сопротивлением воздуха
        x1=x2;
+
class ball : public sagl::object
        y1=y2;
 
        x2=x3;
 
        y2=y3;
 
 
 
    }
 
 
 
}
 
 
 
 
 
int main()
 
 
{
 
{
 +
private:
 +
  double angle, v; // угол вектора скорости к горизонту; модуль скорости
 +
public:
 +
  // Конструктор
 +
ball( void ) : angle(Pi / 3), v(1)
 +
  {
 +
P = sagl::vec(sagl::r0() + 5, 5, 0);
 +
V.X = 0;
 +
V.Y = sin(angle) * v;
 +
V.Z = cos(angle) * v;
 +
  }
 +
 +
// Конструктор
 +
ball( double angle1, double v1 ) : angle(angle1), v(v1)
 +
{
 +
P = sagl::vec(sagl::r0() + 5, 5, 0);
 +
V.X = 0;
 +
V.Y = sin(angle) * v;
 +
V.Z = cos(angle) * v;
 +
}
 +
 
 +
// Отрисовка объекта
 +
void Render( sagl::anim &Ani )
 +
  {
 +
// Вектор ускорения свободного падения
 +
sagl::vec g = sagl::vec(0, -9.8, 0);
 +
// Размер комнаты
 +
double Size = 120;
 +
 +
// Изменение вектора скорости
 +
V += g * Ani.DeltaTime;
 +
// Изменение вектора перемещения
 +
P += V * Ani.DeltaTime;
  
setlocale(LC_ALL, "rus");
+
// Ограничения - стенки
cout<<"Введите скорость тела и угол"<<endl;
+
if (P.X > Size / 4)
cin>>v>>a;
+
V.X = -fabs(V.X);
 
+
if (P.X < -Size / 4)
while (1>0){
+
V.X = fabs(V.X);
cout<<"Выберите режим работы программы:"<<endl;
 
cout<<"1 - Координаты, рассчитанные по формуле, при движении без сопротивления воздуха"<<endl;
 
cout<<"2 - Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости"<<endl;
 
cout<<"3- Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости"<<endl;
 
cout<<"4 - Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости"<<endl;
 
cout<<"5 - Выйти";
 
cin>>o;
 
  
if (o==1)
+
if (P.Y > Size / 4)
    rez_1(v,a);
+
V.Y = -fabs(V.Y);
if (o==2)
+
if (P.Y < -Size / 4)
    {
+
      V.Y = fabs(V.Y);
    cout<<"Введите массу тела и коэф сопротивления воздуха:"<<endl;
 
    cin>>m>>k;
 
    rez_2(v,a,k,m);
 
    }
 
  
if (o==3)
+
if (P.Z > Size / 4)
     {
+
V.Z = -fabs(V.Z);
    cout<<"Введите массу тела и коэф сопротивления воздуха:"<<endl;
+
if (P.Z < -Size / 4)
    cin>>m>>k;
+
V.Z = fabs(V.Z);
    rez_3(v,a,k,m);
+
     }
+
     // Запоминание состояния изменения текущей СК
  if (o==4)
+
glPushMatrix();
    {
+
    cout<<"Введите массу тела и коэф сопротивления воздуха:"<<endl;
+
// Рисование стенок
    cin>>m>>k;
+
glutWireCube(Size / 2);
    rez_4(v,a,k,m);
+
// Задача перемещения мяча
     }
+
glTranslated(P.X, P.Y, P.Z);
  if (o==5)
+
     // Цвет мяча
        break;
+
glColor3d(0, 1, 0);
 +
// Рисование мяча
 +
glutSolidSphere(0.5, 30, 30);
 +
      
 +
// Восстановление последнего запоминания состояния изменения текущей СК
 +
glPopMatrix();
 +
  }
 +
}; // end of 'ball' class
  
            }
+
// Шар, летящий с сопротивлением воздуха
}
+
// Координаты получены методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости
 
+
class ball_air : public sagl::object
 
+
{
</syntaxhighlight>
+
private:
</div>
+
double angle, v, m, n;
 
+
public:
 
+
// Конструктор
<div class="mw-collapsible mw-collapsed" style="width:100%" >
+
ball_air( void ) : angle(Pi / 3), v(1), m(1), n(0.1)
'''[[Тимошенко Валентина]]'''
+
{
 +
P = sagl::vec(sagl::r0() + 5, 5, 0);
 +
V.X = 0;
 +
V.Y = sin(angle) * v;
 +
V.Z = cos(angle) * v;
 +
}
 +
 +
// Конструктор
 +
ball_air( double angle1, double v1, double m1, double n1 ) : angle(angle1), v(v1), m(m1), n(n1)
 +
{
 +
P = sagl::vec(sagl::r0() + 5, 5, 0);
 +
V.X = 0;
 +
V.Y = sin(angle) * v;
 +
V.Z = cos(angle) * v;
 +
}
 +
 +
// Отрисовка объекта
 +
void Render( sagl::anim &Ani )
 +
{
 +
// Вектор ускорения свободного падения и вектор полного ускорения
 +
sagl::vec g = sagl::vec(0, -9.8, 0), a;
 +
// Размер комнаты
 +
double Size = 120;
  
'''Описание программы''': при запуске пользователь вводит шаг функции, угол, под которым бросают тело, массу тела, сопротивление воздуха и скорость.  
+
// Изменение вектора ускорения
Программа записывает в четыре файла результаты вычисления:
+
a = sagl::vec(0, g.Y - n / m * !V * V.Y, -n / m * !V * V.Z);
#Координаты, рассчитанные по формуле для движения без сопротивления воздуха;
 
#Координаты, рассчитанные по формуле для движения с учетом сопротивления воздуха;
 
#Координаты, полученные методом Верле при квадратичной зависимости силы сопротивления воздуха от скорости.
 
#Координаты, полученные методом Верле при линейной зависимости силы сопротивления воздуха от скорости;
 
  
Скачать можно  [http://tm.spbstu.ru/Файл:motion.zip тут.]
+
// Изменение вектора скорости
 +
V += a * Ani.DeltaTime;
 +
// Изменение вектора перемещения
 +
P += V * Ani.DeltaTime;
  
<div class="mw-collapsible-content">
+
// Ограничения - стенки
 +
if (P.X > Size / 4)
 +
V.X = -fabs(V.X);
 +
if (P.X < -Size / 4)
 +
V.X = fabs(V.X);
  
'''Визуализированный результат работы программы'''
+
if (P.Y > Size / 4)
[[File:Grafics.png]]
+
V.Y = -fabs(V.Y);
 +
if (P.Y < -Size / 4)
 +
V.Y = fabs(V.Y);
  
Графики приведены для движения тела массой 1, со скоростью 50, под углом 45 градусов. Сопротивление воздуха принято равным 0.0001, шаг 0,1.
+
if (P.Z > Size / 4)
 
+
V.Z = -fabs(V.Z);
<syntaxhighlight lang="cpp" line start="1" enclose="div">
+
if (P.Z < -Size / 4)
 
+
V.Z = fabs(V.Z);
#include <iostream> ///программа, подсчитывающая и записывающая в файл координаты движения тела для двух вариантов метода Верле
+
#include <fstream> /// и для движений с учётом сопротивления и без его учёта
+
// Запоминание состояния изменения текущей СК
#include <math.h>
+
glPushMatrix();
#include<stdlib.h>
+
using namespace std;
+
// Рисование стенок
 
+
glutWireCube(Size / 2);
int main()
+
// Задача перемещения мяча
 +
glTranslated(P.X, P.Y, P.Z);
 +
// Цвет мяча
 +
glColor3d(1, 0, 0);
 +
// Рисование мяча
 +
glutSolidSphere(0.5, 30, 30);
 +
 +
// Восстановление последнего запоминания состояния изменения текущей СК
 +
glPopMatrix();
 +
}
 +
}; // end of 'ball_air' class
 +
 
 +
// Шар, летящий с сопротивлением воздуха
 +
// Координаты получены из точного решения при линейной зависимости силы сопротивлении воздуха от скорости
 +
class ball_air_2 : public sagl::object
 
{
 
{
    double a, step, Pi, g, Vo, m, r;
+
private:
    ///а - угол, под которым движется тело, step - шаг функции, Vo - начальная скорость тела, m - масса тела, r - величина сопротивления
+
double angle, v, m, n;
 
+
public:
    double x, y, x_0, y_0, x0, y0, Vx, Vy;
+
// Конструктор
    ///переменные для движения точки без учёта сопротивления и с его учётом
+
ball_air_2( void ) : angle(Pi / 3), v(1), m(1), n(0.1)
    ///х - изменяющаяся пошагово координата тела по оси Ох, у - изменяющаяся пошагово координата тела по оси Оу,
+
{
    ///х0 - начальная координата тела по оси Ох, у0 - начальная координата тела по оси Оу
+
P = sagl::vec(sagl::r0() + 5, 5, 0);
    ///Vx - скорость тела по оси Ох, Vу - скорость тела по оси Оу
+
V.X = 0;
    ///x_0 - изменяющаяся пошагово координата тела по оси Ох с учётом сопротивления, у_0 - изменяющаяся пошагово координата тела по оси Оу с учётом сопротивления
+
V.Y = sin(angle) * v;
 
+
V.Z = cos(angle) * v;
    double Vy0, Vx0, x1, x2, x3, y1, y2, y3, Vxn, Vyn, Vn;
+
}
    ///переменные для 1го варианта метода Верле
+
    ///х1 - координата тела по оси Ох на (n-1) шаге, х2 - координата тела по оси Ох на (n) шаге, х3 - координата тела по оси Ох на (n+1) шаге
+
// Конструктор
    ///у1 - координата тела по оси Оу на (n-1) шаге, у2 - координата тела по оси Оу на (n) шаге, у3 - координата тела по оси Оу на (n+1) шаге
+
ball_air_2( double angle1, double v1, double m1, double n1 ) : angle(angle1), v(v1), m(m1), n(n1)
    ///Vx0 - начальная скорость тела по оси Ох, Vy0 - начальная скорость тела по оси Оу
+
{
    ///Vxn - скорость тела в данный момент времени по оси Ох, Vyn - скорость тела в данный момент времени по оси Оу
+
P = sagl::vec(sagl::r0() + 5, 5, 0);
 +
V.X = 0;
 +
V.Y = sin(angle) * v;
 +
V.Z = cos(angle) * v;
 +
}
 +
 +
// Отрисовка объекта
 +
void Render( sagl::anim &Ani )
 +
{
 +
// Вектор ускорения свободного падения и вектор полного ускорения
 +
sagl::vec g = sagl::vec(0, -9.8, 0), a;
 +
// Размер комнаты
 +
double Size = 120;
  
    double Vxn2, Vyn2, x_1, x_2, x_3, y_1, y_2, y_3;
+
// Изменение вектора скорости
    ///переменные для 2го варианта метода Верле
+
V.Z = V.Z * exp(-n / m * Ani.DeltaTime);
    ///х_1 - координата тела по оси Ох на (n-1) шаге, х_2 - координата тела по оси Ох на (n) шаге, х_3 - координата тела по оси Ох на (n+1) шаге
+
V.Y = (V.Y - g.Y * m / n) * exp(-n / m * Ani.DeltaTime) + g.Y * m / n;
    ///у_1 - координата тела по оси Оу на (n-1) шаге, у_2 - координата тела по оси Оу на (n) шаге, у_3 - координата тела по оси Оу на (n+1) шаге
+
// Изменение вектора перемещения
    ///Vxn2 - скорость тела в данный момент времени по оси Ох, Vyn2 - скорость тела в данный момент времени по оси Оу
+
P += V * Ani.DeltaTime;
  
    g=10; ///значение ускорения свободного падения
+
// Ограничения - стенки
    Pi=3.14159265; /// значение числа П, используем для перевода радиан в градусы
+
if (P.X > Size / 4)
 +
V.X = -fabs(V.X);
 +
if (P.X < -Size / 4)
 +
V.X = fabs(V.X);
  
    do ///цикл, запрашивающий ввод пользователем значения шага функции
+
if (P.Y > Size / 4)
    {
+
V.Y = -fabs(V.Y);
        cout << "Input the step, it must be less than 1" << endl; ///ввод с клавиатуры шага(то же самое, что дельта t), шаг должен быть маленьким (меньше 1)
+
if (P.Y < -Size / 4)
        cin >> step;  ///вывод величины шага на экран
+
V.Y = fabs(V.Y);
    }
 
    while (step>=1); ///выход из цикла не будет обеспечен, пока пользователь не введет число, меньшее 1
 
  
    cout << '\n' << "Input the corner in degrees,the corner is in the range from 0 to 90 degrees" << endl; ///ввод с клавиатуры угла в радианах (угол от 0 до 90 градусов)
+
if (P.Z > Size / 4)
    cin >> a; ///вывод значение угла на экран
+
V.Z = -fabs(V.Z);
    a=(Pi*a)/180.0;
+
if (P.Z < -Size / 4)
    cout << '\n' << "Input the weight" << endl; ///ввод с клавиатуры значения массы
+
V.Z = fabs(V.Z);
    cin >> m; ///вывод величины массы на экран
 
  
    do ///цикл, запрашивающий ввод пользователем значения сопротивления воздуха
+
// Запоминание состояния изменения текущей СК
    {
+
glPushMatrix();
        cout << '\n' << "Input the value of the resistance, it must be less than 1" << endl; ///ввод с клавиатуры величины сопротивления
 
        cin >> r; ///вывод значения сопротивления на экран
 
    }
 
    while (r>=1); ///выход из цикла не будет обеспечен, пока пользователь не введет число, меньшее 1
 
  
    cout << '\n' << "Input the speed" << endl; ///ввод с клавиатуры значения начальной скорости
+
// Рисование стенок
    cin >> Vo; ///вывод значения скорости на экран
+
glutWireCube(Size / 2);
 +
// Задача перемещения мяча
 +
glTranslated(P.X, P.Y, P.Z);
 +
// Цвет мяча
 +
glColor3d(0, 1, 1);
 +
// Рисование мяча
 +
glutSolidSphere(0.5, 30, 30);
 +
 +
// Восстановление последнего запоминания состояния изменения текущей СК
 +
glPopMatrix();
 +
}
 +
}; // end of 'ball_air_2' class
  
    ///для движения без учёта сопротивления
+
// Шар, летящий с сопротивлением воздуха
    x0=0; ///обнуление переменных
+
// Координаты получены методом Верле при линейной зависимости силы сопротивлении воздуха от скорости
    y0=0;
+
class ball_air_3 : public sagl::object
    x=0;
+
{
    y=0;
+
private:
 
+
double angle, v, m, n;
    ///для движения с учётом сопротивления
+
public:
    x_0=0; ///обнуление переменных
+
// Конструктор
    y_0=0;
+
ball_air_3( void ) : angle(Pi / 3), v(1), m(1), n(0.1)
 
+
{
    ///для 1го варианта метода Верле
+
P = sagl::vec(sagl::r0() + 5, 5, 0);
 
+
V.X = 0;
    Vx0=Vo*cos(a); ///расчет проекции начальной скорости по оси Ох
+
V.Y = sin(angle) * v;
    Vy0=Vo*sin(a); ///расчет проекции начальной скорости по оси Оу
+
V.Z = cos(angle) * v;
 +
}
 +
 +
// Конструктор
 +
ball_air_3( double angle1, double v1, double m1, double n1 ) : angle(angle1), v(v1), m(m1), n(n1)
 +
{
 +
P = sagl::vec(sagl::r0() + 5, 5, 0);
 +
V.X = 0;
 +
V.Y = sin(angle) * v;
 +
V.Z = cos(angle) * v;
 +
}
 +
 +
// Отрисовка объекта
 +
void Render( sagl::anim &Ani )
 +
{
 +
// Вектор ускорения свободного падения и вектор полного ускорения
 +
sagl::vec g = sagl::vec(0, -9.8, 0), a;
 +
// Размер комнаты
 +
double Size = 120;
  
    x2=0; ///обнуление переменных
+
// Изменение вектора ускорения
    y2=0;
+
a = sagl::vec(0, g.Y - n / m * V.Y, -n / m * V.Z);
    x3=0;
 
    y3=0;
 
  
    y1=y2-Vy0*step; ///расчет начального значения координаты по оси Оу
+
// Изменение вектора скорости
    x1=x2-Vx0*step; ///расчет начального значения координаты по оси Ох
+
V += a * Ani.DeltaTime;
 +
// Изменение вектора перемещения
 +
P += V * Ani.DeltaTime;
  
    ///для 2го варианта метода Верле
+
// Ограничения - стенки
 
+
if (P.X > Size / 4)
    x_2=0; ///обнуление переменных
+
V.X = -fabs(V.X);
    y_2=0;
+
if (P.X < -Size / 4)
    x_3=0;
+
V.X = fabs(V.X);
    y_3=0;
 
  
    Vxn2=Vo*cos(a); ///расчет скорости тела на начальный момент времени по оси Ох
+
if (P.Y > Size / 4)
    Vyn2=Vo*sin(a); ///расчет скорости тела на начальный момент времени по оси Оу
+
V.Y = -fabs(V.Y);
 +
if (P.Y < -Size / 4)
 +
V.Y = fabs(V.Y);
  
    y_1=y_2-Vo*sin(a)*step; ///расчет начального значения координаты на (п-1) шаге по оси Оу
+
if (P.Z > Size / 4)
    x_1=-Vo*cos(a)*step;   ///расчет начального значения координаты на (п-1) шаге по оси Ох
+
V.Z = -fabs(V.Z);
 +
if (P.Z < -Size / 4)
 +
V.Z = fabs(V.Z);
  
    ofstream out("For method without resistance.txt");
+
// Запоминание состояния изменения текущей СК
    ///запись в файл значений координат по осям Ох и Оу для движения без сопротивления
+
glPushMatrix();
  
    for (int i=0; y>=0; ++i) ///цикл для подсчета координат при движении тела без учёта сопротивления
+
// Рисование стенок
    {
+
glutWireCube(Size / 2);
        x=Vo*step*i*cos(a); ///расчет координаты тела по оси х
+
// Задача перемещения мяча
        y=Vo*sin(a)*i*step-(g*i*step*i*step)*0.5; ///расчет координаты тела по оси y
+
glTranslated(P.X, P.Y, P.Z);
 
+
// Цвет мяча
        out << x << "    " << y <<'\n'; ///вывод всех значений координат по оси х и по оси у при движении тела без учёта сопротивления
+
glColor3d(1, 0.5, 0);
    }
+
// Рисование мяча
    out.close();
+
glutSolidSphere(0.5, 30, 30);
 +
 +
// Восстановление последнего запоминания состояния изменения текущей СК
 +
glPopMatrix();
 +
}
 +
}; // end of 'ball_air_3' class
  
    ofstream out1 ("For method with resistance.txt");
+
#endif /*__SAMPLE_H_ */
    ///запись в файл значений координат по осям Ох и Оу для движения с учётом сопротивления
 
  
    for (int i=0; y_0>=0; ++i) ///цикл для подсчета координат при движении тела с учётом сопротивления
+
// END OF 'SAMPLE.H' FILE
    {
+
</syntaxhighlight>
        Vx=Vo*cos(a); ///расчет скорости тела по оси Ох
+
</div>
        Vy=Vo*sin(a); ///расчет скорости тела по оси Оу
+
[http://tm.spbstu.ru/File:T06BALL.7z Скачать архив]
        x_0=x0+(m/r)*Vx*(1.0 - exp((-r*i*step)/m)); ///расчет координаты тела по оси х
+
<br>
        y_0=y0+(m/r)*(Vy+g*(m/r))*(1.0 - exp((-r*i*step)/m))-g*i*step*(m/r); ///расчет координаты тела по оси y
 
  
        out1 << x_0 << "    " << y_0 <<'\n';  ///вывод всех значений координат по оси х и по оси у при движении c учётом сопротивления
 
    }
 
    out1.close();
 
  
    ofstream out2 ("For method Verle 1.txt");
 
    ///запись в файл значений координат по осям Ох и Оу для 1го варианта метода Верле
 
  
    for (int i=0; y3>=0; ++i) ///цикл для подсчета координат и скорости по времени для 1го варианта метода Верле
 
    {
 
        x3=2*x2-x1-(r/m)*Vn*Vxn*step*step; ///расчет координаты в данный момент времени по оси Ох
 
        y3=2*y2-y1-(g+(r/m)*Vn*Vyn)*step*step; ///расчет координаты в данный момент времени по оси Оу
 
        Vxn=(x3-x1)/(2.0*step); ///расчет скорости в данный момент времени по оси Оу
 
        Vyn=(y3-y1)/(2.0*step); /// расчет скорости в данный момент времени по оси Ох
 
        Vn=sqrt(Vxn*Vxn+Vyn*Vyn); ///расчет скорости тела по модулю
 
  
        x1=x2; ///присваивание значению координаты х1 на (n-1) шаге значение координаты х2 на n шаге
+
'''[[Лобанов Илья]]'''
        x2=x3; ///присваивание значению координаты х2 на (n) шаге значение координаты х3 на (n+1) шаге
 
        y1=y2; ///присваивание значению координаты у1 на (n-1) шаге значение координаты у2 на n шаге
 
        y2=y3; ///присваивание значению координаты у2 на (n) шаге значение координаты у3 на (n+1) шаге
 
  
        out2 << x3 << "  " << y3 <<'\n'; ///вывод всех значений координат по оси Ох и по оси Оу на экран для 1го варианта метода Верле
+
'''Описание программы''' : программа записывает в четыре файла результаты вычисления:
    }
 
    out2.close();
 
  
    ofstream out3 ("For method Verle 2.txt");
+
Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
    ///запись в файл значений координат по осям Ох и Оу для 2го варианта метода Верле
+
Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
 +
Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
 +
Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
  
    for (int i=0; y_3>=0; ++i) ///цикл для подсчета координат и скорости по времени для 2го варианта метода Верле
 
    {
 
        x_3=2*x_2-x_1-(r/m)*Vxn2*step*step; ///расчет координаты в данный момент времени по оси Ох
 
        y_3=2*y_2-y_1-(g+(r/m)*Vyn2)*step*step; ///расчет координаты в данный момент времени по оси Оу
 
        Vxn2=(x_3-x_1)/(2.0*step); ///расчет скорости в данный момент времени по оси Оу
 
        Vyn2=(y_3-y_1)/(2.0*step); ///расчет скорости в данный момент времени по оси Ох
 
  
        x_1=x_2; ///присваивание значению координаты х_1 на (n-1) шаге значение координаты х_2 на n шаге
+
'''Краткая инструкция''':
        x_2=x_3; ///присваивание значению координаты х_2 на (n) шаге значение координаты х_3 на (n+1) шаге
 
        y_1=y_2; ///присваивание значению координаты у_1 на (n-1) шаге значение координаты у_2 на n шаге
 
        y_2=y_3; ///присваивание значению координаты у_2 на (n-1) шаге значение координаты у_3 на (n+1) шаге
 
  
        out3 << x_3 << "  " << y_3 <<'\n'; ///вывод на экран всех значений координат по оси Ох и по оси Оу для 2го варианта метода Верле
+
В окне консоли пользователю предлагается вывести следующие значения: начальную скорость , угол и шаг.
 +
После этого полученные в результате работы программы данные выводятся в файл.
  
    }
+
Скачивать [[http://tm.spbstu.ru/File:Air.rar тут]]
    out3.close();
+
[[http://tm.spbstu.ru/File:phys.rar тут]]
 +
 
 +
</div>
 +
 
 +
 
 +
 
 +
</div>
 +
 
 +
'''[[Капитанюк Светлана]]'''
 +
 
 +
'''Описание программы''' : программа записывает в четыре файла результаты вычисления:
 +
 
 +
Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
 +
Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
 +
Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
 +
Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
 +
 
 +
Скачивать [http://tm.spbstu.ru/File:Point_03.zip тут]
 +
 
 +
</div>
 +
 
 +
</div>
 +
 
 +
'''[[Бальцер Анастасия]]'''
 +
 
 +
'''Описание программы''' : программа записывает в четыре файла результаты вычисления:
 +
 
 +
Координаты, рассчитанные по формуле, при движении без сопротивления воздуха;
 +
Координаты, полученные методом Верле при линейной зависимости силы сопротивлении воздуха от скорости;
 +
Координаты, полученные из точного решения, при линейной зависимости силы сопротивлении воздуха от скорости;
 +
Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
 +
 
 +
Посмотреть программу можно [http://tm.spbstu.ru/File:falling.zip здесь]
  
    cout << '\n' << "All results are saved in files." << endl; ///вывод на экран сообщения о записи в файл всех результатов
 
    cout << '\n' << "The program is finished." << endl; ///вывод на экран сообщения о завершении работы программы
 
    return 0;
 
}
 
</syntaxhighlight>
 
 
</div>
 
</div>
  
 
<div class="mw-collapsible mw-collapsed" style="width:100%" >
 
<div class="mw-collapsible mw-collapsed" style="width:100%" >
'''[[Уманский Александр]]'''  
+
'''[[Демченко Артём]]'''  
  
 
'''Описание программы''': программа записывает в четыре файла результаты вычисления:
 
'''Описание программы''': программа записывает в четыре файла результаты вычисления:
Строка 3167: Строка 2936:
 
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
 
# Координаты, полученные методом Верле при квадратичной зависимости силы сопротивлении воздуха от скорости.
  
<div class="mw-collapsible-content">
+
''' Инструкция ''':
 +
Пользователь вводит начальные данные ( массу, скорость, угол броска, шаг по времени и сопротивление воздуха). Выбираем режим работы программы, после этого в папке с программой создается файл, который требуется открыть программой gnuplot для просмотра графика, построенного на полученных координатах.
  
[[File:Methods.rar|Скачать архив]]
 
  
[[File:1.png]]
+
<div class="mw-collapsible-content">
 +
 
 +
 
 +
 
 +
'''Визуализированный результат работы программы'''
 +
 
 +
[[:File:Throws.png]]
  
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
 
<syntaxhighlight lang="cpp" line start="1" enclose="div">
  
</syntaxhighlight>
+
#include <iostream>
 +
#include <math.h>
 +
#include <iomanip>
 +
#include <fstream>
 +
#include <conio.h>
 +
#include <stdio.h>
 +
 
 +
 
 +
using namespace std;
 +
 
 +
double g = 9.8, Pi = 3.1415; // Задаем две глобальные переменные ускорения свободного падения и числа Pi
 +
 
 +
int WoutR(double alpha, double dt, double t, double Yo, double Vo) // Функция, записывающая в файл Throws Without Resistance.txt координаты тела, которое движется без сопротивления
 +
{
 +
    FILE *Coord;
 +
  Coord = fopen ("Throws Without Resistance.txt", "w");
 +
    double X = 0, Y = 0; // Координаты начала
 +
 
 +
    while ( Y >= Yo) // Yo используем для того, чтобы цикл прекратился тогда, когда тело упадет
 +
    {
 +
 
 +
      X =  Vo*t*cos(alpha);
 +
      Y =  Vo*t*sin(alpha) - (g*t*t)*0.5;
 +
      t+= dt;
 +
    if (Y > Yo )
 +
        fprintf(Coord, "%.3lf \t %.3lf\n", X, Y);
 +
    else
 +
        fprintf(Coord, "%.3lf \t %.3lf\n", X, 0.000); // Используем такой else для того, чтобы не получить отрицательную координату
 +
    }
 +
 
 +
}
 +
 
 +
int ExactForm(double alpha, double dt, double t, double Yo, double Vo, double R, double m) // Функция, записывающая в файл ExactForm.txt координаты тела, рассчитывающиеся по формлуе точного решения
 +
{                                                                                          // для линейной зависимости
 +
    FILE *Coord;
 +
  Coord = fopen ("ExactForm.txt", "w");
 +
    double X, Y = 0, Vx, Vy;
 +
 
 +
    while ( Y >= Yo) // Использование Yo аналогично использованию в прошлом пункте.
 +
    {
 +
 
 +
      X = ((m*Vx)/R) * (1 - exp(((-1)*R*t)/m));
 +
      Y = (m/R)*((Vy + (g*m)/R)*(1 - exp((-1)*R*t/m))) - (g*t*m)/R;
 +
      Vx = Vo*cos(alpha);
 +
      Vy = Vo*sin(alpha);
 +
      t+= dt;
 +
    if (Y > Yo )
 +
        fprintf(Coord, "%.3lf \t %.3lf\n", X, Y);
 +
    else
 +
        fprintf(Coord, "%.3lf \t %.3lf\n", X, 0.000); // используется аналогично прошлому пункту
 +
      }
 +
}
 +
 
 +
int VerleSq (double alpha, double dt, double t, double Yo, double Xo, double Vo, double R, double m) // Функция, записывающая в файл VerleSq.txt оординаты тела, рассчитывающиеся по формлуе Верле
 +
{                                                                                                    // для Квадратичной зависимости сопротивления от скорости
 +
    FILE *Coord;
 +
  Coord = fopen ("VerleSq.txt", "w");
 +
 
 +
    double X, Xnext, Xprev, Y, Ynext, Yprev, Vx, Vy, V, Yop, Xop; // X, Y - текущие координаты; Xnext, Ynext - координаты следующего шага; Xprev, Yprev - координаты предыдущего шага.
 +
                                                                  // Xop, Yop - вспомогательные координаты для (-1)-го шага
 +
 
 +
    Yop = Yo - Vo*sin(alpha)*dt; // Сторки 62-79 используются для просчитывания (-1)-го шага, так как в точке 0;0 у нас нету предыдущего шага
 +
    Xop = Xo - Vo*cos(alpha)*dt;
 +
    X = Xo;
 +
    Y = Yo;
 +
    Xnext = 2.0*X - Xop - (R/m)*Vo*Vo*cos(alpha)*(dt*dt);
 +
    Vx = (1.0/(2.0*dt))*(Xnext - Xop);
 +
    Ynext = 2.0*Y - Yop - (g +(R/m)*Vo*Vo*sin((alpha)))*(dt*dt);
 +
    Vy =  (1.0/(2.0*dt))*(Ynext - Yop);
 +
    V = sqrt((Vo*cos(alpha)*Vo*cos(alpha)) + (Vo*sin(alpha)*Vo*sin(alpha)));
 +
 
 +
    fprintf(Coord, "%.3lf \t %.3lf\n", X, Y); // Записываем первую координату в файл
 +
 
 +
    Xprev = X; // Меняем координаты местами. Так (n-1)-ый шаг становится n-ым шагом, n-ый шаг становится (n+1)-ым шагом. Далее аналогично
 +
    X = Xnext;
 +
    Yprev = Y;
 +
    Y = Ynext;
 +
 
 +
 
 +
    while (Y >= Yo) // После выполнения строк 62-79 получаем все необходимые данные для выполнения алгоритма.
 +
    {
 +
    Xnext = 2.0*X - Xprev - (R/m)*V*Vx*(dt*dt);
 +
    Vx = (1.0/(2.0*dt))*(Xnext - Xprev);
 +
    Ynext = 2.0*Y - Yprev - (g +(R/m)*V*Vy)*(dt*dt);
 +
    Vy =  (1.0/(2.0*dt))*(Ynext - Yprev);
 +
    V = sqrt((Vx*cos(alpha)*Vx*cos(alpha)) + (Vy*sin(alpha) - g*dt)*(Vy*sin(alpha) - g*dt));
 +
    if (Ynext > Yo )
 +
        fprintf(Coord, "%.3lf \t %.3lf\n", Xnext, Ynext);
 +
    else
 +
 
 +
      fprintf(Coord, "%.3lf \t %.3lf\n", X, 0.000);
 +
 
 +
    Xprev = X;
 +
    X = Xnext;
 +
    Yprev = Y;
 +
    Y = Ynext;
 +
    }
 +
 
 +
}
 +
int VerleL (double alpha, double dt, double t, double Yo, double Xo, double Vo, double R, double m) // Функция, записывающая в файл VerleL.txt оординаты тела, рассчитывающиеся по формлуе Верле
 +
{                                                                                                  // для линейной зависимости сопротивления от скорости
 +
    FILE *Coord;
 +
  Coord = fopen ("VerleL.txt", "w");
 +
 
 +
    double X, Xnext, Xprev, Y, Ynext, Yprev, Vx, Vy, V,Yop, Xop; // Комментарии аналогичны переменным и формулам в VtrleSq
 +
 
 +
    Yop = Yo - Vo*sin(alpha)*dt;
 +
    Xop = Xo - Vo*cos(alpha)*dt;
 +
    X = Xo;
 +
    Y = Yo;
 +
    Xnext = 2.0*X - Xop - (R/m)*Vo*Vo*cos(alpha)*(dt*dt);
 +
    Vx = (1.0/(2.0*dt))*(Xnext - Xop);
 +
    Ynext = 2.0*Y - Yop - (g +(R/m)*Vo*Vo*sin((alpha)))*(dt*dt);
 +
    Vy =  (1.0/(2.0*dt))*(Ynext - Yop);
 +
    V = sqrt((Vo*cos(alpha)*Vo*cos(alpha)) + (Vo*sin(alpha)*Vo*sin(alpha)));
 +
 
 +
    fprintf(Coord, "%.3lf \t %.3lf\n", X, Y);
 +
 
 +
    Xprev = X;
 +
    X = Xnext;
 +
    Yprev = Y;
 +
    Y = Ynext;
 +
 
 +
 
 +
    while (Y >= Yo)
 +
    {
 +
    Xnext = 2.0*X - Xprev - (R/m)*Vx*(dt*dt);
 +
    Vx = (1.0/(2.0*dt))*(Xnext - Xprev);
 +
    Ynext = 2.0*Y - Yprev - (g +(R/m)*Vy)*(dt*dt);
 +
    Vy =  (1.0/(2.0*dt))*(Ynext - Yprev);
 +
  if (Ynext > Yo )
 +
        fprintf(Coord, "%.3lf \t %.3lf\n", Xnext, Ynext);
 +
    else
 +
      fprintf(Coord, "%.3lf \t %.3lf\n", Xnext, 0.000);
 +
 
 +
    Xprev = X;
 +
    X = Xnext;
 +
    Yprev = Y;
 +
    Y = Ynext;
 +
    }
 +
 
 +
}
 +
 
 +
int main()
 +
{
 +
  double alpha, Vo, dt, R, m , t = 0, Yo = 0, Xo = 0; // Объявляем переменные: alpha - угол броска; Vo - начальная скорость; dt - шаг по времени; R- коэф. сопротивления; m- масса тела;
 +
                                                      // t = 0 - начало отсчета времени с 0; Yo = 0, Xo = 0 - координаты начала
 +
  int i = 0; // переменная для оператора switch
 +
 
 +
  cout << "Enter start speed:\n";
 +
  cin >> Vo; // Вводим с клавиатуры начальную скорость
 +
  cout << "Enter angle in grades ( from 0 to 180 ):\n";
 +
  cin >> alpha; // Вводим с клавиатуры угол броска в градусах
 +
  alpha = alpha*Pi / 180; // переводим угол броска из градусов в радианы
 +
  cout << "Enter mass:\n";
 +
  cin >> m; // Вводим с клавиатуры массу
 +
  cout << "Enter precision:\n";
 +
  cin >> dt; // Вводим с клавиатуры шаг по времени
 +
  cout << "Enter resistance:\n";
 +
  cin >> R; // Вводим сопротивление воздуха
 +
  cout << "Press 1 to draw graph without resistance\n\n"
 +
          "Press 2 to draw graph in Exact form\n\n"
 +
          "Press 3 to draw graph in VerleSq form\n\n"
 +
          "Press 4 to draw graph in VerleL form\n\n"
 +
          "Press 5 to draw all graphs at the same time\n\n"
 +
          "Press 0 to quit\n\n";
 +
  cin >> i;
 +
  cout << "\nPress any button\n";
 +
 
 +
 
 +
    FILE *Gnu;
 +
    Gnu = fopen ("Throws.gp", "w"); // Создаем файл формата gp, который будем открывать программой gnuplot для того, чтобы построить наш график/ки по точкам
 +
 
 +
switch ( i )
 +
{
 +
case 1:
 +
    {
 +
    WoutR(alpha,dt,t,Yo,Vo);
 +
    fprintf(Gnu, "plot \"Throws Without Resistance.txt\" using 1:2 w l");
 +
    break;
 +
    }
 +
case 2:
 +
    {
 +
    ExactForm(alpha,dt,t,Yo,Vo,R,m);
 +
    fprintf(Gnu, "plot \"ExactForm.txt\" using 1:2 w l");
 +
    break;
 +
    }
 +
case 3:
 +
    {
 +
    VerleSq(alpha,dt,t,Yo,Xo,Vo,R, m);
 +
    fprintf(Gnu, "plot \"VerleSq.txt\" using 1:2 w l");
 +
    break;
 +
    }
 +
case 4:
 +
    {
 +
    VerleL(alpha,dt,t,Yo,Xo,Vo,R, m);
 +
    fprintf(Gnu, "plot \"VerleL.txt\" using 1:2 w l");
 +
    break;
 +
    }
 +
case 5:
 +
    {
 +
  WoutR(alpha,dt,t,Yo,Vo);
 +
  ExactForm(alpha,dt,t,Yo,Vo,R,m);
 +
  VerleSq(alpha,dt,t,Yo,Xo,Vo,R, m);
 +
  VerleL(alpha,dt,t,Yo,Xo,Vo,R, m);
 +
  fprintf(Gnu, "plot \"Throws Without Resistance.txt\" using 1:2 w l, \"ExactForm.txt\" using 1:2 w l, \"VerleSq.txt\" using 1:2 w l, \"VerleL.txt\" using 1:2 w l"); // записываем в Throws.gp названия четырех файлов
 +
  break;
 +
    }                                                  // с координатами таким образом, чтобы программа gnuplot смогла их увидеть и прочесть
 +
case 0:
 +
    break;
 +
default:
 +
    break;
 +
}
 +
    return 0;
 +
}
 +
 
 +
</syntaxhighlight>
 
</div>
 
</div>
 +
 +
'''[[Гильманов Илья]]'''
 +
 +
'''Описание программы''': программа состоит из четырех независимых друг от друга частей:
 +
#  Полет тела без сопротивления воздуха;
 +
#  Полет тела при линейной зависимости силы сопротивления воздуха от скорости, при котором координаты тела рассчитываются точным методом;
 +
#  Полет тела при линейной зависимости силы сопротивления воздуха от скорости, при котором координаты тела рассчитываются методом Верле;
 +
#  Полет тела при квадратичной зависимости силы сопротивлении воздуха от скорости, при котором координаты тела рассчитываются методом Верле;
 +
 +
Скачать можно [[http://mech.spbstu.ru/File:Движение_тела_в_среде.rar тут]]
 +
 +
'''[[Киселёв Лев]]'''
 +
 +
'''Описание программы''': программа рассчитывает координаты точки при следующих случаях
 +
#  Полет тела без сопротивления воздуха;
 +
#  Полет тела при линейной зависимости силы сопротивления воздуха от скорости, при котором координаты тела рассчитываются точным методом;
 +
#  Полет тела при линейной зависимости силы сопротивления воздуха от скорости, при котором координаты тела рассчитываются методом Верле;
 +
#  Полет тела при квадратичной зависимости силы сопротивлении воздуха от скорости, при котором координаты тела рассчитываются методом Верле;
 +
 +
Скачать можно [[http://mech.spbstu.ru/File:3zadanie.rar тут]]
 +
 +
'''[[Ляжков Сергей]]'''
 +
 +
'''Описание программы''': Программа рассчитывает координаты полета тела по х и у. Как и в программе шахмат и интерполяции, здесь представлено меню выбора функций. Вы вводите начальные координаты, начальную скорость и угол полета(например, мяча или снаряда)(Нет смысла вводить величину скорости света, так как парабола вряд ли получится).
 +
Затем Вы выбираете в меню "вариант" сопротивления воздуха, после чего вводите массу тела и коэффициент сопротивления среды(без сопротивления воздуха этим можно пренебречь). Программа выводит массив точек и сохраняет их в текстовый файл. Эти точки - координаты полета до тех пор, пока значения y не станет ОТРИЦАТЕЛЬНЫМИ...
 +
Это мой первый проект по моделированию, спасибо за предоставленную возможность попрактиковаться.
 +
Скачать можно [[http://mech.spbstu.ru/File:Полет.zip тут]]
Вам запрещено изменять защиту статьи. Edit Создать редактором

Обратите внимание, что все добавления и изменения текста статьи рассматриваются как выпущенные на условиях лицензии Public Domain (см. Department of Theoretical and Applied Mechanics:Авторские права). Если вы не хотите, чтобы ваши тексты свободно распространялись и редактировались любым желающим, не помещайте их сюда.
Вы также подтверждаете, что являетесь автором вносимых дополнений или скопировали их из источника, допускающего свободное распространение и изменение своего содержимого.
НЕ РАЗМЕЩАЙТЕ БЕЗ РАЗРЕШЕНИЯ МАТЕРИАЛЫ, ОХРАНЯЕМЫЕ АВТОРСКИМ ПРАВОМ!

To protect the wiki against automated edit spam, we kindly ask you to solve the following CAPTCHA:

Отменить | Справка по редактированию  (в новом окне)