1697/CH1/EX1.3/Exa1_3.sce


1
2
3
4
5
6
7
8
9
10

//Exa 1.3
clc;
clear;
close;
//given data :
I=20;//in A
Rr=100;//in Ohm
//Formula : Wr=I^2*R
Wr=I^2*Rr;//in W
disp(Wr/1000,"Radiated power in KW : ");