% Obtiene el factor de Si y de P en la ecuación de la salida So del ejercicio 4
% Determina el factor F1 de la señal de entrada Si y el factor F2 de la señal de perutrbación P
% de un sistema con salida So, introduciendo los valores de la funciones transferencias
% directas Td1 y Td2 y el valor de la función transferencia de realimentación R
%                    P|
%                     |
%                     |
%    +    +++++++++  +V   +++++++++
%Si--->---+  Td1  +--->---+  Td2  +------>So
%    -^   +++++++++  +    +++++++++   |
%     |                               |
%     |                               |
%     |          +++++++++            |
%     |__________+   R   +____________|
%                +++++++++

% Realizamos la operación matemática con los valores de Td1 y Td2
% y R ya introducidos en la ventana de comandos
% El resultado se almacena en F1 y F2

z=0;
while (z==0);
z=1;


td1=input('Ingrese el valor de Td1:');  %Almacenamos los valores introducidos
td2=input('Ingrese el valor de Td2:');  %en las variables correspondientes
r=input('Ingrese el valor de R:');

F1=(td1*td2)/(1+td1*td2*r);              %Realizamos los cálculos
F2=td2/(1+td1*td2*r);

zero=input('Presione la tecla ENTER para obtener el valor de F1');  %Se muestra el resultado de F1
F1
zero=input('Presione la tecla ENTER para obtener el valor de F2');  %Se muestra el resultado de F2
F2

resp=input('Desea calcular nuevamente?[y/n]','s');                  %subrutina para preguntar si se
        if isempty(resp);                                           %desea realizar otro cálculo o cerrar
            resp = 'y';
        end
        if resp~='y';
        zero=input('Presione la tecla ENTER para salir');
        else
        z=0;
        end
  end