blob: a019e6bf9beb0dfa9f98941043d46893d0b729b3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
//Ex 3.1 page 117
clc;
clear;
close;
R=100;// ohm
Vs=230;// V
f=50;// Hz
alpha=45;// degree
Vo=Vs*sqrt(2)/2/%pi*(1+cosd(alpha));// V
Io=Vo/R;// A
printf('Average current = %.4f A',Io)
Vor=Vs/sqrt(2)*sqrt(1/180*((180-alpha)+sind(2*alpha)/2));// V
Ior=Vor/R;// A
P=Ior**2*R;// W
printf('\n Power delivered = %.2f W',P)
//Ans in the textbook is not accurate.
|
