Matlab - avion aterrizando, ayuuuda!!!

function simuladorAterrizaje()

% Parámetros del avión

altitudInicial = 10000; % en metros

rangoMeta = 1500; % en metros

intervaloTiempo = 30; % en segundos

% Inicializar variables

altitud = altitudInicial;

velocidadLineal = 0;

velocidadDescenso = 0;

anguloInclinacion = 0;

% Simulación de aterrizaje

while altitud > rangoMeta

    % Calcular nuevas variables

    velocidadDescenso = calcularVelocidadDescenso(altitud, rangoMeta);

    velocidadLineal = calcularVelocidadLineal(velocidadDescenso, anguloInclinacion);

    altitud = altitud - velocidadDescenso * intervaloTiempo;

    anguloInclinacion = calcularAnguloInclinacion(altitud, rangoMeta);

    % Mostrar información

    fprintf('Altitud: %.2f m, Velocidad Lineal: %.2f m/s, Velocidad Descenso: %.2f m/s, Inclinación: %.2f deg\n', altitud, velocidadLineal, velocidadDescenso, anguloInclinacion);

    % Comprobar si se debe emitir un aviso

    if altitud <= 5000

        fprintf('¡Warning! Altitud por debajo de 5000 metros.\n');

    end

    % Esperar intervalo de tiempo

    pause(intervaloTiempo);

end

fprintf('Aterrizaje completado.\n');

end

function velocidadDescenso = calcularVelocidadDescenso(altitud, rangoMeta)

    % Simplemente una función de ejemplo, podrías ajustarla según tus necesidades

    velocidadDescenso = (altitud - rangoMeta) / 60;

end

function velocidadLineal = calcularVelocidadLineal(velocidadDescenso, anguloInclinacion)

    % Función de ejemplo, podría depender de varios factores

    velocidadLineal = sqrt(velocidadDescenso^2 + (velocidadDescenso * tand(anguloInclinacion))^2);

end

function anguloInclinacion = calcularAnguloInclinacion(altitud, rangoMeta)

    % Función de ejemplo, podrías ajustarla según tus necesidades

    anguloInclinacion = atand((altitud - rangoMeta) / 1000);

end