summaryrefslogtreecommitdiff
path: root/3831/CH11/EX11.6/Ex11_6.sce
blob: e3108f37c04c206fa7f8428a0cdb8daca627025e (plain)
1
2
3
4
5
6
7
8
9
10
11
// Example 11_6
clc;funcprot(0);
// Given data
L_0=0.0700;// m
L=0.200;// m
T=20.0;// °C
K=0.150;// N/K

// Solution
Q_12=(-K*(T+273.15)*L_0*((L/L_0)-1)^3)/3;// N.m
printf("\n(c)The required heat transfer,Q_12=%1.2f N.m",Q_12);