25, 옥타브 , 196 바이트

새로운 요구 사항 : 탭 대 공백 토론을 피하기 위해 탭을 더 이상 들여 쓰기에 사용할 수 없습니다. 각 줄에는 여전히 탭이 필요하지만 줄의 첫 번째 문자는 될 수 없습니다.

.6;%+->?|"	"|?>-+%;6.
f=@(x)1&&cellfun(@(C)any(C=='	')&1&&find(C=='	')>1,strsplit(x,char(10)));
%	
%	
%	
%	
%	
%	
%Henry Jams?Hi, Retina!	
%	
%	
%	
%	
%	
%	
%	
%	
%	
%	
%	
%	
%	
%	
%	
%	
%	
%	
%	~

모든 프로그램을 온라인으로 확인하십시오!

만족합니다 :

2. 첫 번째 문자는입니다 ..
3. 이 포함되어 있습니다 e.
4. 길이는 짝수입니다.
5. 길이는 완벽한 정사각형입니다.
6. 이 포함되어 있습니다 a.
7. >문자 가 포함되어 있습니다 .
8. 정확한 문자열을 포함합니다 ->.
9. 정확한 문자열을 포함합니다 Hi, Retina!.
10. 처음 두 유니 코드 코드 포인트의 합은 5의 배수입니다.
11. 10 번째 문자는입니다 ".
12. 비어 있지 않은 마지막 줄에는 중복 문자가 없습니다.
13. 첫 번째 줄은 길이> 5의 회문입니다.
14. 첫 번째 줄의 길이는 정확히 21 자입니다 (줄 바꿈 제외).
15. 포함합니다 ?.
16. 포함합니다 |.
17. 을 포함합니다 +.
18. 길이는 28 줄 이상입니다.
19. 다음 문자는 총 5 번 사용됩니다 !"#$.[\]. 두 번째 문자의 코드 포인트는 60보다 작습니다.
20. Henry Jams?연속 하위 문자열로 포함합니다 .
21. 마지막 문자는 ~입니다.
22. 그것은 포함 C
23. 각 줄에는 탭 문자가 포함됩니다.
24. 아홉 번째 줄에는 줄 바꿈을 제외한 22 자 이상이 포함됩니다.
25. 탭 문자는 줄의 첫 번째 문자가 될 수 없습니다

향후 답변 :

• 첫 번째 문자는입니다 .. 그리고 21 번째 문자도 있습니다 (고장 법).
• 10 번째 문자는 "이므로 12 번째 문자 (고장 법)입니다.
• 첫 번째 줄은 길이 21의 회문입니다.
• 두 번째 문자의 유니 코드 코드 포인트 인 mod 5는 4 이고 해당 코드 포인트는 60보다 작습니다 (인쇄 가능 항목 ',1;6및 탭).
• 마지막 문자는 ~입니다.
• 길이는 완벽한 정사각형입니다.
• 길이는 28 줄 이상입니다.
• 9 번째 줄은 줄 바꿈을 제외하고 22 자 이상이어야합니다.
• 비어 있지 않은 마지막 줄에는 중복 문자가 없습니다.
• 정확한 문자열을 포함 ->, Hi, Retina!하고 Henry Jams?.
• 그것은 포함하고 |, +하고 C.
• 각 줄에는 적어도 하나의 탭 문자가 포함되지만 줄의 첫 번째 문자는 될 수 없습니다.
• 각 프로그램은 이제 2 허용 .하고 2 "첫 줄을, 그리고 !에 Hi, Retina!. 이 문자는을 사용하지 않고 다른 곳에서는 사용할 수 없습니다 #$[\].

설명:

실제로 각 줄마다 많은 바이트가 필요하기 때문에 이것을 196 바이트로 유지하는 것은 약간 어려웠습니다.

첫 번째 줄은 출력되지 않은 스칼라이며 주석이 이어집니다. 두 번째 줄은 문자열 x을 입력으로 사용하여 다음 작업을 수행 하는 익명 함수입니다 .

strsplit(x,char(10))   % Split at newlines. Can't use a literal newline, or [10,''] due to previous rules
cellfun(@(C) ...     ) % Perform the following operation on each line:
  any(C==' ')          % Make sure there is at least one tab character
  1&&find(C==' ')>1    % Make sure the index is higher than 1
1&&cellfun( ... )     % Check that this is true for all lines.

단락 작업 &&이 우선권을 &가지며 1&&find괄호가 필요하지 않은 것이 운이 좋습니다. 그렇지 않으면 나는 이것을 196 바이트로 골프를 칠 수 없습니다.

답변

.012
import sys
print(len(sys . stdin . read()) ** 0.5 % 1 == 0)

.11&&(s=>"Hi, Retina!->"&&s[9]=='"')

.1+C->|  "	"  |>-C+1.

>	main = interact test
>	test s = show (check (lines s))
>	check = all (elem tab)
>	tab = toEnum 9






















	Henry Jams?
	Hi, Retina!
	~