summaryrefslogtreecommitdiff
path: root/1985/CH3/EX3.8/Chapter3_Example8.sce
blob: 4ec725032458e8e1db897ecd1d7ff5d24ece3a56 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14

clc
clear

//INPUT
L=1.2;//Length of the satillite in m
v=0.98*3*10^8;//Speed of the satillite in m/s
c=3*10^8;//Speed of light in m s^-1

//CALCULATIONS
l=L*sqrt(1-(v^2/c^2))//The contracted length in m

//OUTPUT
mprintf('The contracted length is %3.4f m',l)