summaryrefslogtreecommitdiff
path: root/1898/CH14/EX14.13/Ex14_13.sce
blob: dbacc100fdfa57808ac7e7f7594764a0c9871ae3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
clear all; clc;

disp("Scilab Code Ex 14.13 : ")

//Given:
del_T = 60; //degree celcius
alpha = 12*10^-6; //per degree celcius
E = 200*10^6; //kN/m^2
A = 250*10^-6; //m^2
L = 4; //m

//Virtual Work Equation:
n = 1.155; //kN
N = -12; //kN

del_bh = (n*N*L)/(A*E) + (n*alpha*del_T*L);
del_bh = del_bh*1000;

//Display:

printf('\n\nThe horizontal displacement of joint B of the truss   = %1.2f mm',del_bh);

//---------------------------------------------------------------------END--------------------------------------------------------------------------------------------