summaryrefslogtreecommitdiff
path: root/2075/CH3/EX3.9/pe3_9.sce
blob: 41c94ea3d7c732dfb885c1d48bb94b8d5dce8016 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//example 3.9
clc; funcprot(0);
// Initialization of Variable
Vin=1;
Ri=1100;
Rf=10000;
Rl=8;
Vs=18;
pi=3.1428;
//calculation
Ir=Vin/Ri;
Vl=Ir*(Ri+Rf);
Ip=Vl/Rl;
Pl=(Vl*Ip)/2;
disp(Pl,"power delivered to the load in Watt:-")
Ps=(Vs*Ip)/pi;
disp(Ps,"power provided by each supply in Watt:-")
clear()