3769/CH13/EX13.25/Ex13_25.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

clear
//Given
P=80                         //W
V=100.0                          //v
V1=200                             //V
f=50                               //Hz

//Calculation
//
Iv=P/V
Vc=sqrt(V1**2-V**2)
Xc=Vc/Iv
C=1/(2.0*%pi*f*Xc)

//Result
printf("\n Capcitance of a capacitor is %0.1f  micro F",C*10**6)