summaryrefslogtreecommitdiff
path: root/1802/CH10/EX10.6/Exa10_6.sce
blob: e07b54d8484b471258250023bb4ece41eaf563e1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Exa 10.6
clc;
clear;
close;
//Given Data :
format('v',7);
Im=30;//in Ampere
f=50;//in Hz
V=200;//in volts
cosfi_1=0.7;//powerfactor
Ia=Im*cosfi_1;//in Ampere
tanfi_1=tand(acosd(cosfi_1));//unitless
Ir1=Ia*tanfi_1;//in Ampere
cosfi_2=0.85;//powerfactor
tanfi_2=tand(acosd(cosfi_2));//unitless
Ir2=Ia*tanfi_2;//in Ampere
Ic=Ir1-Ir2;//in Ampere
C=Ic/(2*%pi*f*V);//in farads
disp(C*10^6,"Capacity of condenser(in uF) :");