Advertisement
jukaukor

birthday.jl

Jun 10th, 2023
25
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.01 KB | None | 0 0
  1. # sama syntymäpäivä
  2. # Juhani Kaukoranta 9.6.2023
  3. using DataStructures
  4. function birthday(n)
  5. # n henkilöiden lukumäärä
  6. a = counter(rand(1:365,n)) # arvonta,lajittelu syntymäpäivistä
  7. samebirthday = 0
  8. max = 0 # laskee samanpäiväisten osumien maksimia
  9. maxi = 0 # pitää kirjaa maksimin päivämäärästä
  10. maxdays = [] # kirjaa maksimipäivämääriä
  11. for i = 1 : 365
  12. if a[i]> 1
  13. #println("day ",i," osumia ",a[i])
  14. samebirthday += 1
  15. if a[i] > max
  16. max = a[i]
  17. maxi = i # maksimipäivä muistiin
  18. end
  19. end
  20. end
  21. # etsitään päivät jolloin oli maxi osumaa
  22. for i = 1:365
  23. if a[i] == max
  24. push!(maxdays,i)
  25. end
  26. end
  27. println("Henkilöjoukko ",n)
  28. println("samoja syntymäpäiviä oli ",samebirthday)
  29. println("samalle päivälle osuvien syntymien maksimi = ",max)
  30. println("maksimiosumapäiviä olivat päivät ",maxdays)
  31. end
  32.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement