CAIDA DE TENSION
#include <iostream>
#include <math.h>
using namespace std;
int main()
{
int opcion;
cout<<"MENU DE FORMULAS\n";
cout<<"******************* \n";
cout<<"1) CAIDA DE TENSION\n";
cout<<"2) PERDIDA DE POTENCIA\n";
cout<<"3) SECCION DEL CONDUCTOR\n";
cout<<endl;
cout<<"DIGITE UNA OPCION:"<<endl;
cout<<"------------------------"<<endl;
cout<<endl;
cin>>opcion;
cout<<endl;
switch (opcion)
{
case 1://CICLO FOR
{
cout<<"1) CAIDA DE TENSION\n" ;//CICLO FOR
cout<<"*****************************"<<endl;
//DECLARACION
int INICIAL,FINAL,P,L,S,K,V;
double CAIDA_TEN;
//ASIGNACION DE DATOS
cout<<"INGRESE LOS DATOS:"<<endl;
cout<<"******************"<<endl;
cout<<"Ingrese la Tension(Voltios): "; cin>>V;
cout<<"Ingrese la Longitud(m): "; cin>>L;
cout<<"Ingrese la Conductibilidad(Para Cobre: 56 y Aluminio:35): "; cin>>K;
cout<<"Ingrese la Seccion del Conductor(mm2): "; cin>>S;
cout<<"Ingrese el Valor Inicial de la Potencia(Watts): "; cin>>INICIAL;
cout<<"Ingrese el Valor Final de Potencia(Watts): "; cin>>FINAL;
cout<<endl;
for(P=INICIAL; P<=FINAL; P=P+2)
{
//CALCULO DE CAIDA DE
//PROCESO
CAIDA_TEN=(2*P*L)/(K*S*V);
//RESULTADO
cout<<"Cuando la Potencia es:"<<P<<" La Caida de Tension es: "<<CAIDA_TEN<<cout<<"Voltios"<<endl;
cout<<"**********************************"<<endl;
cout<<endl;
}
};break;
case 2://CICLO FOR
{
cout<<"2) PERDIDA DE POTENCIA\n" ;
cout<<"*******************************"<<endl;
//DECLARACION
int INICIAL,FINAL,P,L,S,K,Ang,V,PI;
double P_P, RAD, COS_fi;
//ASIGNACION DE DATOS
cout<<"INGRESE LOS DATOS:"<<endl;
cout<<"******************"<<endl;
cout<<"Ingrese la Potencia Aplicada(watts): "; cin>>P;
cout<<"Ingrese la Tension(Voltios): "; cin>>V;
cout<<"Ingrese la Longitud(m): "; cin>>L;
cout<<"Ingrese la Conductibilidad(Para Cobre: 56 y Aluminio:35): "; cin>>K;
cout<<"Ingrese la Seccion del Conductor: "; cin>>S;
cout<<"Ingrese el Valor Inicial del Angulo de Factor de Potencia (CosFi): "; cin>>INICIAL;
cout<<"Ingrese el Valor Final del Angulo de Factor de Potencia (CosFi): "; cin>>FINAL;
cout<<endl;
PI=3.1415;
for(Ang=INICIAL; Ang<=FINAL; Ang++)
{
//CALCULO DE PERDIDA DE POTENCIA
//PROCESO
RAD = (2 * PI * Ang) / 360;
COS_fi = cos(RAD);
P_P=(200*P*L)/(K*S*pow(V,2)*pow(COS_fi,2));
//RESULTADO
cout<<"Cuando el Angulo del Factor de Potencia es:"<<Ang<<" La Perdida de Potencia es: "<<P_P<<cout<<"watts"<<endl;
cout<<"*********************************************************************************************"<<endl;
cout<<endl;
}
};break;
case 3:
{
cout<<"3) FORMULA CALCULO DE LA SECCION DEL CONDUCTOR\n" ;
cout<<"***********************************************"<<endl;
//DECLARACION
int INICIAL,FINAL,P,L,K,V,u,COS_FI,I;
double SECC;
//ASIGNACION DE DATOS
cout<<"INGRESE LOS DATOS:"<<endl;
cout<<"******************"<<endl;
cout<<"Ingrese la Corriente(Amp): "; cin>>I;
cout<<"Ingrese la Conductibilidad(Para Cobre: 56 y Aluminio:35): "; cin>>K;
cout<<"Ingrese la Caida de Tension: "; cin>>u;
cout<<"Ingrese el Factor de Potencia (Cosfi): "; cin>>COS_FI;
cout<<"Ingrese el Valor Inicial del Longitud del Conductor: "; cin>>INICIAL;
cout<<"Ingrese el Valor Final del Longitud del Conductor: "; cin>>FINAL;
cout<<endl;
for(L=INICIAL; L<=FINAL; L=L+5)
{
//CALCULO SECCION DEL CONDUCTOR
//PROCESO
SECC=(2*L*I*COS_FI)/(K*u);
//RESULTADO
cout<<"Cuando la Longitud del Conductor es:"<<L<<" La Seccion del Conductor es: "<<SECC<<cout<<"mm2"<<endl;
cout<<"***************************************"<<endl;
cout<<endl;
}
};break;
default:
{
cout<<"NO HA DIGITADO UN NRO CORRECTO"<<endl;
cout<<"*************************************"<<endl;
}//fin switch
system("pause");
return 0;
}
}//fin programa