summaryrefslogtreecommitdiff
path: root/1439/CH19/EX19.1/19_1.sce
blob: c8298ea69e33e6f58319264a5a85832f8536db2e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
clc 
//initialisation of variables
Na= 1
Nb= 1
Nc= 1
Na1= 2
Nb1= 1
Nc1= 0
Na2= 3
Nb2= 0
Nc2= 0
//CALCULATIONS
Wabc= factorial(Na+Nb+Nc)/(factorial(Na)*factorial(Nb)*factorial(Nc))
Waab= factorial(Na1+Nb1+Nc1)/(factorial(Na1)*factorial(Nb1)*factorial(Nc1))
Waaa= factorial(Na2+Nb2+Nc2)/(factorial(Na2)*factorial(Nb2)*factorial(Nc2))
//RESULTS
printf ('Wabc = %.f ',Wabc)
printf ('\n Waab = %.f ',Waab)
printf ('\n Waaa = %.f ',Waaa)