---

% --- Главный скрипт для Варианта 14 ---
clear; clc;

% Инициализация на отрезке [1, 10]. 
% Начальное приближение [2 0] (начинаем с x=2).
solinit = bvpinit(linspace(1, 10, 10), [2 0]);

% Решение краевой задачи
sol = bvp4c(@ode14, @bc14, solinit);

% Вычисление значений для графика
t_plot = linspace(1, 10, 100);
x_plot = deval(sol, t_plot);

% Построение графика
figure;
plot(t_plot, x_plot(1,:), 'r-', 'LineWidth', 2);
grid on;
xlabel('Время t');
ylabel('Координата x(t)');
title('Оптимальная траектория движения (Вариант 14)');

% --- Определение функций ---

% Функция, задающая систему дифференциальных уравнений
function dxdt = ode14(t, x)
    dxdt = [x(2);   % dx1/dt = x2
            0.5];   % dx2/dt = 0.5
end

% Функция, задающая краевые условия
function res = bc14(x0, x1)
    % x0 - значения в точке t=1
    % x1 - значения в точке t=10
    res = [x0(1) - 2;  % x(1) = 2 -> x0(1) - 2 = 0
           x1(1) - 5]; % x(10) = 5 -> x1(1) - 5 = 0
end