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 cédula? ‘); %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