summaryrefslogtreecommitdiff
path: root/2414/CH6/EX6.15/Ex6_15.sce
blob: 7547dafd437ddb1cc013ff05dfa7522816fe7cd4 (plain)
1
2
3
4
5
6
7
8
9
10
clc;
close();
//page no 208
//prob no. 6.15
P=1000;  //in watts
R=50;  //in ohm
Vrms=sqrt(R*P);  //in V
Irms=sqrt(P/R);  //in A
disp('V',Vrms,'The unmodulated rms carrier voltage is ');
disp('A',Irms,'The unmodulated rms carrier current is ');