J-87 자
J에서 이것에 순진한 시도. 표준 라이브러리를 사용하지 마십시오.하지만 그것을 사용하면 더 짧아 질 것입니다.
((sad`happy{~1 e.(,[:+/@:*:,.&.":@{:)^:(1-{:e.}:)^:_);@,' ';'gtv]non-prime'}.~4+4*1&p:)
'((ad`app{~1 .(,[:+/@:*:,.&.":@{:)^:(1-{:.}:)^:_);@, ;onprm}.~4+4*1&p:)']'eighty-seven'
('(ad`app{~1 .(,[:+/@:*:,.&.:@{:)^:(1-{:.}:)^:);@, ;onprm}.~4+4*1&p:']'eighty-seven'"_)
맨 위의 줄은 정수를 사용하여 행복과 원시성을 출력 문자열로 진단하는 동사입니다. 두 번째 줄은 string을 반환하는 표현식이고 세 번째 줄은 eighty-seven
상수 함수입니다. 나는 둘 다 가능했기 때문에 둘 다 포함 시켰고, 프로그램과 달리 함수 응답에 대한 판결이 무엇인지 알지 못하기 때문에 J에는 인수없는 함수와 같은 것이 없습니다. 더미 논쟁.
우리는 대부분의 문자가 행복을 확인하는 것을 잃습니다. (,[:+/@:*:,.&.":@{:)
숫자의 자릿수의 제곱을 합하는 주체이며 해당 숫자 (1-{:e.}:)
가 아직 발생했는지 테스트합니다. sad`happy{~1 e.
이 단어를 단어 결과로 바꾸고 문자열 앞에 붙이면 non-prime
숫자가 실제로 소수라면 4 문자를 잘라낼 수 있습니다.
아나그램에서 우리 'eighty-seven'
는 무시하는 문자열에 없는 모든 비트를 숨 깁니다 . J에 재사용 할 글자가 더 있으면 더 잘할 수 있지만 그렇지 않습니다.
/*program1*/program2
다음은program1/*program2*/
? 나는 당신이 의견을 거부해야한다고 생각합니다.