summaryrefslogtreecommitdiff
path: root/3556/CH11/EX11.18/Ex11_18.sce
blob: e4a6775567e4b6d572dbe4fd8076a23174742ded (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
clc
// Fundamental of Electric Circuit 
// Charles K. Alexander and  Matthew N.O Sadiku  
// Mc Graw Hill of New York 
// 5th Edition 

// Part 2     :  AC Circuits 
// Chapter 11 :  AC power Analysis 
// Example 11 - 18

clear; clc; close; 
//
// Given data
P          = 300.0000;
Vrms       = 13.0000; 
pf         = 0.8000;
Hours      = 520;
Energy_Charge = 0.0600;
pf_penalty  = 0.001;
pf_credit   = 0.001;
// Calculations Energy Consumed
W = P * Hours;
// Calculations Delta Energy Consumed 
Delta_W = (5*pf_penalty)*W;
// Calculation Total Energy Consumed 
Wt = W + Delta_W;
// Calculations Cost Per Month
Cost = Energy_Charge * Wt;
//
disp("Example 11-18 Solution : ");
printf(" \n a. Cost = Cost For Month    = %.3f Dollar",Cost)