LAB - 1



Desarrollo de Funciones:

#include<iostream>
#include<math.h>
#include<windows.h>
using namespace std;

int  n, R1, R2, R3, Req;
double Cx ,Mx, Tx, Mw, Tw, Cw, Tf, T, Ce, Q, Ta, Ec;

int CALORIMETRIA(double Cx ,double Mx, double Tx, double Mw, double Tw, double Cw, double Tf);
int CALORIMETRIADEGASES(double n, double T, double Ce, double Q);
double ENERGIACINETICAMOLECULARMEDIA(double Ta, double K , double Ec);
int RESISTENCIA (int R1, int R2, int R3);
const double K = 1.38*pow(10,-23);

int main ()
  {
    //1)DECLARACION
  int opcion;
  do
  { // INICIO DEL DO - WHILE
  cout<<"*********MENU ******************************\n\n";
  cout<<" 1)CALORIMETRIA \n";
  cout<<" 2)CALORIMETRIA DE GASES  \n";
  cout<<" 3)ENERGÍA CINÉTICA MOLECULAR MEDIA  \n";
  cout<<" 4)RESISTENCIA SERIE  \n";
  cout<<"          DIGITE <0> PARA SALIR \n\n";
  cout<<"********************************************\n\n";
  cout<<"   ELIJA UNA OPCION : "; cin>>opcion;
    //2)ASIGNACION
    switch (opcion)
    {
    case 1:
      {
       cout<<"*******  CALORIMETRIA **************************\n\n";
       cout<<"INGRESE LA MASA: "; cin>>Mx;
       cout<<"INGRESE LA TEMPERATURA: "; cin>>Tx;
       cout<<"INGRESE LA MASA DEL AGUA: "; cin>>Mw;
       cout<<"INGRESE LA TEMPERATURA DEL AGUA: "; cin>>Tw;
       cout<<"INGRESE EL CALOR ESPECIFICO  DEL AGUA: "; cin>>Tw;
       cout<<"INGRESE LA TEMPERATURA FINAL: "; cin>>Tf;
 
     CALORIMETRIA(Mx, Tx, Cx, Mw, Tw, Cw, Tf);
     cout<<"EL CALOR ESPECIFICO ES "<<CALORIMETRIA(Mx, Tx, Cx, Mw, Tw, Cw, Tf)<<endl;
 
         cout<<"**********************************************\n\n";
     } //FIN DEL CASO 1
     break;    
   
     case 2:
    {
     cout<<"******* CALORIMETRIA DE GASES ******\n\n";
     cout<<"INGRESE EL NUMERO DE MOLES: ";cin>>n;
     cout<<"INGRESE LA TEMPERATURA: ";cin>>T;
     cout<<"INGRESE EL CALOR ESPECIFICO: ";cin>>Ce;
     CALORIMETRIADEGASES(n, T, Ce, Q);
     cout<<"EL CALOR ES : ";cin>>Q;
     cout<<endl;
       cout<<"**********************************************\n\n";
    } //FIN DEL CASO 2
    break;

    case 3:
      {
       cout<<"**************ENERGÍA CINÉTICA MOLECULAR MEDIA*******************\n\n";
       cout<<"INGRESE LA TEMPERATURA ABSOLUTA: ";cin>>Ta;
     
      ENERGIACINETICAMOLECULARMEDIA(Ta, K, Ec);
      cout<<"LA ENERGIA CINETICA ES : ";cin>>Ec;
       cout<<"**********************************************\n\n";
      } //FIN DEL CASO 3
      break;
   
    case 4:
     {
    cout<<"*******  RESISTENCIA SERIE **************************\n\n";
    cout<<"INGRESE LA RESISTENCIA 1: "; cin>>R1;
    cout<<"INGRESE LA RESISTENCIA 2: "; cin>>R2;
    cout<<"INGRESE LA RESISTENCIA 3: "; cin>>R3;
    cout<<"-------------------------------- \n";
    Req = RESISTENCIA (R1, R2, R3);
    cout<<"LA RESISTENCIA EN SERIE ES: "<<Req<<endl;
    cout<<"**********************************************\n\n";
     } //FIN DEL CASO 4
     break;  
 }// FIN DE SWITCH
 
 } // FIN DEL DO - WHILE
 while (opcion !=0);

    cout<<endl;cout<<"\n";
    system("pause");
    return 0;
} //FIN DEL PROGRAMA

//Desarrollo de funciones

 int CALORIMETRIA(double Mx, double Tx, double Mw, double Tw, double Cw, double Tf)
 {
    Cx = (Mw*Cw*(Tf-Tw))/(Mx*(Tx-Tf));
    return Cw;
 }
 int CALORIMETRIADEGASES(double n, double T, double Ce, double Q)
 {
     Q = n*Ce*T;
     return Q;
 }
 double ENERGIACINETICAMOLECULARMEDIA(double Ta, double K , double Ec)
 {
Ec = (3/2)*K*Ta;
return Ec;
 }
  int RESISTENCIA (int R1, int R2, int R3)
 {
  Req = R1 + R2 + R3;
 return Req;  
 }

CLIC PARA VER EL ARCHIVO:


No hay comentarios:

Publicar un comentario