pro10

Código de programación Matlab

% PROBLEMA 10
clc
clear
format compact
% Petróleo se bombea a través de una línea de tubería de 
% 4 pulgadas de diámetro.
% Las estaciones hidrométricas A y B se encuentran a 50 ft
% de separación, en un tramo recto y horizontal de la línea
% de tubería. 
% Las lecturas  manométricas en A y B son 25.4 y 16.7 psig. 
% La viscosidad cinemática del aceite es 0.005 ft^2/s y la 
% gravedad especifica es de 0.9. 
% Calcular la velocidad de flujo en ft^3/s.
pe=input(‘Valor de la gravedad específica = ‘);
%pe=.03609
vc=input(‘Valor de la viscosidad cinemática [ft^2/seg]= ‘);
%vc=.005
dr=input(‘Valor de la densidad relativa = ‘);
%dr=0.9
p1=input(‘Valor de la presión 1[lb/ft^2] = ‘);
%p1=16.7
p2=input(‘Valor de la presión 2 [lb/ft^2]= ‘);
%p2=25.4
Di=input(‘Valor del diámetro interno de la tubería = ‘);
%Di=.3355
s=input(‘Valor del área de la tubería = ‘);
%s=.0884
L=input(‘Valor de la longitud [ft]= ‘);
%L=50
a=144;
gc=32.2;
d=dr*pe
v=vc*d
dp=p2-p1
disp(‘El valor de la velocidad esta dado en [ft/s]’)
u=(dp*a*gc*Di^2)/(32*v*L)
disp(‘El valor del gasto tiene unidades de [ft^3/s]’)
Q=u*s