Transferencia de calor
- Objetivos Aprender acerca de la transferencia de calor. Hacer una programación sobre la transferencia de calor. Definir las distintas ecuaciones que se utilizan en la transferencia de calor. Aprender a utilizar la plataforma Prezi para desrrolar temas de manera didáctica.
- Alcance Esta publicación será de libre acceso en Prezi y Blogger para cualquier persona que quiera tener conocimiento sobre la transferencia de calor y las distintas ecuaciones que corresponden a este tema.
- Justificación La comprensión de este tema podra facilitar el desarrollo y conocimiento de la termodinámica.
- Marco Teórico 1. Transferencia de calor por conducción. 2. Transferencia de calor por conducción a través de secciones en series. 3. Conductividad térmica.
4. Resistencia térmica. Programación en Dev-C++ =====>
#include <iostream>
using namespace std;
int main ()
{
int opcion;
cout<<"\n";
cout << " ***************** MENU \"TRANSFERENCIA DE CALOR\" **************\n\n";
cout << " 1): \" \" conduccion a traves de una seccion\n";
cout << " 2): \" \" conduccion a traves de secciones en serie\n";
cout << " 3): Conductividad termica\n";
cout << " 4): Resistencia termica\n\n";
cout<<" INGRESE UNA OPCION: "; cin>>opcion;
switch(opcion)
{
case 1:
{
cout<<"\n";
cout<<" ******* Calor transferido a traves de una seccion *******\n\n";
int T1, T2;
float A, K, L, Q;
cout<<" Ingrese la primera temperatura: ";cin>>T1;
cout<<" Ingrese la segunda temperatura: ";cin>>T2;
cout<<" Ingrese el area de seccion: ";cin>>A;
cout<<" Ingrese el coeficiente de conductividad termica: ";cin>>K;
cout<<" Ingrese el espesor de la seccion: ";cin>>L;
if((T1-T2)>0)
{
Q=(K*A*(T1-T2))/L;
cout<<"\n";
cout<<" => El Calor transferido por unidad de tiempo es: "<<Q<<endl;
}
else{
if((T1-T2)<0)
{
Q=(-1*K*A*(T1-T2))/L;
cout<<"\n";
cout<<" => El Calor transferido por unidad de tiempo es: "<<Q<<endl;
}
else cout<<"\n";
cout<<" => No hay transferencia de calor o es indeterminado: ";
}
system("pause");
return EXIT_SUCCESS;
}
break;// fin del switch 1
case 2:
{
cout<<"\n";
cout<<" ******* Calor transferido a traves de secciones en serie *******\n\n";
int T1, Tn, n;
float A, K, L, Q;
cout<<" Ingrese la primera temperatura: ";cin>>T1;
cout<<" Ingrese la ultima temperatura: ";cin>>Tn;
cout<<" Ingrese el area de seccion: ";cin>>A;
cout<<" Ingrese el coeficiente de conductividad termica: ";cin>>K;
cout<<" Ingrese el espesor de la seccion en serie: ";cin>>L;
cout<<" Ingrese el numero de secciones en serie: ";cin>>n;
if((T1-Tn)>0)
{
Q=(T1-Tn)/(n*L/(K*A));
cout<<"\n";
cout<<" => El calor transferido a traves de secciones en serie es: "<<Q<<endl;
}
else{
if((T1-Tn)<0)
{
Q=(-1*(T1-Tn))/(n*L/(K*A));
cout<<"\n";
cout<<" => El calor transferido a traves de secciones en serie es: "<<Q<<endl;
}
else cout<<"\n";
cout<<" => No hay transferencia de calor o es indeterminado: ";
}
system("pause");
return EXIT_SUCCESS;
}
break;// fin del switch 2
case 3:
{
cout<<"\n";
cout<<" ******* Conductividad termica *******\n\n";
int T;
float L, Q, K, A;
cout<<" Ingrese el espesor de la seccion: ";cin>>L;
cout<<" Ingrese el diferencial de temperatura : ";cin>>T;
cout<<" Ingrese la velocidad del flujo de calor: ";cin>>Q;
cout<<" Ingrese el area de la seccion: ";cin>>A;
if(T>0)
{
K=(Q*L)/(A*T);
cout<<"\n";
cout<<" => El coeficiente de conductividad termica es "<<K<<endl;
}
else{
if(T<0)
{
K=-1*(Q*L)/(A*T);
cout<<"\n";
cout<<" => El coeficiente de conductividad termica es "<<K<<endl;
}
else cout<<"\n";
cout<<" => El resultado no tiene solucion o es indeterminado: ";
}
system("pause");
return EXIT_SUCCESS;
}
break;// fin del switch 3
case 4:
{
cout<<"\n";
cout<<" ******* Resistencia Termica *******\n\n";
float L, R, K;
cout<<" Ingrese el espesor de la seccion: ";cin>>L;
cout<<" Ingrese el coeficiente de conductividad termica: ";cin>>K;
R=L/K;
cout<<"\n";
cout<<" => La resistencia termica es : "<<R<<endl;
system("pause");
return EXIT_SUCCESS;
}
break;// fin del switch 4
}
cout<<"\n";
system(" pause");
return 0;
} ESQUEMA DE TRANSFERENCIA DE CALOR EN PREZI
No hay comentarios.:
Publicar un comentario