summaryrefslogtreecommitdiff
path: root/3890/CH3/EX3.16/Ex3_16.sce
blob: e77965ecddefc0561018205abdb3784c10699ec4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//Electric machines and power systems by Syed A Nasar
//Publisher:TataMcgraw Hill
//Year: 2002 ; Edition - 7 
//Example 3.16
//Scilab Version : 6.0.0    ; OS : Windows

clc;
clear;

Q=10;
v1=440;
v2=110;
va2=550;
va1=440;

I2=Q*10^3/v2;
Qa=va2*I2;
Qc=va1*I2;
Qi=Qa-Qc;

printf('The power transferred inductively and conductively is Qc=%f Qi=%f in VA',Qc,Qi)