summaryrefslogtreecommitdiff
path: root/3808/CH8/EX8.1/Ex8_1.sce
blob: aeefc31b26b851fc93f7b29b4feb0efb4033d9de (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Chapter 08: Advanced Counting Techniques

clc;
clear;

//For (-2 3)
u=-2                   //From definition 2
k=3                   //From definition 2
bin_coeff1=(u*(u-1)*(u-k+1))/factorial(k)

//For (1/2 3)
u=1/2                   //From definition 2
k=3                   //From definition 2
bin_coeff2=(u*(u-1)*(u-k+1))/factorial(k)

mprintf("The extended binomial coefficient for (-2 3) is %d",bin_coeff1)
mprintf("\nThe extended binomial coefficient for (1/2 3) is %f",bin_coeff2)