Código de programación Matlab
% PROBLEMA 6 clc clear format compact % Aceite lubricante se bombea a razón de 0.8 ft^3/s a través de 1000ft de % largo y 6 in de diámetro de la tubería. El peso específico del aceite es % de 0.82 y la viscosidad dinámica es 2.45e-3 lb.s/ft^2. Calcule la caída % de presión si la tubería es horizontal cedula 40. disp(‘Cálculo de la caída de presión si la tubería es horizontal’) L=input(‘Dame la longitud de la tubería [ft] = ‘); %L=1000 Q=input(‘¿Cuál es la carga o flujo [ft^3/s]? ‘); %Q=.8 vd=input(‘Cuál es la viscosidad dinámica del fluido? ‘); %vd=2.45e-3 Di=input(‘Dame el valor del diámetro interno de la tubería = ‘); %Di=.5054 S=input(‘Dame el valor del área de la tubería = ‘); %S=.2006 gc=32.2; v=vd*gc u=Q/S disp(‘El valor de la caída de presión esta dado en [lb/ft^2]’) dp=(32*u*v*L)/(gc*Di^2)