작업

이 도전에서, 당신의 임무는 입력 문자열의 첫 문자와 마지막 문자가 같은지 여부에 따라 문자열을 가져 와서 참 또는 거짓 값을 출력하는 프로그램이나 함수를 작성하는 것입니다.

입력

합리적인 방법으로 입력을받을 수 있습니다. 그러나 입력이 사전 정의 된 변수에 있다고 가정하는 것은 허용되지 않습니다. 파일, 콘솔, 명령 행, 입력 필드 등에서 읽거나 함수 인수로 입력하는 것이 허용됩니다.

산출

결과를 변수에 할당하는 것을 제외하고는 합리적인 형식으로 출력 할 수 있습니다. 파일, 콘솔, 명령 행, 모달 박스, 함수 return명령문 등에 쓸 수 있습니다.

추가 규칙

• 입력 값도 비어있을 수 있으며, 잘못된 값을 반환해야합니다.

• 단일 문자 입력 문자열은 확실한 결과를 가져야합니다.

• 프로그램은 대소 문자를 구분해야합니다. helloH잘못된 값을 출력해야합니다.

• 단일 Truthy 값과 단일 Falsey 값만 가질 수 있습니다. 예를 들어, false입력 문자열 및 0다른 입력 문자열을 Falsey 값으로 출력 할 수 없습니다.

• 표준 허점 은 허용되지 않습니다.

테스트 사례

Input    ->    Output

"10h01"        Truthy
"Nothing"      Falsey
"Acccca"       Falsey
"wow!"         Falsey
"wow"          Truthy
"H"            Truthy
""             Falsey

이것은 code-golf 이므로 바이트 단위의 가장 짧은 코드가 이깁니다!

젤리 , 3 바이트

=ṚḢ

온라인으로 사용해보십시오!

파이썬 3 , 23 바이트

s=input()
s[0]!=s[-1]<e

출력은 종료 코드를 통해 이루어 지므로 0 (성공)은 정확하고 1 (실패)은 거짓입니다. 경우 이 허용하는 바이트를 저장할 수 있습니다.

온라인으로 사용해보십시오!

작동 원리

경우 우선, s는 빈 문자열, s[0]올릴 것이다 IndexError를 실패 할 프로그램을 일으키는.

비어를 들어 의 첫 번째와 마지막 문자가 동일한 경우, s[0]!=s[-1]로 평가됩니다 거짓 프로그램이 종료 너무 깨끗하게 즉시.

마지막으로, 문자가 다르면 True로s[0]!=s[-1] 평가되어 비교 가 수행됩니다. e 가 정의되어 있지 않기 때문에 NameError가 발생 합니다.s[-1]<e

Python 2와의 하위 호환성이 필요하지 않은 경우

s[0]!=s[-1]<3

문자열을 정수와 비교하면 TypeError 가 발생하기 때문에 작동합니다 .

자바 스크립트, 19 바이트

a=>a.endsWith(a[0])

Mathematica, 15 바이트

#&@@#===Last@#&

문자 배열을 취합니다. 입력이 비어 있지만 무시할 수 있으면 오류가 발생합니다.

05AB1E , 4 바이트

S¬Q¤

온라인으로 사용해보십시오! 또는 모든 테스트를 시도

S    # Split the input into individual characters
 ¬   # Get the first character
  Q  # Check all characters for equality to the first
   ¤ # Get the last value i.e. head == tail

망막 , 13 12 바이트

^(.)(.*\1)?$

온라인으로 사용해보십시오! 테스트 스위트를 포함합니다. 편집 : @ Kobi 덕분에 1 바이트가 절약되었습니다.

C ++, 39 바이트

[](auto s){return s[0]&&s[0]==s.back();}

전체 프로그램 :

#include <string>
#include <iostream>

using namespace std;

int main()
{
    string t = "";
    auto f = [](auto s){return s[0]&&s[0]==s.back();};
    cout << f(t);
}

온라인으로 사용해보십시오

Brachylog , 4 바이트

h~t?

온라인으로 사용해보십시오!

설명

h       The head of the Input...
 ~t?    ...is the tail of the Input

자바, 81 77 바이트

• -4 바이트, 감사합니다 @KevinCruijssen

온라인 시도

boolean f(String s){int l=s.length();return l>0&&s.charAt(l-1)==s.charAt(0);}

• 반환 true그들은 그렇지 않으면 동일한 있다면 false, false빈 문자열

배열 버전, 60 바이트

boolean f(char[]s){int l=s.length;return l>0&&s[0]==s[l-1];}

파이썬 2 , 26 25 24 바이트

바이트를 저장해 준 @Dennis 에게 감사합니다 !

lambda x:""<x[:1]==x[-1]

온라인으로 사용해보십시오!

brainfuck , 43 바이트

+>,[<,[>[->+<<->],]]<[[-]-<]-[----->+<]>--.

온라인으로 사용해보십시오!

설명

메인 루프는 [>[->+<<->],]입니다. 각 반복 후에 현재 위치의 오른쪽에있는 셀이 문자열의 첫 번째 바이트이고 왼쪽에있는 셀은 가장 최근에 처리 된 문자와 첫 번째 문자의 차이입니다. <[[-]-<]0이 아닌 경우 최종 결과를 -1로 변환하고 나머지는 -1과 0을 각각 48과 49 ( "0"및 "1")로 변환합니다.

하스켈 , 21 바이트

ca를 가져와 a String를 반환합니다 Bool.

c s=take 1s==[last s]

온라인으로 사용해보십시오!

• 빈 문자열이 아닌 경우 16 바이트 일 수 있습니다 c s=s!!0==last s.
• take 1s비어 s있지 않은 경우 를 제외 하고 첫 번째 요소 인 목록을 제공합니다 s.이 경우에도 비어 있습니다.
• last s 빈 문자열에서 오류가 발생하지만 Haskell의 게으름은 저장합니다. 단일 요소가있는 문자열은 요소를 평가하지 않고 항상 빈 문자열과 다릅니다.

MATL, 5 바이트

&=PO)

MATL Online 에서 사용해보십시오 !

설명

       % Implicitly grab input as a string (of length N)
&=     % Perform an element-wise equality check yielding an N x N matrix
P      % Flip this matrix up-down
O)     % Get the last value in the matrix (column-major ordering)
       % Implicitly display the result

빈 입력 문자열을 처리 해야하는 경우 다음 (8 바이트)과 같은 것이 작동합니다.

&=POwhO)

이 솔루션은 단순히 0N x N 행렬의 앞에 a 를 추가 하여 빈 입력의 경우 행렬이 0 x 0일 때 여전히 0값을 얻습니다.0)

MATL Online 에서 사용해보십시오

Japt , 6 바이트

tJ ¥Ug

온라인으로 사용해보십시오!

APL (Dyalog) , 4 바이트

⊃⌽=⊃

온라인으로 사용해보십시오!

설명

  =                     Compare
   ⊃                    The first element of the right argument with
 ⌽                      The right argument reversed
                        This will return an array of the length of the reversed argument. Each element in the resulting array will be either 0 or 1 depending on whether the element at that position of the reversed argument equals the first element of the original right argument
                        So with argument 'abcda', we compare 'a' with each character in 'adcba' which results in the array 1 0 0 0 1
⊃                       From this result, pick the first element.

이것이 빈 문자열에서 작동하는 이유입니다. ⊃빈 문자열에 적용 하면 공백이 반환됩니다 . 그러나 빈 문자열을 되 돌리면 여전히 빈 문자열이 반환되므로 빈 문자열을 비어 있지 않은 문자열 (이 경우 ) 과 비교 하면 빈 숫자 벡터가 생성됩니다. 그리고 ⊃빈 숫자 형 벡터에 적용 하면가 반환 0됩니다. 따라서 빈 문자열을 전달하면을 반환합니다 0.

자바, 52 43 바이트

s->!s.isEmpty()&&s.endsWith(""+s.charAt(0))

그것이 작동하게하려면 이것을 람다를 "go"로 만드는 다음과 같은 함수에 공급하십시오 :

private static boolean f(Function<String, Boolean> func, String value) {
  return func.apply(value);
}

루비, 26 24 바이트

@philomory 덕분에 2 바이트를 절약했습니다 !

->e{!!e[0]>0&&e[0]==e[-1]}

codegolf의 첫 번째 게시물-))

PHP> = 7.1, 23 바이트

1이 같고 문자가 다른 경우 아무것도 인쇄하지 않습니다.

<?=$argn[0]==$argn[-1];

스위프트, 57 바이트

var s=readLine()!,a=Array(s.characters);a[0]==a.last ?1:0

C #, 38 30 바이트

s=>s!=""&&s[0]==s[s.Length-1];

@raznagul 덕분에 8 바이트가 절약되었습니다.

R, 40 바이트

function(x)x>""&&rev(y<-charToRaw(x))==y

-2 바이트를위한 Nitrodon에게 감사합니다.

-8 바이트의 MickyT에게 감사드립니다.

테스트:

f=function(x)x>""&&rev(y<-charToRaw(x))==y
test <- c("10h01", "Nothing", "Acccca", "wow!", "wow", "H", "")
sapply(test, f)
all(sapply(test, f) == c(T, F, F, F, T, T, F))

산출:

> f=function(x)x>""&&rev(y<-charToRaw(x))==y
> test <- c("10h01", "Nothing", "Acccca", "wow!", "wow", "H", "")
> sapply(test, f)
  10h01 Nothing  Acccca    wow!     wow       H         
   TRUE   FALSE   FALSE   FALSE    TRUE    TRUE   FALSE 
> all(sapply(test, f) == c(T, F, F, F, T, T, F))
[1] TRUE

> <> , 39 33 바이트

 2i&01. >~&-?v1v
  i:1+?!^01. >0>n;

> <>를 사용하고 코드 골프를하는 것은 이번이 처음이므로 유용한 제안을 부탁드립니다.

코드는 세 가지 기본 섹션에 있습니다.

2i&01. Pushes an arbitrary number (2 in this case, this causes an empty string to print 0) onto the stack and puts the input's first character in the register.

>i:1+?!^01. Main loop. Pushes the next character onto the stack. If the string has been read completely, then go to the last section

>~&-?v1v
     >0>n;  Compare the first and last characters. Print 1 if they're the same, 0 if not

Google 스프레드 시트, 33 바이트

셀로부터 입력을 받아 [A1]출력한다 1truthy 입력 및 0falsey 입력.

=(A1<>"")*Exact(Left(A1),Right(A1

사용자가 수식 텍스트를 입력하고 Enter 키를 눌러 해당 셀을 나가 자마자 Google 스프레드 시트에서 자동으로이를 수정 하므로 괄호 안에 들어 Exact(있고 Right(닫히지 않습니다.

산출

아르 자형, 50 43 41 40 64

@ niczky12 및 @Giuseppe 덕분에 호출 가능한 함수를위한 41 바이트의 두 번째 솔루션-x = ""에 대해 수정 됨

r=function(x,y=utf8ToInt(x))ifelse(x=="","FALSE",(y==rev(y))[1])

첫 번째는 50 바이트이지만 챌린지는 아닙니다.

function(x){charToRaw(x)[1]==rev(charToRaw(x))[1]}

옥타브, 16 바이트

@(s)s(1)==s(end)

문자열 s을 입력으로 사용하고 첫 번째 s(1)요소를 마지막 요소와 비교합니다 s(end).

이 수 @(s)s(1)-s(end)는 스왑 OK 인 경우 true/false에 false/true.

GNU grep , 12 바이트

^(.)(.*\1)?$

확장 또는 PCRE 모드에서 실행하십시오.

이것이 속임수로 간주되는지 모르겠습니다.

자바 스크립트, 20 바이트

f=시작 부분에 추가 하고처럼 호출하십시오 f(arg).

_=>_[0]==_.slice(-1)

f=_=>_[0]==_.slice(-1)

i.oninput = e => o.innerHTML = f(i.value);

<input id=i><pre id=o></pre>

설명

이 함수는 인수를 _받습니다. 함수 본문 에서 ( 번째 인덱스) _[0]==_.slice(-1)의 첫 번째 요소가 마지막 요소와 같은지 확인하고 적절한 또는 부울을 반환합니다 ._0truefalse

SILOS , 81 바이트

loadLine
a=256
c=get a
lblb
t=s
s=get a
a+1
if s b
t-c
if t d
i+1
lbld
printInt i

온라인으로 사용해보십시오!

공통 리스프, 83 74 61 58 바이트

원본 : 83 바이트

저는 Common Lisp를 배우기 시작했습니다. 그래서 퍼터를 드라이빙 레인지로 데려 오는 것 같습니다. 내가 볼 수없는 일종의 재귀 매크로 마법사 또는 배열 조작이 있어야합니다.

이것은 문자열을 입력으로 받아들이는 익명 함수입니다.

(lambda (s) (let ((n (- (length s) 1))) (when (> n 0) (eq (char s 0) (char s n)))))

확인 됨 :

(lambda (s)
  (let ((n (- (length s) 1)))
    (when (> n 0)
      (eq (char s 0)
          (char s n)))))

더 매끄러운 솔루션을보고 싶습니다!

개정 1:74 바이트

표준 라이브러리 기능을 좋아해야합니다!

추한:

(lambda (s) (when (> (length s) 0) (eq (elt s 0) (elt (reverse s) 0))))

예쁜:

(lambda (s)
  (when (> (length s) 0)
    (eq (elt s 0)
        (elt (reverse s) 0))))

개정판 1.5 : 61 바이트

공백!

(lambda(s)(when(>(length s)0)(eq(elt s 0)(elt(reverse s)0))))

개정 2 : 58 바이트

추한:

(lambda(s)(and(>(length s)0)(not(mismatch s(reverse s)))))

예쁜:

(lambda (s)
  (and (> (length s) 0)
       (not (mismatch s (reverse s)))))

지금은 여기까지입니다! 나는 이미 똑똑하다고 생각합니다.

AWK, 29 34 바이트

다음 옵션을 사용하여 AWK를 호출해야하기 때문에 약간 부정 행위 일 수 있습니다.

`-F ''`

GNU Awk에서는 긴 형식 동의어를 사용할 수 있습니다.

`--field-separator=''`

그래서 이것을 설명하기 위해 총 5 바이트를 추가했습니다.

추한:

NR==1{a=$1}END{print(a==$NF)}

예쁜:

NR == 1
{
    a = $1
}

END
{
    print(a == $NF)
}