2078/CH5/EX5.18/Example5_18.sce


1
2
3
4
5
6
7
8
9
10

//Exa 5.18
clc;
clear;
close;
//Given data :
L=200;//km
f=50;//Hz
omega=2*%pi*f;//rad/s
Rise=omega^2*L^2*10^-8/18;//%
disp(Rise,"Percentage rise in voltage : ");