blob: e89f2101f9946918b377ac806a39d1e8f50b9230 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
clc
clear
disp('example 4 1')
day=30 //days
pll=40;nll=5;tll=3 //light load
pfl=100;nfl=3;tfl=5 //fan load
prl=1*1000 //refrigerator
pml=1*1000;nml=1 //misc. load
t1=2.74;t11=15//tariff
t2=2.70;t22=25 //tariff on 25 units
tr=2.32; //reamaining units
tc=7.00;//constant charge
dis=0.05//discount for prompt payment
te=(pll*nll*tll+pfl*nfl*tfl)*day+prl*day+pml*day
tee=te/1000
mb=tc+tr*(tee-t11-t22)+t1*t11+t2*t22
nmb=mb*(1-dis)
printf("total energy consumption in %d day %dunits \nthe monthly bill Rs%.2f \nnet monthly bill Rs%.2f",day,tee,mb,nmb)
|
