LABORATORIO 8:
Librerias <ISO656>, <limits.h> y <locale.h>
#include <iostream>
#include <math.h>
#include <iso646.h> // Libreria 6
#include <limits.h> // Libreria 7
#include <locale.h> // Libreria 8
using namespace std;
//ZONA PUBLICA DE DECLARACIONES
void CAIDA_TEN();
void PER_POT();
void SECC_COND();
void POT_REAC_TRI();
int INICIAL,FINAL,P,L,S,K,I,FI,P_P,RAD,COS_fi,Ang,V,u,COS_FI;
double CAIDA_V,SECC,P_React,SIN_FI,PI;
int opcion;
int main()
{
cout<<" MENU "<<endl;
cout<<"******************************************"<<endl;
cout<<"1) FORMULA CAIDA DE TENSION\n";
cout<<"2) FORMULA PERDIDA DE POTENCIA\n";
cout<<"3) FORMULA SECCION DEL CONDUCTOR\n";
cout<<"4) FORMULA POTENCIA REACTIVA TRIFASICA/n"<<endl;
cout<<"SELECCIONE UNA OPCION: "<<endl;
cin>>opcion;
cout<<endl;
switch(opcion)
{
case 1:
{
//EJERCICIO 1
cout<<"USTED ESCOGIO:"<<endl;
cout<<"*****FORMULA CAIDA DE TENSION*****"<<endl;
CAIDA_TEN();
};break;
case 2:
{
//EJERCICIO 2
cout<<"USTED ESCOGIO:"<<endl;
cout<<"*****FORMULA PERDIDA DE POTENCIA*******"<<endl;
PER_POT();
};break;
case 3:
{
//EJERCICIO 3
cout<<"USTED ESCOGIO:"<<endl;
cout<<"*****FORMULA SECCION DEL CONDUCTOR*******"<<endl;
SECC_COND();
};break;
case 4:
{
//EJERCICIO 4
cout<<"USTED ESCOGIO:"<<endl;
cout<<"*****FORMULA POTENCIA REACTIVA TRIFASICA*******"<<endl;
POT_REAC_TRI();
};break;
default:
{
cout<<"NO HA DIGITADO UN NRO CORRECTO"<<endl;
cout<<"*************************************"<<endl;
}//fin switch
system("pause");
return 0;
}
}//fin programa
//FIN DEL PROGRAMA
// ZONA DE FUNCIONES
void 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_V=(2*P*L)/(K*S*V);
//RESULTADO
cout<<"Cuando la Potencia es:"<<P<<" La Caida de Tension es: "<<CAIDA_V<<cout<<" Voltios"<<endl;
cout<<"**********************************"<<endl;
cout<<endl;
}
}
void PER_POT()
{
//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;
}
}
void SECC_COND()
{
//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;
}
}
void POT_REAC_TRI()
{
//ASIGNACION DE DATOS
cout<<"INGRESE DATOS TRIFASICOS:"<<endl;
cout<<"*************************"<<endl;
cout<<"Ingrese la Corriente: "; cin>>I;
cout<<"Ingrese el Voltaje: "; cin>>V;
cout<<"Ingrese Fi: "; cin>>FI;
cout<<endl;
PI = 3.141592;
for(int FI=1;FI<=20;FI+=2)
{
//CALCULO DE COS(FI)
//PROCESO
RAD = (2 * PI * FI) / 360;
SIN_FI = sin(FI);
cout<<"El Sin(FI) es: "<<SIN_FI<<endl;
cout<<"***************************************"<<endl;
cout<<endl;
//RESULTADO
P_React =sqrt(3)*I*V*SIN_FI;
cout<<"Para "<<SIN_FI<<cout<<"Sin(FI)"<<cout<<" la Potencia Reactiva es: "<<P_React<<endl;
cout<<"*******************************************************************************"<<endl;
cout<<endl;
}
}