LAB 2





https://drive.google.com/file/d/0B3RZqyBWldi1b09NR09BNW9obWM/view?usp=sharing


#include<iostream>
#include<math.h>
#define TAM 10
using namespace std;
int i, opcion;
double C[TAM], P[TAM], Vol[TAM], V[TAM], R[TAM], T[TAM];
int main ()
{
 cout<<"\n\t\t\t\tLABORATORIO 2\n\n";
 cout<<"\t\t*****************  MENU  *****************\n\n";
 cout<<"\t\t1)  VARIACION DE ENERGIA INTERNA DE UN GAS\n";
 cout<<"\t\t2)  CALCULO DE LA ENERGIA INTERNA\n";
 cout<<"\t\t3)  EFICIENCIA DE UNA MAQUINA TERMICA\n";
 cout<<"\t\t4)  PROCESAR EL MINIMO\n\n";
 cout<<"\t\t\t DIGITE <0> PARA SALIR \n\n";
 cout<<"\t\t*******************************************\n\n";
 do
 {
  cout<<"\t\t\t ELIJA UNA OPCION : "; cin>>opcion; cout<<endl;
  switch (opcion)
  {
   case 0:
    cout<<"\n";
    system("pause");
    return 0;
   case 1:
   {
    cout<<"    ************  VARIACION DE ENERGIA INTERNA DE UN GAS  ************\n\n Se dispone de un cilindro que contiene un gas y esta dotado de un \
piston movil\n de 5 KN de peso. Se calienta el gas y el piston se desplaza 40 cm. Se desea\n calcular la variacion de la energia interna si el calor \
absorbido por el gas\n es introducida por el usuario.\n\n\t\t\t\t SOLUCION\n\n F = 5000 N\t\tW = -F * d\t\t\tU = Q + W\n d = 0,4 m\t\t\W = -5000 * \
0,4 = -2000 N\n\n";
    for (i=1; i<=TAM; i++)
    {
     cout<<" Ingrese Q[ "<<i<<" ] = "; cin>>C[i];
    }
    for (i=1; i<=TAM; i++)
    {
     V[i]=C[i]-2000;
     cout<<"\n U[ "<<i<<" ] = "<<C[i]<<" - 2000 = "<<V[i];
    }
    cout<<"\n\n\t\t--------------------------------------\n\n";
   }
   break;
   case 2:
   {
    cout<<"\t*************  CALCULO DE LA ENERGIA INTERNA  *************\n\n Se tiene un recipiente que contiene gas cuyo volumen y presion es\n \
introducida por el usuario. Calcular la energia interna.\n\n\t\t\t\t SOLUCION\n\n La energia interna de un gas ideal de la presion a que esta sometido y \
el\n volumen del recipiente que lo contiene.\n\n U = 3*P*V/2\n\n";
    for(i=1; i<=TAM; i++)
    {
     cout<<" Introduzca la Presion[ "<<i<<" ] = "; cin>>P[i];
    }
    cout<<endl; for(i=1; i<=TAM; i++)
    {
     cout<<" Introduzca el Volumen[ "<<i<<" ] = "; cin>>Vol[i];
    }
    for (i=1; i<=TAM; i++)
    {
     V[i]=(3*P[i]*Vol[i])/2;
     cout<<"\n U[ "<<i<<" ] = "<<V[i];
    }
    cout<<"\n\n\t\t--------------------------------------\n\n";
   }
   break;
   case 3:
   {  
    cout<<"     *************  EFICIENCIA DE UNA MAQUINA TERMICA  *************\n\n En una maquina termica, el trabajo neto y el calor que absorbe el \
recipiente\n de baja temperatura es introducida por el usuario. Calcular el calor entregado  por el recipiente de alta temperatura y la eficiencia de la \
maquina termica.\n\n\t\t\t\t SOLUCION\n\n Por conservacion de la energia:\n\n\t\t\tQ entrada = W neto + Q salida\n\n";
    for(i=1; i<=TAM; i++)
    {
     cout<<" Indique W neto[ "<<i<<" ] = "; cin>>P[i];
    }
    cout<<endl; for(i=1; i<=TAM; i++)
    {
     cout<<" Ahora indique Q salida[ "<<i<<" ] = "; cin>>Vol[i];
    }
    for (i=1; i<=TAM; i++)
    {
     V[i]=P[i]+Vol[i];
     R[i]=(P[i]/V[i])*100;
     cout<<"\n Q entrada = "<<P[i]<<" + "<<Vol[i]<<" = "<<V[i]<<"\n\n Entonces la eficiencia = (W neto/Q entrada) x 100 % = "<<P[i]<<"/"<<V[i]<<" = ";
     cout<<R[i]<<" %";
    }
    cout<<"\n\n\t\t--------------------------------------\n\n";
   }
   break;
   case 4:
   {
    cout<<"\t    **************  MAQUINA DE CARNOT  **************\n\n El calor que absorbe una maquina de Carnot, lo que arroja durante la\n compresion \
isotermica y T entrada del recipiente de alta temperatura es\n introducida por el usuario. ¿Cual sera la temperatura del recipiente de baja\n temperatura?\
\n\n\t\t\t\t SOLUCION\n\n Por la relacion de kelvin:\n\n\t\t\tT entrada/ T salida = Q entrada/ Qsalida\n\n";
    for(i=1; i<=TAM; i++)
    {
     cout<<" Determine el calor absorbido por la maquina (Q entrada)[ "<<i<<" ] = "; cin>>P[i];
    }
    cout<<endl; for(i=1; i<=TAM; i++)
    {
     cout<<" Determine el calor que arroja en la compresion isotermica (Qsalida)[ "<<i<<" ] = "; cin>>Vol[i];
    }
    cout<<"\n Por ultimo"; for(i=1; i<=TAM; i++)
    {
     cout<<" Determine T entrada del recipiente de alta temperatura[ "<<i<<" ] = "; cin>>T[i];
    }
    for (i=1; i<=TAM; i++)
     V[i]=(T[i]*Vol[i])/P[i];
    cout<<" Entonces\n";
    for (i=1; i<=TAM; i++)
     cout<<" T salida["<<i<<"] = ("<<T[i]<<" * "<<Vol[i]<<"/"<<P[i]<<" = "<<V[i];
    cout<<"\n\n\t\t--------------------------------------\n\n";
   }
   break;
   default:
              cout<<"    Introdujo un numero incorrecto. Introduzca una opcion valida.\n\n";
  }
 }
while (opcion !=0);
}