summaryrefslogtreecommitdiff
path: root/3774/CH1/EX1.2/Ex1_2.sce
blob: 0355ed31b272363e77ac2418f7b58032b052655d (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
// exa 1.2 Pg 14
clc;clear;close;
Pmax=100;// kW
Pmin=10;// kW
z=5;// no. of models

//Rn=Pmax/Pmin=fi**(z-1)
fi=(Pmax/Pmin)**(1/(z-1));// common ratio

printf('The power of generating sets are:')
P1=Pmin;// kW
for i=1:z
    printf('\n\t\t\tP%d = %.1f kW',i,P1)
    P1=fi*P1;//kW
end;

printf('\nExpanding for 10 models.');
z=10;// no. of models

fi=(Pmax/Pmin)**(1/(z-1));// common ratio

printf('\nThe power of generating sets are:')
P1=Pmin;// kW
for i=1:z
    printf('\n\t\t\tP%d = %.1f kW',i,P1)
    P1=fi*P1;//kW
end;