blob: fff23bee66a0d6dd845175611e4c771fe6d44c04 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
clear all; clc;
disp("Scilab Code Ex 14.8 : ")
//Given:
ro = 60; //mm
ri = 50; //mm
E = 70; //kN/mm^2
W = 600; //kN
L = 240; //mm
h = 0;
//Part a:
A = (%pi)*(ro^2 - ri^2);
del_st= (W*L)/(A*E);
//Part b:
del_max = del_st*(1 + sqrt(1 + 2*(h/del_st)));
//Display:
printf('\n\nThe maximum displacement at the top of the pipe for gradually applied load = %1.4f mm',del_st);
printf('\nThe maximum displacement at the top of the pipe for suddenly applied load = %1.4f mm',del_max);
//---------------------------------------------------------------------------END------------------------------------------------------------------------------
|
