summaryrefslogtreecommitdiff
path: root/1985/CH1/EX1.3/chapter1_Example3.sce
blob: 9d063382a605af522294ef23fff90da06a242579 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

clc
clear

//INPUT DATA
l=1.2;//Length of of bar in m

//CALCULATIONS
k=sqrt(l^2/12);//Radius of gyration in m
T=sqrt(((k^2/(l/2))+(l/2))/9.8)*2*3.14;//Time period of the pendulum in s
L=((9.8*T^2)/(4*3.14^2));//Length in m
D=L-(l/2);//Another point where pendulum has same timeperiod in m

//OUTPUT
mprintf('The time period of pendulum is %3.3f s\nDistance of another point from centre of gravity on bar with same time period is %3.1f m',T,D)