summaryrefslogtreecommitdiff
path: root/1067/CH45/EX45.B.3/45_B_3.sce
blob: a97d4155058a66f8a4efa7a7be8770282e6f3093 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
clear;
clc;
c1=.8;
p1=120;
r1=p1/c1;
rr1=r1*(sin(acos(c1)));
c2=.9;
r2=p1/c2;
rr2=r2*(sin(acos(c2)));
rr2=round(rr2);
rr=rr1-rr2;
printf("the kVAr of capacitors = %fkVA",rr);