Diberikan string sdan angka non-negatif nkurang dari panjangnya s, menampilkan karakter pada nposisi -th dari s.

Pengindeksan 0 dan pengindeksan 1 diizinkan. Untuk pengindeksan 1, nakan positif dan kurang dari atau sama dengan panjang s.

s hanya akan terdiri dari karakter yang dapat dicetak.

Input / output yang masuk akal diizinkan. Celah standar berlaku.

Testcases (pengindeksan 0):

n s        output
0 "abcde"  a
1 "abcde"  b
2 "a != b" !
3 "+-*/"   /
4 "314159" 5

Testcases (1-indexing):

n s        output
1 "abcde"  a
2 "abcde"  b
3 "a != b" !
4 "+-*/"   /
5 "314159" 5

Ini adalah kode-golf , jadi jawaban tersingkat dalam byte menang.

MATL , 1 byte

)

Cobalah online!

Yah, sulit membuatnya lebih sederhana. )mengindeks input pertama, menggunakan nilai input kedua. Ini 1-diindeks.

Alice , 5 byte

I&IO@

Cobalah online!

Seperti biasa itu jauh lebih pendek jika kita menghindari mode Ordinal dan menggunakan format input yang buruk. Di sini, titik kode karakter pertama digunakan sebagai input integer . Sisa dari input adalah string. Indeks ini berbasis 1.

Penjelasan

I   Read a character and push its code point.
&I  Read that many more characters and push them.
O   Output the last one we read.
@   Terminate the program.

Python, 15 byte

str.__getitem__

atau

lambda s,i:s[i]

Keduanya mengambil 2 argumen: string dan indeks. Diindeks 0.

Haskell, 4 byte

(!!)

Pengindeksan berbasis 0. Contoh penggunaan: (!!) "Hello" 1-> 'e'.

Oktaf, 10 byte

@(s,n)s(n)

Mengambil string s, dan angka nsebagai input, dan mengembalikan nkarakter th s.

Retina , 28 20 19 byte

Disimpan 8 byte berkat @MartinEnder dengan tidak menggunakan grup penyeimbang

Disimpan 1 byte berkat @ mbomb007 dengan menggunakan ^.+alih-alih^\d+

^.+
$*
+`1¶.
¶
!1`.

Cobalah online!

Program ini diindeks 0.

05AB1E , 1 byte

Diindeks 0.

è

Cobalah online!

Alice , 10 byte

/@!O?]&
 I

Cobalah online!

Mengharapkan string pada baris pertama dan indeks berbasis 0 pada baris kedua.

Penjelasan

Terlepas dari kekayaan bawaannya, pengindeksan string tidak ada di Alice. Alasannya adalah karena ia membutuhkan integer dan parameter string, dan semua perintah di Alice benar-benar integer ke integer atau string ke string.

Secara umum, cara utama untuk melakukan operasi pada string yang membutuhkan atau menghasilkan bilangan bulat adalah dengan menyimpan string pada pita dalam mode Ordinal, yang kemudian dapat Anda manipulasi dengan bilangan bulat dalam mode Kardinal.

/    Reflect to SE. Switch to Ordinal. While in Ordinal mode, the IP bounces
     diagonally up and down through the program.
I    Read one line from STDIN and push it.
!    Store the string on the tape. This writes the character codes into consecutive
     tape cells starting at the tape head. (It also writes a -1 at the end as a
     terminator, but the tape is initialised to -1s anyway).

     The next few commands are junk that luckily doesn't affect the program:

?      Load the string from the tape and push it to the stack again.
&      Fold the next command over this string. That is, for each character
       in the string, push that character, then execute the command.
?      So we're folding "load" over the string itself. So if the string is "abc"
       we'll end up with "a" "abc" "b" "abc" "c" "abc" on the stack.
!      Store the top copy of "abc" on the tape (does nothing, because it's
       already there).

     Now the relevant part of the program continues.

I    Read another line from STDIN, i.e. the string representation of the index.
/    Reflect to W. Switch to Cardinal. The IP wraps to the last column.
&    Implicitly convert the string to the integer value it represents and
     repeat the next command that many times.
]    Move the tape head right that many cells. Note that Ordinal and Cardinal
     mode have separate tape heads, but they are initialised to the same cell.
?    Load the value from that cell, which is the code point of the character
     at the given index.
O    Print the corresponding character.
!    This discards or converts some of the strings on the stack and writes some
     value back to the tape, but it's irrelevant.
@    Terminate the program.

Jelly , 1 byte

ị

Cobalah online!

Prolog (SWI) , 40 37 byte

q(L,N,A):-nth0(N,L,X),char_code(A,X).

Cobalah online!

Brachylog , 2 byte

∋₎

Cobalah online!

Penjelasan

∋menyatukan outputnya dengan elemen Input. Dengan ₎sebagai subskrip, ia akan menyatukan outputnya dengan Ielemen th S, dengan [S,I]sebagai input.

Cubix , 8 byte

t@poIA//

Solusi ini diindeks 1. Input harus terdiri dari angka pertama, kemudian pemisah (yang bukan digit atau a .) dan kemudian string.

Cobalah online!

CJam , 3 byte

{=}

Cobalah online!

= adalah built-in untuk pengindeksan daftar / string.

Japt , 2 byte

gV

Solusi ini diindeks 0.

Cobalah online!

SILOS , 43 byte

loadLine
readIO
a=256+i
a=get a
printChar a

Cobalah online!

Cukup sederhana.

BF , 9 byte

,[->,<]>.

Indeks diambil melalui kode karakter char (seperti pengiriman Alice). Setelah itu, kami memiliki string.

Cobalah online!

TIO link menggunakan pembungkus Bash dan input dapat diubah dalam file header (alasan untuk pembungkus adalah agar kita dapat melihat byte).

JavaScript, 11 10 byte

s=>n=>s[n]

Menggunakan pengindeksan berbasis 0.

-1 byte terima kasih kepada @Leaky Nun

f=
s=>n=>s[n]
console.log(f("abcde")(0));
console.log(f("abcde")(1));
console.log(f("a != b")(2));
console.log(f("+-*/")(3));
console.log(f("314159")(4));

> <> , 13 + 1 = 14 byte

+1 untuk -vbendera untuk mengambil input

:?!\i~1-
io;\

Terima kasih kepada @steenbergh karena memberi tahu saya tentang-v bendera dan menyelamatkan saya 3 byte!

Masukkan indeks dengan argumen baris perintah -v [index] (0-diindeks) dan masukkan string melalui stdin.

Cobalah online!

Penjelasan

Tumpukan dimulai dengan indeks di atas.
:duplikat itu.
?abaikan karakter berikutnya jika indeksnya adalah 0. (Popping itu dari tumpukan)
Jika itu nol, \mencerminkan arah untuk turun. Kemudian, itu tercermin ke kanan dengan yang berikutnya \. Itu membungkus dan mengeksekusi ikarakter nput, mengucapkan odan ;menghentikan eksekusi.
Jika tidak, !lewati instruksi berikutnya, sehingga tidak turun.
i~memasukkan karakter dan kemudian segera membuangnya.
1mendorong 1.
-mengurangi 1dari indeks, sehingga satu karakter dalam input dikonsumsi dan indeks dikurangi. Program loop kembali ke :.

Wortel , 16 byte

$^//.{#}/S1//.$/

Cobalah online!

Format inputnya adalah sebagai berikut:

string
index

Dan program ini 1-diindeks.

Penjelasan

Wortel memiliki beberapa variabel global, satu untuk setiap jenis: string, float, dan array (lainnya akan segera diimplementasikan). Program dimulai dalam mode string, di mana semua operator akan mempengaruhi variabel string global. Dan saya menyebut variabel-variabel ini "tumpukan".

(Contoh masukan: abcdef\n3)

$                          Get the first line of the input and set the stack-string to this value
^                          Exit caret-mode
                           stack-string = "abcdef"
/                          Operator (behaves differently depending on the argument)
 /.{#}/                     And the argument to this operator is a regex, so this program gets the matches of this regex into the stack-array
  .                          Any character
   {#}                       Pops a line from the input. So now this evaluates to # of any character where # is the second line of the input (in this case, 3)
                           stack-array = ["abc"]
                           And now we just need to get the last character in this string, but first
S1                         Join the array on the number 1 and set this to the stack-string. Because the array only contains one element, the number 1 does not appear in the stack-string.
                           stack-string = "abc"
/                          Operator; because the argument is a regex, this retrieves the matches of the regex:
 /.$/                       Get the last character in the string
                           stack-array = ["c"]

Sekarang ini mengembalikan satu array elemen yang berisi string panjang satu, tetapi ditampilkan sebagai string di situs web.

Jika kita benar-benar ingin memberikan hasil sebagai string, kita dapat dengan mudah melakukannya S","pada akhirnya, tetapi tidak masalah karena outputnya masih terlihat sama pada interpreter.

Batch, 32 byte

@set/ps=
@call echo(%%s:~%1,1%%

Membaca sdari STDIN dan mengambil nsebagai parameter baris perintah.

GolfScript , 7 4 byte

~1/=

Cobalah online!

Saya payah dalam GolfScript, jadi saya menghargai bantuan Martin Ender .

Turtlèd , 9 byte

!?:[*l+].

Cobalah online!

penjelasan:

Pertama, Turtlèd berbasis grid, dengan benda penyu. Ada sel-sel kotak penyu dapat bergerak ke kiri, atas, bawah, dan kanan, dan dapat menulis sesuatu pada sel-sel jaringan.

[the first grid cell the turtle starts on is marked with a *]
!         input the string into the string variable

 ?        input the number into the number variable

  :       this command takes the number variable and moves right that many.
          hence this moves right by the amount inputted

   [*  ]  this is an `until` loop. the * there means that `until` the turtle ends the loop
          on a grid cell with * written on it (that is, the first cell), it will execute
          the code inside again and again

     l+   the code inside the while loop. the `l` moves the turtle left, and the +
          increments the string pointer. the string pointer is used with the string var;
          when you want to write something from the string, you use `.`, which writes
          the pointed char. the pointed char is the n-th character of the string, n being
          the value of the string pointer. this code will execute until the l moves
          the turtle back on to the origin cell. since we moved right by the number
          inputted, this will increase the string pointer (which starts at 1)
          by the amount inputted.

       .  write the pointed char, which was dealt with in the previous comment.
          if 0 is inputted, turtle stayed on the origin square, and executed none
          of the loop, and turtle writes the first char of string input.
          if 1 is inputted, turtle moved one right, moved one left and incremented
          string pointer once, which means the second char is written. and so on.


          [the char of input has been written over the origin square]
          [implicitly the grid is outputted, which has spaces and blank lines taken out]
          [this is the requested char outputted, plus an unavoidable trailing newline
          due to how I made the interpreter. sue me]

Clojure, 3

nth

: P Apa yang dapat Anda lakukan ketika ada built-in untuk ini? Ini berfungsi pada daftar, vektor, string dan urutan. Ini bisa O (1) atau O (n), tergantung pada tipe data yang digunakan.

sed , 31 byte

:
/^1/{s:1 .: :;b}
s: (.).*:\1:

Cobalah online!

Input: indeks dan string, dipisahkan oleh satu spasi. Indeks di unary, tetapi berbasis nol.

Dyvil , 4 Bytes

_[_]

Membuat fungsi anonim yang mengambil a Stringdan an intdan mengembalikan achar.

Pemakaian:

let f: (String, int) -> char = _[_]
print f("abc", 1) // b

Pip, 3 bytes

a@b

This is 0-based. Try it online!

QBasic 4.5, 24 bytes

INPUT a$,b:?MID$(a$,b,1)

Pretty straightforward.

Vim, 8 bytes

DJ@"|xVp

Karena V kompatibel dari belakang, Anda dapat mencobanya secara online!

Mathematica, 18 byte

#~StringTake~{#2}&

Solusi dasar, tetapi sayangnya nama fungsinya cukup panjang.

C #, 11 byte

s=>n=>s[n];