Código de programación Matlab
% PROBLEMA 8
clc
clear
format compact
% Un tubo circular horizontal contiene asfalto, con una viscosidad 100000cp y
% una presión de 70lb/ft^3. El radio del tubo es de 1 in. El asfalto puede
% ser considerado como un líquido newtoniano para los propósitos de este
% problema. ¿Cuál es la velocidad de flujo en estado estacionario?
disp(‘Para calcular la velocidad del flujo en estado estacionario’)
v=input(‘¿Cuál es la viscosidad del fluido [lb/ft.s]? ‘);
%v=67.2
d=input(‘¿Cuál es la densidad del fluido [lb/ft^3]? ‘);
%d=70
r=input(‘¿Cuál es el radio de la tubería [ft]? ‘);
%r=.1666
dp=input(‘¿Cuál es la diferencia de presión en el sistema [lb/ft^2]? ‘);
%dp=144
L=input(‘Dame el valor de la longitud del tubo [ft]? ‘);
%L=1
Di=input(‘¿Cuál es el diámetro interior de la tubería? ‘);
%Di=.1722
S=input(‘¿Cuál es el área de la tubería de acuerdo a la cedula? ‘);
%S=.0233
gc=32.2;
disp(‘Las unidades de la velocidad son [ft/s]’)
u=(dp*gc*Di^2)/(32*L*v)
disp(‘Las unidades del gasto están dadas en [ft^3/s]’)
Q=u*S
Flujo de Fluidos 