//Example_a_6_12 page no:241
clc;
I1mag=2.213;
I1ang=-154.9;
P=50*I1mag^2/2;
disp(P,"average power delivered by the independent source is (in W)");