Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function nopat(m,n)
- # m noppaa, n arvontaa
- # mikä on todennäköisyys, että noppien arvonnassa
- # kaikissa on eri silmäluku
- kaikkieri = 0 # kirjaa oikeita heittoja (kaikki eri lukuja)
- for k in 1:n # heittokierros alkaa
- sama = 0
- a = rand(1:6,m) # arvotaan m noppaa
- # tutkitaan ovatko noppien silmäluvut uniikkeja
- for i = 1 : m-1
- for j = i+1:m
- sama += (a[j] == a[i])
- end
- end
- if sama == 0
- kaikkieri += 1
- end
- end
- return kaikkieri/n
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement