summaryrefslogtreecommitdiff
path: root/3775/CH3/EX3.2/Ex3_2.sce
blob: c276b4c9f5e89243d4504094d255e6609c98f999 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Ex 3.2 page 118

clc;
clear;
close;

R=10;// ohm
E=165;// V
//vt=330*sin(314*t)
Vm=330;// V
f=314/2/%pi;// Hz
alpha1=asin(E/Vm);// radian
alpha2=%pi-alpha1;// radian
Io=1/2/%pi/R*(2*Vm*cos(alpha1)-E*(alpha2-alpha1));// A
P=E*Io;// W

printf('Power supplied to battery = %d W',P)