summaryrefslogtreecommitdiff
path: root/728/CH5/EX5.1/Ex5_1.sce
blob: fd11d407547e6c6d8fd52ab466ef49ebbb1473a0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
//Caption:Determine the minimum distance between two end plates
//Exa:5.1
clc;
clear;
close;
//Given: 
a=3;//in cm
c=3*10^10;//in cm/s
f=10*10^9;//in Hz
P_01=2.405;
d=%pi/sqrt(f^2*4*%pi^2/c^2-(P_01/a)^2);
disp(d,'Minimum distance (in cm) =');