UNIVERSIDAD NACIONAL DE TRUJILLO.

FACULTAD DE INGENIERIA QUIMICA.

MECANICA DE FLUIDOS

Docente:
 EVANGELISTA BENITES, GUILLERMO
Curso:
 MECANICA DE FLUIDOS

Alumnos:
 Asmat Vasquez, Bryan
 Baldeos Terrones, Gisella
 Requena Rodriguez, Kevin

TRUJILLO 10 DE JUNIO DEL 2017

 PROYECTO DE ANÁLISIS MEDIANTE LA
ECUACIÓN DE BERNOULLI Y EL TEOREMA DE
TORRICELLI

1. Cree una hoja para determinar los valores de la carga de presión de velocidad, la
carga de elevación y la carga total para valores dados de presión, velocidad y
elevación.

ANALISIS:

Aplicamos la ecuación de Bernoulli

P1 V 21 P2 V 22
+ z 1+ = + z 2+
γ 2g γ 2g

clc, clear all

disp('Curso: MECANICA DE FLUIDOS:');
disp('Prof.: Dr. Guillermo Evangelista Benites');
disp(' ');
% Libro: Mecanica de Fluidos - Septima edición - 2015
% Autores: Robert Mott - Josehp Untener
% Capitulo 6 - Pag 153 - Proyecto 1
disp('Codigo de fluido: Agua = 1 Otro fluido = 2');
codigo=input('Ingrese codigo=');
if codigo==1
p=input('Presion(Kpa)=');
v=input('Velocidad(m/s)=');
z=input('Elevacion(m)=');
pe=9.81; % KN/m^3
cp=p/pe; % Carga de presión, m
g=9.81; % Aceleracion de la gravedad, m/s^2
cv=v^2/(2*g); % Carga de velocidad, m
ce=z; % Carga de elevación, m
ct=cp+cv+ce;
disp(' ');
disp(' RESULTADOS ');
disp('----------------------------------------------------');
disp(' Carga Carga Carga Carga ');
disp(' de presión de velocidad de elevación total ');
disp(' (m) (m) (m) (m) ');
disp('----------------------------------------------------');
fprintf(' %7.3f %7.3f %7.3f %7.3f \n' ,cp,cv,ce,ct);
disp(' ');

elseif codigo==2
 fluido=input('Fluido =', 's');
p=input('Presion(Kpa)=');
v=input('Velocidad(m/s)=');
z=input('Elevacion(m)=');
pe=input('Peso Especifico (KN/m^3)=');
cp=p/pe; % Carga de presión, m
g=9.81; % Aceleracion de la gravedad, m/s^2
cv=v^2/(2*g); % Carga de velocidad, m
ce=z; % Carga de elevación, m
ct=cp+cv+ce;
disp(' ');
disp(' RESULTADOS ');
disp('----------------------------------------------------');
disp(' Carga Carga Carga Carga ');
disp(' de presión de velocidad de elevación total ');
disp(' (m) (m) (m) (m) ');
disp('----------------------------------------------------');
fprintf(' %7.3f %7.3f %7.3f %7.3f \n' ,cp,cv,ce,ct);
disp(' ');
else
disp('No encuentro datos');
end

 RESULTADOS
CÓDIGO1: AGUA

2. Mejore la hoja de cálculo del proyecto 1 al listar varias combinaciones de los

diversos componentes de la carga con el fin de compararlos entre sí como se
hace al utilizar la ecuación de Bernoulli.

ANALISIS:
Aplicamos la ecuación de Bernoulli

2 2
P1 V P2 V
+ z 1+ 1 = + z 2+ 2
γ 2g γ 2g
clc, clear all
disp('Curso: MECANICA DE FLUIDOS:');
disp('Prof.: Dr. Guillermo Evangelista Benites');
disp(' ');
% Libro: Mecanica de Fluidos - Septima edición - 2015
% Autores: Robert Mott - Josehp Untener
% Capitulo 6 - Pag 153 - Proyecto 2
disp('Ingrese los siguientes datos:')
disp('-----------------------------');
p1=input('Presión en punto inicial de referencia (Kpa):');
z1=input('Altura de punto inicial de referencia (m): ');
v1=input('Velocidad de fluido en punto inicial de referencia (m/s):');
p2=input('Presión en punto final del sistema (Kpa):');
z2=input('Altura de punto final del sistema (m):');
v2=input('Velocidad de fluido en punto final del sistema (m/s):');
pe=input('Peso especifico del fluido (KN/m^3)');
g=9.81; % Aceleración de la gravedad, m/s^2
ct1=p1/pe+z1+v1^2/(2*g);
ct2=p2/pe+z2+v2^2/(2*g);
if ct1==ct2
disp(' ');
disp('<<Se cumple la ecuación de Bernoulli>>');
fprintf('La carga total del sistema es: %7.3f m \n', ct1);
else
disp(' ');
disp('<<No se cumple la ecuación de Bernoulli>>');
fprintf('La carga total del sistema en el punto inicial: %5.2f m \n',
ct1);
fprintf('La carga total del sistema en el punto final: %5.2f m \n',
ct2);
end

 RESULTADOS:

 DISCUSIÓN

NO SE CUMPLE “LA ECUACION DE BERNOULLI” PORQUE LAS

CARGAS TOTALES DE AMBOS MIEMBROS DE LA ECUACIÓN SON
DIFERENTES.
 3. En la hoja de cálculo del proyecto 1, incluya la capacidad de calcular la
velocidad de flujo a partir de datos dados para la rapidez del flujo de volumen y
el tamaño de la tubería.

ANALISIS:
Aplicamos la ecuación de Bernoulli

P1 V 21 P2 V 22
+ z 1+ = + z 2+
γ 2g γ 2g

 Utilizamos las tablas F1 (cedula 40) y F2 (cedula 80) de la página 500 – 501 del
libro de Robert Mott.

clc, clear all

disp('Curso: MECANICA DE FLUIDOS:');
disp('Prof.: Dr. Guillermo Evangelista Benites');
disp(' ');
% Libro: Mecanica de Fluidos - Septima edición - 2015
% Autores: Robert Mott - Josehp Untener
% Capitulo 6 - Pag 153 - Proyecto 3
disp('Ingrese los siguientes datos');
Q=input('Ingresar la rapidez de flujo de volumen (m^3/s)= ');
disp('-----------------------------');
disp('Cedula 40 Cedula 80');
cedula=input('Cedula= ', 's');
disp('-----------------------------');
t=input('Tamano nominal de tuberia (mm)= ');
disp('Según el dato ingresado en t, revisar tabla F');
a=input('Area de flujo de la tuberia (m^2)= ');
disp('Codigo de fluido: Agua = 1 Otro fluido = 2 ');
codigo=input('Ingrese codigo= ');
if codigo==1
p=input('Presion(Kpa)= ');
 z=input('Elevacion(m)= ');
v=Q/a; %Velocidad del fluido (m/s)
pe=9.81; %(KN/m^3)
cp=p/pe; % Carga de presión, m
g=9.81; % Aceleracion de la gravedad, m/s^2
cv=v^2/(2*g); % Carga de velocidad, m
ce=z; % Carga de elevación, m
ct=cp+cv+ce;
disp(' ');
disp(' RESULTADOS ');
disp('---------------------------------------------------------------------');
disp(' Carga Carga Carga Carga ');
disp(' de presión de velocidad de elevación total ');
disp(' (m) (m) (m) (m) ');
disp('----------------------------------------------------------------------');
fprintf(' %7.3f %4.3f %7.3f %4.3f \n' ,cp,cv,ce,ct);
disp(' ');
elseif codigo==2
fluido=input('Fluido = ', 's');
p=input('Presion(Kpa)=');
z=input('Elevacion(m)=');
v=Q/a; %Velocidad de fluido (m/s)
pe=input('Peso Especifico (KN/m^3)=');
cp=p/pe; % Carga de presión, m
g=9.81; % Aceleracion de la gravedad, m/s^2
cv=v^2/(2*g); % Carga de velocidad, m
ce=z; % Carga de elevación, m
ct=cp+cv+ce;
disp(' ');
disp(' RESULTADOS ');
disp('-----------------------------------------------------------------------');
disp(' Carga Carga Carga Carga ');
disp(' de presión de velocidad de elevación total ');
disp(' (m) (m) (m) (m) ');
disp('-----------------------------------------------------------------------');
fprintf(' %7.3f %4.3f %7.3f %4.3f \n' ,cp,cv,ce,ct);
disp(' ');
else
disp('No encuentro datos');
end

 RESULTADOS:

 DISCUS
IÓN

HEMOS
USADO
LA
 CEDULA 40 EN ESTE EJERCICIO, AL AUMENTARLE A CEDULA 80, SU AREA
DE FLUJO DISMINUYE Y POR TEORIA SU VELOCIDAD AUMENTARA.

4. Cree una hoja de cálculo para determinar, a partir de la ecuación (6-26), el tiempo
necesario para disminuir de un valor a otro nivel de fluido en un tanque para
cualquier combinación de tamaño del tanque y diámetro de la boquilla. Aplíquela
en los problemas 6.95 a 6.102.

 EJERCICIO 6.95

 Calcule el tiempo necesario para vaciar el tanque mostrado en la figura 6.14 si la

profundidad original es de 2.68 m. El diámetro del tanque es de 3.00 m y el
diámetro del orificio mide 150 mm.

ANALISIS:
Usando la fórmula de tiempo requerido para drenar un tanque:

At/ A j
¿
h
t 2 −t 1 = (¿¿ 11/ 2−h1 /2 )
2
2¿
¿

Esta ecuación se puede utilizar con el fin de calcular el tiempo requerido para drenar
❑ ❑
un tanque desde h1 hasta h2

DATOS:
 FORMATO  Dt= 3m
clc, clear all  Do=0.15m
disp(' Curso: Mécanica de fluidos')  H1=2.68m
disp(' Prof: Guillermo Evangelista Benites')  H2=0m
disp('Ingrese datos:')
disp('----------------------------------');
%Ejercicio 6.95 - página 150 - figura 6.14
%Libro Rober Mott/ Josep Untener
disp(' ')
Dt=input('Ingrese el diametro del tanque(m): '); %Diametro del tanque 3
Do=input('Ingrese el diametro del orificio del tanque(m): ');%Diametro del orificio del
tanque 0.15
H1=input('Ingrese la profundidad original del tanque(m): ');%Profundidad original del
tanque 2.68
H2=input('Ingrese la profundidad final del tanque(m): ');%Profundidad final del tanque 0
At=(pi*(Dt^2))/4; % Área del tanque(m^2)
Ao=(pi*(Do^2))/4; % Área del orificio del tanque(m^2)
g=9.81; % Gravedad(m/s^2)
t=2*((At/Ao)/(sqrt(2*g)))*(sqrt(H1)-sqrt(H2)); % tiempo(s)
disp(' ');
fprintf('El tiempo requerido para drenar un tanque es: %5.2f s \n',t)

 RESULTADO:

 DISCUSIÓN

EL TANQUE QUEDA VACIO EN UN TIEMPO DE 4.9 MIN; TARDA UN POCO EN

VACIARSE YA QUE EL DIAMETRO ES REGULARMENTE PEQUEÑO.

 EJERCICIO 6.96

 Calcule el tiempo para vaciar el tanque mostrado en la fig. 6.14 si la profundidad

original es de 55 mm. El diámetro del tanque es de 300 mm y el diámetro del
orificio mide 20 mm.

ANALISIS:
Usando la fórmula de tiempo requerido para drenar un tanque:

DATOS:

clc, clear all

 Dt= 300mm
disp(' Curso:  Do=20mm
Mécanica de fluidos')
disp(' Prof:  H1=55mm
Guillermo Evangelista
Benites')  H2=0mm
disp('Ingrese datos:')
disp('----------------------------------');
%Ejercicio 6.96 - página 150 - figura 6.14
%Libro Rober Mott/ Joseph Untener
disp(' ')
Dt=input('Ingrese el diametro del tanque(mm): '); %Diametro del tanque 300
Do=input('Ingrese el diametro del orificio del tanque(mm): ');%Diametro del orificio
del tanque 20
H1=input('Ingrese la profundidad original del tanque(mm): ');%Profundidad original del
tanque 55
H2=input('Ingrese la profundidad final del tanque(mm): ');%Profundidad final del
tanque 0
At=(pi*(Dt^2))/4; % Área del tanque(mm^2)
Ao=(pi*(Do^2))/4; % Área del orificio del tanque(mm^2)
g=9810; % Gravedad(mm/s^2)
t=2*((At/Ao)/(sqrt(2*g)))*(sqrt(H1)-sqrt(H2)); % tiempo(s)
disp(' ');
fprintf('El tiempo requerido para drenar un tanque es: %5.2f s \n',t)

 RESULTADOS

 DISCUSIÓN

A COMPARACION DEL EJERCICIO ANTERIOR, TARDA MUCHO MENOS

TIEMPOS, ESTO SE DEBE A QUE LAS DIMENSIONES SON MAS PEQUEÑAS
Y EL DIAMETRO DEL TANQUE ES MAS PEQUEÑO.

 EJERCICIOS 6.97
 Calcula necesario para vaciar el tanque mostrado en la fig. 6.14 si la profundidad
original es de 15ft. El diámetro del tanque es de 12ft y el diámetro del orificio es de
6in.

ANALISIS:
Usando la fórmula de tiempo requerido para drenar un tanque:
 DATOS:

clc, clear all  Dt= 12 f

disp(' Curso:  Do= 6Mécanica
in de
fluidos')  H1= 15f
disp(' Prof: Guillermo
Evangelista Benites')
 H2= 0f
disp('Ingrese datos:')
disp('----------------------------------');
%Ejercicio 6.97 - página 150 - figura 6.14
%Libro Rober Mott/ Joseph Untener
disp(' ')
Dt=input('Ingrese el diametro del tanque(ft): '); %Diametro del tanque 12
Do=input('Ingrese el diametro del orificio del tanque(in): ');%Diametro del
orificio del tanque 6
Do1=Do*0.083; %Conversión de in a ft
H1=input('Ingrese la profundidad original del tanque(ft): ');%Profundidad
original del tanque 15
H2=input('Ingrese la profundidad final del tanque(ft): ');%Profundidad final del
tanque 0
At=(pi*(Dt^2))/4; % Área del tanque(ft^2)
Ao=(pi*(Do1^2))/4; % Área del orificio del tanque(ft^2)
g=32.15; % Gravedad(ft/s^2)
t=2*((At/Ao)/(sqrt(2*g)))*(sqrt(H1)-sqrt(H2)); % tiempo(s)
disp(' ');
fprintf('El tiempo requerido para drenar un tanque es: %5.2f s \n',t)

 RESULTADOS

 DISCUSIÓN
 ESTA VEZ TRABAJAMOS EN SISTEMA INGLES Y EL DIAMETRO DEL
TANQUE ES GRANDE POR ENDE EL TIEMPO SERA MUCHO MAYOR.

 EJERCICIO 6.98
 Calcule el tiempo necesario para vaciar el tanque mostrado en la fig. 6.14 si la
profundidad original es de 18.5 in. El diámetro del tanque es de 22.2 in y el diámetro
del orificio mide 0.50 in.

ANALISIS:
Usando la fórmula de tiempo requerido para drenar un tanque:
DATOS:

clc, clear all  Dt= 22 in

disp(' Curso:  Do=0.50 in de
Mécanica
fluidos')  H1= 18.5 in
disp(' Prof:  H2= 0 in
Guillermo
Evangelista Benites')
disp('Ingrese datos:')
disp('----------------------------------');
%Ejercicio 6.98 - página 150 - figura 6.14
%Libro Rober Mott/ Joseph Untener
disp(' ')
Dt=input('Ingrese el diametro del tanque(in): '); %Diametro del tanque 22
Do=input('Ingrese el diametro del orificio del tanque(in): ');%Diametro del
orificio del tanque 0.50
H1=input('Ingrese la profundidad original del tanque(in): ');%Profundidad
original del tanque 18.5
H2=input('Ingrese la profundidad final del tanque(in): ');%Profundidad final
del tanque 0
At=(pi*(Dt^2))/4; % Área del tanque(ft^2)
Ao=(pi*(Do^2))/4; % Área del orificio del tanque(ft^2)
g=32.15; % Gravedad(ft/s^2)
g1=(32.15/0.083); %Conversión de la gravedad a (in/s^2)
t=2*((At/Ao)/(sqrt(2*g1)))*(sqrt(H1)-sqrt(H2)); % tiempo(s)
disp(' ');
fprintf('El tiempo requerido para drenar un tanque es: %5.2f s \n',t)

 RESULTADOS
  DISCUSIÓN

LAS UNIDADES SON TODAS IGUALES, Y A COMPARACION DE LA

RESOLUCION DE LOS DEMAS EJERCICIOS, CONVERTIMOS LA GRAVEDAD
A UNIDADES QUE NOS CONVENGA PARA FACILITAR LA SOLUCION

 EJERCICIO 6.99
 Calcule el tiempo necesario para reducir en 1.50 m la profundidad en el tanque
mostrado en la figura 6.14 si la profundidad original es de 2.68 m. El diámetro del
taque es de 2.25 m y el diámetro del orificio mide 50mm.

ANALISIS:
DATOS:
Usando la fórmula de tiempo requerido para drenar un tanque:
 Dt= 2.25 m
clc, clear all  Do= 50mm
disp(' Curso: H1= 2.68mde
 Mécanica
fluidos')  H2= 150m
disp(' Prof: Guillermo
Evangelista Benites')
disp('Ingrese datos:')
disp('----------------------------------');
%Ejercicio 6.99 - página 150 - figura 6.14
%Libro Rober Mott/ Joseph Untener
disp(' ')
Dt=input('Ingrese el diametro del tanque(m): '); %Diametro del tanque
2.25
Do=input('Ingrese el diametro del orificio del tanque(mm): ');%Diametro del
orificio del tanque 50
Do1=Do/1000; %Conversión del orificio de tanque a (m)
H=input('Ingrese la profundidad original del tanque(m): ');%Profundidad
original del tanque 2.68
H1=input('Ingrese la profundidad final del tanque(m): ');%Profundidad final
del tanque 1.50
H2=H-H1; %Diferencia de profundidades de tanque en los dos momentos (m)
At=(pi*(Dt^2))/4; % Área del tanque(m^2)
Ao=(pi*(Do1^2))/4; % Área del orificio del tanque(m^2)
g=9.81; % Gravedad(m/s^2)
t=2*((At/Ao)/(sqrt(2*g)))*(sqrt(H)-sqrt(H2)); % tiempo(s)
disp(' ');
fprintf('El tiempo requerido para drenar un tanque es: %5.2f s \n',t)

 RESULTADOS
  DISCUSIÓN

EN ESTE EJERCICIO, NO SE QUEDARA VACIO EL TANQUE AL FINALIZAR

EL MOMENTO (2), ES UNA ALTURA MENOR Y A LA VEZ UN TIEMPO MENOR
EN COMPARACION CON LOS EJERCICIOS ANTERIORES

 EJERCICIO 6.100
 Calcule el tiempo necesario para reducir en 225 mm la profundidad en el depósito
mostrado en la figura 6.14 si la profundidad original es de 1.38. El diámetro del
tanque es de 1.25 m y el diámetro del orificio mide 25mm.

ANALISIS:
DATOS:
Usando la fórmula de tiempo requerido para drenar un tanque:

 Dt= 1.25 m
clc, clear all  Do= 25 mm
disp(' Curso: Mécanica de
 H1= 1.38 m
fluidos')
disp(' Prof:  H2= 225 mm
Guillermo
Evangelista Benites')
disp('Ingrese datos:')
disp('----------------------------------');
%Ejercicio 6.100 - página 150 - figura 6.14
%Libro Rober Mott/ Joseph Untener
disp(' ')
Dt=input('Ingrese el diametro del tanque(m): '); %Diametro del tanque 1.25
Do=input('Ingrese el diametro del orificio del tanque(mm): ');%Diametro del
orificio del tanque 25
Do1=Do/1000; %Conversión del orificio de tanque a (m)
H=input('Ingrese la profundidad original del tanque(m): ');%Profundidad
original del tanque 1.38
H1=input('Ingrese la profundidad final del tanque(mm): ');%Profundidad
final del tanque 225
H1a=H1/1000; %Conversión de profundidad final a (m)
H2=(H-H1a); %Diferencia de profundidades de tanque en los dos momentos (m)
At=(pi*(Dt^2))/4; % Área del tanque(m^2)
Ao=(pi*(Do1^2))/4; % Área del orificio del tanque(m^2)
g=9.81; % Gravedad(m/s^2)
t=2*((At/Ao)/(sqrt(2*g)))*(sqrt(H)-sqrt(H2)); % tiempo(s)
disp(' ');
fprintf('El tiempo requerido para drenar un tanque es: %5.2f s \n',t)

 RESULTADO
  DISCUSIÓN

PODEMOS OBSERVAR QUE EL DIAMETRO ES PEQUEÑO AL IGUAL QUE EL

TANQUE, QUE NO PASA EL 1.5 m; EL TIEMPO DE DRENADO SERA
PROMEDIO YA QUE NO SE QUEDA VACIO, SINO A CIERTA ALTURA
ESTABLECIDA.

 EJERCICIO 6.101
 Calcule el tiempo necesario para reducir en 12.5 in la profundidad en el deposito
mostrado en la fig. 6.14 si la profundidad original es de 38 in. El diámetro del tanque
es de 6.25 ft y el diámetro de orificio mide 8.75 ft.

ANALISIS:
DATOS:
Usando la fórmula de tiempo requerido para drenar un tanque:
 Dt= 6.25 f
clc, clear all  Do= 0.625 in
disp(' Curso: Mécanica
 H1= 38 in de
fluidos')
disp(' Prof:
 H2= 12.5 in
Guillermo
Evangelista Benites')
disp('Ingrese datos:')
disp('----------------------------------');
%Ejercicio 6.101 - página 150 - figura 6.14
%Libro Rober Mott/ Joseph Untener
disp(' ')
Dt=input('Ingrese el diametro del tanque(ft): '); %Diametro del tanque 6.25
Do=input('Ingrese el diametro del orificio del tanque(in): ');%Diametro del
orificio del tanque 0.625
Do1=Do*0.083; %Conversión del orificio de tanque a (ft)
H=input('Ingrese la profundidad original del tanque(in): ');%Profundidad original
del tanque 38
H1=input('Ingrese la profundidad final del tanque(in): ');%Profundidad final del
tanque 12.5
Ha=H*0.083; %Conversión de profundidad original a (ft)
H1a=H1*0.083; %Conversión de profundidad final a (ft)
H2=(Ha-H1a); %Diferencia de profundidades de tanque en los dos momentos (ft)
At=(pi*(Dt^2))/4; % Área del tanque(ft^2)
Ao=(pi*(Do1^2))/4; % Área del orificio del tanque(ft^2)
g=32.2; % Gravedad(ft/s^2)
t=2*((At/Ao)/(sqrt(2*g)))*(sqrt(Ha)-sqrt(H2)); % tiempo(s)
disp(' ');
fprintf('El tiempo requerido para drenar un tanque es: %5.2f s \n',t)
  RESULTADOS

 DISCUSIÓN

A COMPARACION DEL EJERCICIO ANTERIOR, EL DIAMETRO SIGUE

SIENDO PEQUEÑO, PERO LA ALTURA DEL TANQUE SE ELEVÓ, POR ESO
AUMENTA EL TIEMPO DE DRENAJE, SIN IMPORTAR QUE SE RESOLVIO EN
OTRO SISTEMA DE UNIDADES.

 EJERCICIO 6.102
 Calcule el tiempo para reducir en 21.0 ft la profundidad en el tanque mostrado en la fig.
6.14 si la profundidad original es de 23.0 ft. El diámetro del tanque es de 46.5 ft y el
diámetro del orificio mide 8.75 in.

ANALISIS:
Usando la fórmula de tiempo requerido para drenar un tanque:
DATOS:

 Dt= 46.5 f
clc, clear all
 Do= 8.75 in
disp(' Curso: Mécanica de
fluidos')  H1= 23 f
disp(' Prof:  H2= 21 f
Guillermo
Evangelista Benites')
disp('Ingrese datos:')
disp('----------------------------------');
%Ejercicio 6.102 - página 150 - figura 6.14
%Libro Rober Mott/ Joseph Untener
disp(' ')
Dt=input('Ingrese el diametro del tanque(ft): '); %Diametro del tanque 46.5
Do=input('Ingrese el diametro del orificio del tanque(in): ');%Diametro del
orificio del tanque 8.75
Do1=Do*0.083; %Conversión del orificio de tanque a (ft)
H=input('Ingrese la profundidad original del tanque(ft): ');%Profundidad original
del tanque 23
H1=input('Ingrese la profundidad final del tanque(ft): ');%Profundidad final del
tanque 21
H2=(H-H1); %Diferencia de profundidades de tanque en los dos momentos (ft)
At=(pi*(Dt^2))/4; % Área del tanque(ft^2)
Ao=(pi*(Do1^2))/4; % Área del orificio del tanque(ft^2)
g=32.2; % Gravedad(ft/s^2)
t=2*((At/Ao)/(sqrt(2*g)))*(sqrt(H)-sqrt(H2)); % tiempo(s)
disp(' ');
fprintf('El tiempo requerido para drenar un tanque es: %5.2f s \n',t)
  RESULTADOS

 DISCUSIÓN

COMPARANDO RESULTADOS DE TODOS LOS EJERCICIOS ANTERIORES,

ÉSTE ES DE MAYOR VALOR DE TIEMPO DE DRENADO (3455 seg), ESTO SE
DEBE A LA DIFERENCIA DE ALTURAS QUE NOS PRESENTA EL PROBLEMA
(23-2) 21m

5. Añada a la hoja de cálculo del proyecto 4 la capacidad de presurizar el sistema.

Aplíquela en los problemas 6.103 a 6.106.

 EJERCICIO 6.103
 Repita el problema 6.97 si el tanque está sellado y existe una presión de 5.0 psig por
encima del agua del tanque

Para este grupo de problemas, tenemos una presión ejercida en la parte superior del
tanque y está sellada, lo cual modifica los valores de las alturas, aumentando su valor:

hi=h p/�,Utilizamos
1+ p/γ
Siendo la fórmula:
la presión superior
del tanque dividido por su peso
hf =h2+ p/γ At / A j
especifico.
¿
h
t 2 −t 1 = (¿¿ i 1/ 2−h1 /2 )
f
2¿
¿
Formula corregida para la presión adicional que hay en la parte superior del tanque.
DATOS:
clc, clear all
disp(' Curso: Mécanica de fluidos')  P= 5 psig
disp(' Prof: Guillermo Evangelista Benites')  Dt= 12 f
disp('Ingrese datos:')  Do= 6 in
disp('----------------------------------');
%Ejercicio 6.103 - página 150 - figura 6.14  H1= 15 f
%Repetir problema 6.97  H2= 0 f
%Libro Rober Mott/ Joseph Untener
disp(' ')
P=input('Ingrese la presión del tanque(psig) :'); %Carga de Presion del tanque 5
P1=(P*144); %Conversión de presión de psig(lb/in^2) a (lb/ft^2)
pe=62.4; %Peso especifico (lb/ft^3)
Pf=(P1/pe); %Presion divido por su peso especifico
Dt=input('Ingrese el diametro del tanque(ft) :'); %Diametro del tanque 12
Do=input('Ingrese el diametro del orificio del tanque(in) :');%Diametro del orifio
del tanque 6
Do1=Do*0.083; %Conversión de in a ft
H=input('Ingrese la altura del tanque antes de el drenado(ft) :');%Profundidad del
tanque 15
H1=0; %Dato por quedar vacio el tanque
Ha=H+Pf;
H1a=H1+Pf;
At=(pi*(Dt^2))/4; % Área del tanque(ft^2)
Ao=(pi*(Do1^2))/4; % Área del orificio del tanque(ft^2)
g=32.2; % Gravedad(ft/s^2)
t=2*((At/Ao)/(sqrt(2*g)))*(sqrt(Ha)-sqrt(H1a)); % tiempo(s)
disp(' ');
fprintf('El tiempo requerido para drenar un tanque es: %5.2f s \n',t)

 RESULTADOS:

 DISCUSIÓN

REPETIMOS EL EJERCICIO PERO ESTA VEZ CON UNA PRESION

ESTABLECIDA QUE ESTA ENCERRADA EN EL TANQUE, A COMPARACION
DE LOS DOS RESULTADOS (560 seg) y (253 seg); LA PRESION AYUDA EN
HACER QUE EL TANQUE QUEDE VACIO EN UN MENOR TIEMPO.
 EJERCICIO 6.104
 Repita el problema 6.101 si el tanque está sellado y existe una presión de 2.58 psig
por encima del agua del tanque

Utilizamos la fórmula:

At / A j
¿
h
t 2 −t 1 = (¿¿ i 1/ 2−h1 /2 )
f
2¿
¿

clc, clear all DATOS:

disp(' Curso: Mécanica de fluidos')
disp(' Prof: Guillermo Evangelista Benites')  P= 2.8 psig
disp('Ingrese datos:')
 Dt= 6.25 f
 Do= 0.625 in
 H1= 38 in
 H2= 12.5 in
disp('----------------------------------');
%Ejercicio 6.104 - página 150 - figura 6.14
%Repetir problema 6.101
%Libro Rober Mott/ Joseph Untener
disp(' ')
P=input('Ingrese la presión del tanque(psig): '); %Carga de Presion del tanque 2.8
P1=(P*144); %Conversión de presión de psig(lb/in^2) a (lb/ft^2)
pe=62.4; %Peso especifico (lb/ft^3)
Pf=(P1/pe); %Presion divido por su peso especifico
Dt=input('Ingrese el diametro del tanque(ft): '); %Diametro del tanque 6.25
Do=input('Ingrese el diametro del orificio del tanque(in): ');%Diametro del
orificio del tanque 0.625
Do1=Do*0.083; %Conversión del orificio de tanque a (ft)
H=input('Ingrese la profundidad original del tanque(in): ');%Profundidad original
del tanque 38
H1=input('Ingrese la profundidad final del tanque(in): ');%Profundidad final del
tanque 12.5
Ha=H*0.083; %Conversión de profundidad original a (ft)
H1a=H1*0.083; %Conversión de profundidad final a (ft)
Hb=Ha+Pf;
H2=(Ha-H1a);
H2b=(H2+Pf); %Diferencia de profundidades de tanque en los dos momentos (ft)
At=(pi*(Dt^2))/4; % Área del tanque(ft^2)
Ao=(pi*(Do1^2))/4; % Área del orificio del tanque(ft^2)
g=32.2; % Gravedad(ft/s^2)
t=2*((At/Ao)/(sqrt(2*g)))*(sqrt(Hb)-sqrt(H2b)); % tiempo(s)
disp(' ');
fprintf('El tiempo requerido para drenar un tanque es: %5.2f s \n',t)

 RESULTADOS:

 DISCUSIÓN

MIENTRAS MAS BAJA SEA

LA PRESION DEL TANQUE,
MAS TIEMPO DEMORARA
EL TANQUE EN
DRENARSE; Y DEPENDE
EL TIEMPO DE DRENADO
CON LA LONGITUD DEL
DIAMETRO DEL TANQUE Y
DEL ORIFICIO.
 EJERCICIO
6.105
 Repita el problema 6.96 si el tanque está sellado y existe una presión de 20kPa
(man)por encima del agua del tanque

Utilizamos la fórmula:

At / A j
¿
h
t 2 −t 1 = (¿¿ i 1/ 2−h1 /2 )
f
2¿
¿
 DATOS:
clc, clear all
disp(' Curso: Mécanica de fluidos')  P= 20 kPa
disp(' Prof: Guillermo Evangelista Benites')  Dt= 300 mm
disp('Ingrese datos:')  Do= 20 mm
disp('----------------------------------');  H1= 55 mm
%Ejercicio 6.105 - página 150 - figura 6.14  H2= 0 mm
%Repetir problema 6.96
%Libro Rober Mott/ Joseph Untener
disp(' ')
P=input('Ingrese la presión del tanque(Kpa): '); %Carga de Presion del tanque 20
P1=P; %Conversión de presión de (Kpa) a (KN/m^2)
pe=9.81; %Peso especifico (KN/m^3)
Pf=P1/pe, %Presion divido por su peso especifico
Dt=input('Ingrese el diametro del tanque(mm): '); %Diametro del tanque 300
Dot=Dt/1000; %Conversión del diametro del tanque
Do=input('Ingrese el diametro del orificio del tanque(mm): ');%Diametro del
orifio del tanque 20
Do1=Do/1000; %Conversión del diametro del orificio
H=input('Ingrese la altura del tanque antes de el drenado(mm): ');%Profundidad
del tanque 55
Ha=H/1000; %Conversión de la altura de tanque a (m)
H1=0; %Dato por quedar vacio el tanque
Hb=Ha+Pf;
H1a=H1+Pf;
At=(pi*(Dot^2))/4; % Área del tanque(m^2)
Ao=(pi*(Do1^2))/4; % Área del orificio del tanque(m^2)
g=32.2; % Gravedad(ft/s^2)
t=2*((At/Ao)/(sqrt(2*g)))*(sqrt(Hb)-sqrt(H1a)); % tiempo(s)
disp(' ');
fprintf('El tiempo requerido para drenar un tanque es: %5.2f s \n',t)

 RESULTADOS

 DISCUSIÓN

EN ESTE EJERCICIO, EL
RESULTADO ANTERIOR FUE
(24 seg), UN TIEMPO BAJO
DEBIDO A QUE LA ALTURA
DEL TANQUE ES PEQUEÑO
(55 mm); CON LA PRESION
QUE AHORA TIENE EL TIEMPO
DE DRENADO SERA MUCHO
 EJERCICIO 6_106 MENOR LLEGANDO A (1.07
seg). de 35 kPa
 Repita el problema 6.100 si el tanque está sellado y existe una presión
(man) por encima del agua del tanque.

Utilizamos la fórmula:
 At / A j
¿
h DATOS:
t 2 −t 1 = (¿¿ i 1/ 2−h1 /2 )
f
 P= 35 kPa
2¿  Dt= 1.25 m
¿
 Do= 25 mm
 H1= 1.38 m
clc, clear all  H2= 225 mm
disp(' Curso: Mécanica de fluidos')
disp(' Prof: Guillermo Evangelista Benites')
disp('Ingrese datos:')
disp('----------------------------------');
%Ejercicio 6.106 - página 150 - figura 6.14
%Repetir problema 6.100
%Libro Rober Mott/ Joseph Untener
disp(' ')
P=input('Ingrese la presión del tanque(Kpa) :'); %Carga de Presion del tanque 35
P1=P; %Conversión de presión de (Kpa) a (KN/m^2)
pe=9.81; %Peso especifico (KN/m^3)
Pf=P1/pe; %Presion divido por su peso especifico
Dt=input('Ingrese el diametro del tanque(m) :'); %Diametro del tanque 1.25
Do=input('Ingrese el diametro del orificio del tanque(mm): ');%Diametro del orifio
del tanque 25
Do1=Do/1000; %Conversión del diametro del orificio
H=input('Ingrese la profundidad original del tanque(m): ');%Profundidad original del
tanque 1.38
H1=input('Ingrese la profundidad final del tanque(mm): ');%Profundidad final del
tanque 225
H1a=H1/1000; %Conversión de profundidad final a (m)
Hb=H+Pf;
H2=(H-H1a);
H2b=(H2+Pf); %Diferencia de profundidades de tanque en los dos momentos (ft)
At=(pi*(Dt^2))/4; % Área del tanque(m^2)
Ao=(pi*(Do1^2))/4; % Área del orificio del tanque(m^2)
g=9.81; % Gravedad(m/s^2)
t=2*((At/Ao)/(sqrt(2*g)))*(sqrt(Hb)-sqrt(H2b)); % tiempo(s)
disp(' ');
fprintf('El tiempo requerido para drenar un tanque es: %5.2f s \n',t)

 RESULTADO

 DISCUSIÓN

COMPARANDO EL
RESULTADO ANTERIOR
(113 seg), CON LA
PRESION EJERCIDA EL
TIEMPO ES MUCHO
MENOR (76 seg),
AYUDANDO A DRENAR
6.
MAS 6.
RAPIDO
Cree EL TANQUE
una hoja de cálculo para determinar la velocidad del flujo desde un orificio a
 partir del teorema de Tornicelli, para cualquier profundidad de fluido y cantidad
de presión por encima del fluido. Aplíquela en los problemas 6.90 a 6.94.

 EJERCICIO 6.90
 Resuelva el problema 6.88 utilizando la aplicación directa del teorema de Torricelli.

Utilizamos la siguiente formula:

v2
v =√2 gh Teoremade Torriceli h=
2g

h , es la altura

v, velocidad del fluido

PROBLEMA 6.88

¿Qué profundidad de fluido por encima de la boquilla de salida se requiere para suministrar
200 gal/min de agua desde el tanque que se muestra. La boquilla tiene un diámetro de 3
in.

DATOS:
clc, clear all
disp(' Curso: Mécanica de fluidos')  Q= 200 gal/min
disp(' Prof: Guillermo Evangelista Benites')
%Ejercicio 6.90 - página 149 - figura 6.37  D= 3 in
%Acompañado de ejercicio 6.88
%Libro Rober Mott/ Joseph Untener
disp(' ');
disp('Ingrese datos:');
disp('-----------------');
Q=input('Ingrese el volumen(gal/min): '); %Volumen 200
Q1=Q/449; %Conversión de volumen a (ft^3/s)
D=input('Ingrese el diametro(in):'); %Diámetro del
tanque 3
D1=D/12; %Conversión de diametro a (ft)
%aplicando Teorema de Torriceli : V=sqrt(2gh)
%Ecuacion 6-16 , Pag 137
A=(pi*(D1^2))/4; % Área (ft^2)
V=Q1/A;% Velocidad(ft/s)
G=32.2; % Gravedad(ft/s^2)
H=(V^2)/(2*G); %Profundidad del fluido(ft)
disp(' ');
fprintf('La profundidad del tanque es: %5.2f ft \n',H)

 DISCUSIÓN

EN ESTE EJERCICIO USAMOS

LA FORMULA ARREGLADA DE
TORRICELI, COMPARANDO EL
 RESULTADO
RESULTADO VEMOS QUE EL
TANQUE ES PEQUEÑO, POR
ELLO LA VELOCIDAD DEBE
SER PROMEDIO.
 






 EJERCICIO 6.91
- ¿Hasta qué altura se elevará el chorro de fluido de acuerdo con las condiciones
mostradas en la fig. 6.39?

Utilizamos la siguiente ecuación:

p
H= ()
γ
+h ; para hallar la altura máxima del chorro que puede

alcanzar (Teorema de Torriceli)

DATOS:

 H= 2.60 m
 h 1 =0.85m
 h 2 =75 mm

h=h1−h 2 ,

clc, clear all

disp(' Curso: Mécanica de fluidos')
disp(' Prof: Guillermo Evangelista Benites')
%Ejercicio 6.91 - página 150 - figura 6.39
%Libro Rober Mott/ Joseph Untener
disp(' ')
disp('Ingrese datos:');
disp('-----------------');
H=input('Altura del tanque hasta el nivel del agua (m): '); %la altura del
tanque es 2.60
H1=input('Altura antes que salga el chorro (m): '); %La altura antes del
chorro es 0.85
H2=input('Altura de la boquilla del tubo (mm): '); %La altura de la boquilla
es 75  DISCUSIÓN
H3=H2/1000; %Conversion de la altura de la boquilla en (m)
HP=(H1+H3); %Suma de alturas antes del chorro (m) NOS AYUDA ENTENDER EL
HT=H-HP; PROBLEMA Y VERIFICAR
disp(' ');
fprintf('La profundidad del tanque es: %5.2f m \n',HT) LAS ALTURAS ANTES DE
 RESULTADO USAR LA ECUACION, EN
ESTE CASO LA ALTURA ES
DONDE EMPIEZA LA
BOQUILLA DEL TANQUE,
USANDOLO COMO PUNTO
DE REFERENCIA.
 EJERCICIO 6.92
- ¿Hasta qué altura se elevará el chorro de fluido de acuerdo con las condiciones
mostradas en la fig. 6.40?

- Utilizamos la siguiente ecuación:

p
- H= ()
γ
+h ; para hallar la altura máxima del chorro que puede

alcanzar (Teorema de Torriceli)

- h=h1−h 2 , DATOS:
clc, clear all  P= 12 psig
disp(' Curso: Mécanica de fluidos')  H= 3.50 f
disp(' Prof: Guillermo Evangelista Benites')
%Ejercicio 6.92 - página 150 - figura 6.40
 h 1 =9 in
%Libro Rober Mott/ Joseph Untener  h 2 =3 in
disp(' ')
disp('Ingrese datos:');
disp('--------------------------');
P=input('Presión sobre el nivel del agua (psig): ');%Presión sobre el
nivel del agua es 12
P1=(12*144); %Conversion de la presion (psig)a(lb/ft^2)
H=input('Altura del tanque hasta el nivel del agua (ft): '); %la
altura del tanque es 3.50
H1=input('Altura antes que salga el chorro (in): '); %La altura antes
del chorro es 9
H2=input('Altura de la boquilla del tubo (in): '); %La altura de la
boquilla es 3
H3=(H1+H2); %Suma de alturas antes del chorro (in)
Ha=H3/12; %Conversión de alturas antes del chorro a (ft)
HP=H-Ha; %Diferencia entre la altura del tanque con la suma de altura
antes del chorro
W=62.4; %Peso especifico del agua (lb/ft^3)
HT=HP+(P1/W); %Altura del tanque
disp(' ');
fprintf('La profundidad del tanque es: %5.2f ft \n',HT)
  RESULTADOS

 EJERCICIO 6.93
- ¿Qué presión se requiere por encima del agua de la figura 6.12 para hacer que el
chorro llegue a una altura de 28.0 ft? La profundidad del agua es de 4.50 ft

- Utilizamos la siguiente ecuación:

p
H= ()
γ
+h ; para hallar la altura máxima del chorro que puede

alcanzar (Teorema de Torriceli)

Despejando (P):
DATOS:
P=γ ( H −h)
 H= 28.0 f
clc, clear all  h 1 = 4.50 f
disp(' Curso: Mécanica de fluidos')
disp(' Prof: Guillermo Evangelista Benites')
%Ejercicio 6.93 - página 150 - figura 6.12
%Libro Rober Mott/ Joseph Untener
disp(' ')
disp('Ingrese datos');
disp('----------------------');
%Segun formula es: Ht=(Altura PARCIAL del chorro + presion/peso especifico
del fluido)
%Despejando (presión): Presión=peso especifico(Ht - altura
del chorro)
H=input('La altura que llegara el chorro (ft): '); %Altura
del chorro 28.0
H1=input('La altura antes del chorro (ft): '); %Altura
antes del chorro 4.50
W=62.4; %Peso especifico del agua (lb/ft^3)
P=W*(H-H1); %Presión hallada en (lb/ft^2)
P1=P/144; %Conversión de presion a (lb/in^2) o (psig)
disp(' ');
fprintf('La presion del tanque es: %5.2f psig \n',P1)
 RESULTADOS  DISCUSIÓN

ARREGLAMOS LA
ECUACION PARA DARNOS
EN FUNCION DE LA
PRESION EJERCIDA,
COMPARANDO EL
RESULTADO DE (10 psig); A
MAYOR DIFERENCIAS DE
ALTURAS MAYOR DEBE SER
LA PRESION DEL TANQUE.

 EJERCICIO 6.94
¿Qué presión se requiere por encima del agua de la figura 6.13 para hacer que el
chorro llegue a una altura de 9.50m? La profundidad del agua es de 1.50m.

- Utilizamos la siguiente ecuación:

p
H= ()
γ
+h ; para hallar la altura máxima del chorro que puede

alcanzar (Teorema de Torriceli)

Despejando (P):
DATOS:
P=γ ( H −h)
 H= 9.50 m
 h 1 = 1.50 m
clc, clear all
disp(' Curso: Mécanica de fluidos')
disp(' Prof: Guillermo Evangelista Benites')
%Ejercicio 6.94 - página 150 - figura 6.12
%Libro Rober Mott/ Joseph Untener
disp(' ')
disp('Ingrese datos');
disp('----------------------');
%Segun formula es: Ht=(Altura PARCIAL del chorro +
presion/peso especifico del fluido)
%Despejando (presión): Presión=peso especifico(Ht - altura
del chorro)
H=input('La altura que llegara el chorro (m): '); %Altura del
chorro 9.50
H1=input('La altura antes del chorro (m): '); %Altura antes
del chorro 1.50
W=9.81; %Peso especifico del agua (KN/m^3)
P=W*(H-H1); %Presión hallada en (KN/m^2) o (kPa)
disp(' ');
fprintf('La presion del tanque: %5.2f kPa \n',P)
  DISCUSIÓN
RESULTADOS
IGUALMENTE COMO EL
EJERCICIO ANTERIOR, HA
MAYOR DIFERENCIA DE
ALTURAS MAYOR SERA LA
PRESION DEL TANQUE,
SIN IMPORTAR LAS
UNIDADES DEL SISTEMA.