Laboratorio N°2 Velocidad Del Sonido y Numero de Mach Aire Gas Ideal
Laboratorio N°2 Velocidad Del Sonido y Numero de Mach Aire Gas Ideal
Laboratorio N°2 Velocidad Del Sonido y Numero de Mach Aire Gas Ideal
Mecánica de Fluidos II
Instructora:
Vielkis Lopéz
Integrantes:
Jorge Molina 20-53-4794
Jameson González 4-816-6
Giordi Salinas 8-917-2420
Einer Mendoza 8-964-1569
Danilo Martínez 2-747-1945
Grupo: 1IE133(A)
2. Introducción
La velocidad de propagación de las ondas sonoras es también conocida como la velocidad del
sonido, y en la atmósfera terrestre a una temperatura de 20ºC, ésta es de 343 metros por
segundo. La velocidad con que se transmite el sonido depende, principalmente, de la
elasticidad del medio, es decir, de su capacidad para recuperar su forma inicial. El acero es un
medio muy elástico, en contraste con la plastilina, que no lo es. Otros factores que influyen
son la temperatura y la densidad. En este caso nos interesa determinarla en función de la
temperatura ya que estamos tratando en un gas ideal que es el aire, y en gases ideales solo
depende de la temperatura.
El número de Mach, también representado como Ma, indica la relación entre la velocidad de
un fluido V y la del sonido C en dicho fluido. Esta sencilla relación es de vital importancia,
especialmente en la aeronáutica. La velocidad del sonido en el aire en condiciones ambientales
es de 340 m/s (unos 1238,4 km/h). Sin embargo, para que esto sea totalmente cierto, debemos
puntualizar que esto es así para el aire a una temperatura de 15˚C. Dicho valor depende de
algunas variables, como la temperatura o la presión y la densidad. Por tanto, según
aumentamos la altura respecto al suelo, menor será la velocidad del sonido. De esta forma,
con el número de Mach, sabemos a cuántas veces la velocidad del sonido se mueve un
fluido sin necesidad de conocer dicha velocidad. Por ejemplo, si un fluido viaja con un Ma=1,
sabemos que lo hace a la velocidad del sonido para esas condiciones.
3. Materiales
• Programa Scilab
4. Metodología
Se utilizó el software Scilab y la información suministrada por la profesora con el propósito
de desarrollar un programa que determine diferentes propiedades termodinámicas del aire
como gas ideal.
𝐶 = √𝑘𝑅𝑇 (1)
Donde K es la relación de calores específicos, R es la constante específica de gas ideal
𝐽
en donde para el aire tiene un valor de 287(𝑘𝑔∙𝐾).
𝑘 = 𝐶𝑝 /𝐶𝑣 (2)
𝑘 = 𝐶𝑝 /𝐶𝑝 − 𝑅 (4)
5
𝐶𝑝
= ∑ 𝑐𝑖 ∙ 𝑇 𝑖
𝑅
𝑖=0
𝐶𝑝 = 𝑅(𝑐0 + 𝑐1 ∙ 𝑇 + 𝑐2 ∙ 𝑇 2 + 𝑐3 ∙ 𝑇 3 + 𝑐4 ∙ 𝑇 4 + 𝑐5 ∙ 𝑇 5 )
𝑅 (𝑐0 + 𝑐1 ∙ 𝑇 + 𝑐2 ∙ 𝑇 2 + 𝑐3 ∙ 𝑇 3 + 𝑐4 ∙ 𝑇 4 + 𝑐5 ∙ 𝑇 5 )
𝑘= (5)
𝑅(𝑐0 + 𝑐1 ∙ 𝑇 + 𝑐2 ∙ 𝑇 2 + 𝑐3 ∙ 𝑇 3 + 𝑐4 ∙ 𝑇 4 + 𝑐5 ∙ 𝑇 5 ) − 𝑅
Hay que recordar que los valores que pueden tomar los coeficientes del polinomio de
Taylor son los siguientes:
Programa en Scilab para determinar las propiedades, velocidad del aire y del
sonido en diferentes estados como gas ideal:
function lab2()
R=287 //J/Kg-K
a0=3.635888502 //1/K
a1=-0.001360125
a2=0.00000381443
a3=-0.00000000302383
a4=0.00000000000103878
a5=-0.000000000000000132878
Pref=100000 //Pa
href=298570 //a T=298.15K en J/Kg
tref=298.15 //K
sref=5699.2 // aT=298.15K y P=100000 en J/Kg-K
printf('El siguiente programa calcula las propiedades del aire como gas ideal ')
printf('\nconocidas dos propiedades intensivas e independientes, mas una propiedad extra ')
printf('\ny calcula las propiedades desconocidas')
printf('\n1. Si conoce la Temperatura (K), la presion (Pa) y la velocidad promedio (m/s)')
printf('\n2. Si conoce la temperatura (K), la presion (Pa) y el numero mach')
printf('\n3. Si conoce la presion (Pa), la velocidad promedio (m/s) y la velocidad del sonido (m/s)')
printf('\n4. Si conoce la Presion (Pa), la Velocidad promedio (m/s) y si conoce la entalpia (J/kg)')
printf('\n5. Si conoce la presion (Pa), el numero mach y si conoce la entalpia (J/kg)')
printf('\n6. Si conoce la velocidad promedio(m/s), si conoce la velocdiad del sonido (m/s) y si conoce la
entropia (J/kg*k)')
printf('\n7. Si conoce la velocidad promedio en (m/s), si conoce la entalpia (J/kg) y si conoce la entropia
(J/kg*K)')
printf('\n8. Si conoce Mach, si conoce la entalpia (J/kg) y si conoce la entropia (J/kg*K)')
printf('\n')
printf('\n')
x=input (' Ingrese el caso requerido: ')
if x==1 then
t=input('Ingrese la temperatura en K: ')
p=input('Ingrese la presion en Pa: ')
vel=input('Ingrese la velocidad promedio en m/s: ')
deff ('cp=f(T)','cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
hb=href+intg(tref,t,f)
deff ('cp=g(T)','cp=(R/T)*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
s=sref+((intg(tref,t,g)))-(R*log(p/Pref))
v=(R*t)/p
cp=R*(a0+(a1*t)+(a2*t^2)+(a3*t^3)+(a4*t^4)+(a5*t ^5))
k=(cp)/(cp-R)
c=sqrt(k*R*t)
ma=vel/c
printf('La h es= %f\n',hb)
printf('La s es= %f\n',s)
printf('La v es= %f\n',v)
printf('c es= %f\n',c)
printf('Ma es= %f\n',ma)
end
if x==2 then
p=input('Ingrese el valor de la presion en Pa: ')
t=input('Ingrese el valor de la temperatura en K ')
ma=input('Ingrese el valor de Mach: ')
deff ('cp=f(T)','cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
hb=href+intg(tref,t,f)
deff ('cp=g(T)','cp=(R/T)*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
s=sref+((intg(tref,t,g)))-(R*log(p/Pref))
cp=R*(a0+(a1*t)+(a2*t^2)+(a3*t^3)+(a4*t^4)+(a5*t ^5))
k=cp/(cp-R)
c=sqrt(k*R*t)
vel=ma*c
printf('La h es= %f\n',hb)
printf('La s es= %f\n',s)
printf('La velocidad promedio es= %f\n',vel)
printf('La velocidad del sonido es c= %f\n',c)
end
if x==3 then
p=input('Ingrese la presion en Pa: ')
vel=input('Ingrese la velocidad promedio en (m/s): ')
c=input('Ingrese la velocidad del sonido (m/s): ')
a=200
b=2500
iter=1
imax=input('Ingrese el numero de iteraciones que desea realizar para T:')
while iter<=imax
deff ('cp=f(T)','cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
T=(a+b)/2
cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))
ca=c
cb=sqrt((cp/(cp-R))*R*T)
z=cb-ca
iter=iter+1
if z>0 then
b=T
else
a=T
end
end
Ma=vel/c
deff('cp=e(T)','cp=R*((a0)+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
hb=href+intg(tref,T,e)
deff('cp=g(T)','cp=(R/T)*((a0)+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
s=sref+intg(tref,T,g)-(R*log(p/Pref))
printf('La Temperatura= %f\n',T)
printf('El numero mach es= %f\n',Ma)
printf('La s es= %f\n',s)
printf('La h es= %f\n',hb)
end
if x==4 then
p=input('Ingrese el valor de la presion en Pa: ')
vel=input('Ingrese el valor de la velocidad promedio en (m/s): ')
h=input('Ingrese el valor de la entalpia en J/Kg: ')
a=200
b=2500
iter=1
imax=input('Ingrese el numero de iteraciones que desea realizar para T:')
while iter<=imax
deff ('cp=f(T)','cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
T=(a+b)/2
ha=h
hb=href+intg(tref,T,f)
z=hb-ha
iter=iter+1
if z>0 then
b=T
else
a=T
end
end
printf('La T es = %f\n',T)
cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))
k=cp/(cp-R)
c=sqrt(k*R*T)
Mach=vel/c
deff('cp=g(T)','cp=(R/T)*((a0)+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
s=sref+intg(tref,T,g)-R*log(p/Pref)
v=(R*T)/p
printf('El volumen es= %f\n',v)
printf('La velocidad del sonido es= %f\n',c)
printf('El numero Mach es= %f\n',Mach)
printf('La s es= %f\n',s)
end
if x==5 then
p=input('Ingrese la presión en Pa= ')
Ma=input('Ingresse el numero Mach= ')
h=input('Ingrese la entalpia en (J/kg)= ')
a=200
b=2500
iter=1
imax=input('Ingrese el numero de iteraciones que desea realizar para T:')
while iter<=imax
deff ('cp=f(T)','cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
T=(a+b)/2
ha=h
hb=href+intg(tref,T,f)
z=hb-ha
iter=iter+1
if z>0 then
b=T
else
a=T
end
end
cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))
k=cp/(cp-R)
c=sqrt(k*R*T)
vel=Ma*c
deff('cp=g(T)','cp=(R/T)*((a0)+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
s=sref+intg(tref,T,g)-R*log(p/Pref)
printf('La temperatura en K es= %f\n',T)
printf('La Velocidad promedio es (m/s)= %f\n',vel)
printf('La velocidad del sonido es c (m/s)= %f\n',c)
printf('La entropia s (J/kg*K) es= %f\n',s)
end
if x==6 then
vel=input('Ingrese la velocidad promedio (m/s)= ')
c=input('Ingresse la velocidad del sonido (m/s)= ')
s=input('Ingrese la entropia en (J/kg*K)= ')
a=200
b=2500
iter=1
imax=input('Ingrese el numero de iteraciones que desea realizar para T:')
while iter<=imax
T=(a+b)/2
ca=c
cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))
k=cp/(cp-R)
cb=sqrt(k*R*T)
z=cb-ca
iter=iter+1
if z>0 then
b=T
else
a=T
end
end
Ma=vel/c
deff ('cp=g(T)','cp=(R/T)*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
p=(%e^((sref+(intg(tref,T,g))-s)/R))*Pref
deff ('cp=h(T)','cp=(R)*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
h=href+((intg(tref,T,h)))
printf('La temperatura en K es= %f\n',T)
printf('La presion en Pa es= %f\n',p)
printf('El numero mach es= %f\n',Ma)
printf('La entalpia en J/kg es= %f\n',h)
end
if x==7 then
v=input('Ingrese la velocidad en m/s= ')
h=input('Ingrese la entalpia en J/kg= ')
s=input('Ingrese la entropia en J/kg*K= ')
a=200
b=2500
iter=1
imax=input('Ingrese el numero de iteraciones que desea realizar para T:')
while iter<=imax
deff ('cp=f(T)','cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
T=(a+b)/2
ha=h
hb=href+intg(tref,T,f)
z=hb-ha
iter=iter+1
if z>0 then
b=T
else
a=T
end
end
deff ('cp=g(T)','cp=(R/T)*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
p=(%e^((sref+(intg(tref,T,g))-s)/R))*Pref
cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))
k=cp/(cp-R)
c=sqrt(k*R*T)
Ma=v/c
printf('La temperatura en K es= %f\n',T)
printf('La presion en Pa es= %f\n',p)
printf('La velocidad del sonido en m/s es= %f\n',c)
printf('El numero Mach es= %f\n',Ma)
end
if x==8 then
Ma=input('Ingrese el numero Mach= ')
h=input('Ingrese la entalpia en J/kg= ')
s=input('Ingrese la entropia en J/kg*K= ')
a=200
b=2500
iter=1
imax=input('Ingrese el numero de iteraciones que desea realizar para T:')
while iter<=imax
deff ('cp=f(T)','cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
T=(a+b)/2
ha=h
hb=href+intg(tref,T,f)
z=hb-ha
iter=iter+1
if z>0 then
b=T
else
a=T
end
end
deff ('cp=g(T)','cp=(R/T)*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))')
p=(%e^((sref+(intg(tref,T,g))-s)/R))*Pref
cp=R*(a0+(a1*T)+(a2*T^2)+(a3*T^3)+(a4*T^4)+(a5*T^5))
K=cp/(cp-R)
c=sqrt(K*R*T)
v=Ma*c
printf('La temperatura en K= %f\n',T)
printf('La presion en Pa= %f\n',p)
printf('La velocidad en m/s= %f\n',v)
printf('La velocidad del sonido en m/s= %f\n',c)
end
endfunction
Consola del programa
5. Análisis y Resultados
Tabla#2 propiedades termodinámicas del aire como gas ideal en diferentes estados.
7. Referencias bibliográficas
principal.