summaryrefslogtreecommitdiff
path: root/3808/CH7/EX7.4/Ex7_4.sce
blob: 455dfafc58cab86d9b35ffcbb3024f532ae37bd6 (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
//Chapter 07: Discrete Probability

clc;
clear;

function result=combination(n,r) //function definition
i=n
num=1
denominator=1
l=(n-r)+1
u=n
for i=l:u //to compute the value of the numerator
num=num*i
end
for j=1:r //to compute the value of the denominator
denominator=denominator*j
end
result=num/denominator 
return result
endfunction

n1=input('Enter the total numbers: ')
n2=input('Enter the amount of numbers to pick correctly to win the prize:')
win=combination(n1,n2)
p_win=1/win
mprintf('The total no of ways to choose %d numbers out of %d number is: %d',n1,n2,win)
mprintf('\nThe probability of a winning combination is')
disp(p_win)