summaryrefslogtreecommitdiff
path: root/1898/CH3/EX3.5/Ex3_5.sce
blob: 72a67ec2f41f96deafbb873270f4823341a32593 (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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
clear all; clc;

disp("Scilab Code Ex 3.5 : ")

//Given:
//Refer to the graph of shear stress-strain of titanium alloy.
x_A = 0.008; //rad - x co-ordinate of A
y_A = 360; //MPa - y co-ordinate of A
height = 50;//mm
l = 75; //mm
b = 100; //mm


//Calculations:

//Shear Modulus:
G = y_A/x_A;

//Proportional Limit:
tou_pl = 360; //Mpa Point A

//Ultimate Stresss:
tou_u = 504; //MPa - Max shear stress at B

//Maximum Elastic Displacement:
tanA= x_A;// tan theta is approximated as theta.
d = tanA*height;

//Shear Force:
A = l*b;
V = tou_pl*A;

//Display:


printf("\n\nThe Shear Modulus                = %10.2f MPa",G);
printf("\nThe Proportional Limit           = %10.2f Mpa",tou_pl);
printf("\nThe Ultimate Shear Stress        = %10.2f MPa ",tou_u);
printf("\nThe Maximum Elastic Displacement = %10.2f mm",d);
printf("\nThe Shear Force                  = %10.2f kN ",(V/1000));

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