2075/CH4/EX4.3/pe4_3.sce


1
2
3
4
5
6
7
8
9
10
11
12
13

//example 4.3
clc; funcprot(0);
// Initialization of Variable
Rl=10;
V=12;
Vl=5;
//calculation
Pl=Vl^2/Rl;
I=Vl/Rl;
Ps=V*I;
Pic=Ps-Pl;
disp(Pic,"power delivered in watt:")
clear()