- TI nspire
[TI-nspire] [program] 내 우산은 어디에? - 순열(Permutation)
-
- 2024.07.27 - 01:59 2015.09.28 - 20:35 957 3
문제 :
비오는 어느 날에 5명이 한 집에 모였습니다. 모임이 끝나고 돌아가려는데 갑자기 정전이 되어 어떤게 자기 우산인지 알 수 없게 되었고, 하는 수 없이 모두 아무 우산을 하나씩 들고 집으로 돌아갔습니다.
이 때 자기 우산을 가져간 사람이 0명일 경우의 수부터 5명인 경우의 수까지 차례대로 구하시오.
Define umb()=
Prgm
:
:Local this_combi
:Local my_umb,n_person
:
:newList(6)→n_person
:
:For d5,1,5
:
: For d4,1,5
: If d5=d4 Then
: Goto pass4
: EndIf
:
: For d3,1,5
: If d5=d3 or d4=d3 Then
: Goto pass3
: EndIf
:
: For d2,1,5
: If d5=d2 or d4=d2 or d3=d2 Then
: Goto pass2
: EndIf
:
: For d1,1,5
: If d5=d1 or d4=d1 or d3=d1 or d2=d1 Then
: Goto pass1
: EndIf
:
:© New Permutation list generated
: 1*{d5,d4,d3,d2,d1}→this_combi
: 0→my_umb
:
:© Count matching person
: For each_d,1,5
: If this_combi[each_d]=each_d Then
: my_umb+1→my_umb
: EndIf
: EndFor
:
: n_person[my_umb+1]+1→n_person[my_umb+1]
:
:© Disp "Test Disp",this_combi,"My Umb=",my_umb
:
: Lbl pass1
: EndFor
:
: Lbl pass2
: EndFor
:
: Lbl pass3
: EndFor
:
: Lbl pass4
: EndFor
:
:EndFor
:
:Disp "zero, one, ...., five = ",n_person
:EndPrgm
umb()
zero, one, ...., five = {44,45,20,10,0,1}
Done
-
25
세상의모든계산기 님의 최근 댓글
ES 나 EX 와 비교해 'CW 입력 방식이 변화가 큰 편'이어서 지금까지 추천하지는 않았는데, - EX 모델이 완전 단종 & 그로 인해 짝퉁문제가 앞으로 더 심각해질 듯 보임 - 그렇다고 지금 ES 추천하기는 강호의 도리상 고개가 저어지고... 이제 모두 CW로 넘어갈 타이밍이 되지 않았나 싶네요. 그런데 왜 또 4자리로 나와서... ㅋㅋ 미치겠네 2025 12.28 버튼 갯수 = 동일 버튼 배치 = 동일 버튼 음각이 없어지고, 마킹. 가독성 선택 태양광 패널 삭제. (그러면 5700CW 라고 해야 맞는 거 아닌가?) 그 외에 메뉴가 살짝 변경된 듯 함. (욕먹던 거 수정한 듯 보이기도) 배터리 1.5V LR44 -> 1.5V AAA https://www.reddit.com/r/calculators/comments/1o7kj7f/casio_fx9910cw_review_a_much_needed_improvement/ 2025 12.28 fx-570 CW 는 정밀도가 올라갔음. 여기까지 매우 정밀한 값 = 1.7887597505251 Math ERROR 는 아니고 Time Out 이 발생함. 아쉽게도... 2025 12.28 에러는 피했지만 오차는 피할 수 없음. 매우 정밀한 값 = 1.7887597505251 fx-570 ES 나 EX 는 여기까지가 한계 더 이상 작은 값이 대입되면 실질적으로 분모가 0으로 처리되어 ERROR (수식마다 한계가 다름) 2025 12.28 진짜 색약 안경은 비싸서 살 생각은 없고, 알리에서 싸구려 구매해서 테스트 해 봤습니다. 프로그램과 비슷한 효과가 있고, (프로그램과 비교해서) 알리 싸구려 렌즈가 - 숫자 구분이 아주 약간 더 잘 되고 - 붉은 색상이 더 밝습니다. 채도가 높다고 해야하는 것 같네요. 주의할 점은 알리 색약 안경은 일상용으로는 절대 사용 불가입니다. - 내부 빛반사 방지 코팅이 없어서 내 눈알이 렌즈에 비치고, 그래서 실제로 보여야 할 것과 섞여 보입니다. - 필터 코팅도 최악이라서 중심부(=마젠타) 주변부(=노랑)으로 서로 다르게 색이 들어옵니다. 전반적으로 그라데이션 발생. - 외부에서 봤을 때 렌즈색이 튀기 때문에, 티가 많이 납니다. - 색 구분 면에서는 도움이 될 수도 있지만, 녹색(특정 파장)이 차단되어 LED 신호등의 녹색이 잘 안보일 수 있습니다. 2025 12.24