Dalam tantangan ini, Anda diharuskan untuk menggeser karakter dalam string yang dimasukkan n beberapa kali dan menghasilkan string yang digeser

Memasukkan

Input pertama akan berisi string. Di baris berikutnya, bilangan bulat, yang menunjukkan nakan ada.

Keluaran

• Jika npositif, pindahkan karakter dalam string ke waktu yang tepat n.
• Jika nnegatif, pindahkan karakter dalam string ke waktu kiri n.
• Jika nnol, jangan menggeser karakter dalam string.

Setelah bergeser (kecuali bila nnol), cetak string yang digeser.

Catatan

• String tidak akan kosong atau null.
• String tidak akan lebih dari 100 karakter dan hanya akan berisi karakter ASCII dalam rentang (spasi) hingga ~(tilde) (kode karakter 0x20 hingga 0x7E, inklusif). Lihat tabel ASCII untuk referensi.
• Pergeserannya adalah siklik.
• Jumlahnya nbisa positif, negatif, atau nol.
• n akan selalu lebih besar dari atau sama dengan -1000 dan lebih rendah dari atau sama dengan 1000
• Anda dapat mengambil input melalui stdinatau dari argumen baris perintah
• String yang digeser harus dihasilkan dalam stdout(atau setara terdekat)
• Anda dapat menulis program lengkap atau fungsi yang mengambil input dan output string stdoutatau setara terdekat

Uji Kasus

1)

Hello world!
5             -->orld!Hello w

2)

Testing...
-3            -->ting...Tes

3)

~~~
1000          -->~~~

4)

12345
0             -->12345

5)

ABA
17            -->BAA

Mencetak gol

Ini adalah kode-golf , jadi pengiriman terpendek (dalam byte) menang.

Pyth, 4 byte

.>zQ

Ini hampir mirip dengan versi 5 byte CJam saya , kecuali bahwa Pyth sebagai operator input auto-eval Q.

.>              # Cyclic right shift of 
  z             # Input first line as string
   Q            # Rest of the input as evaluated integer

Cobalah online di sini

Javascript ( ES5 ), 55 52 byte

p=prompt;with(p())p(slice(b=-p()%length)+slice(0,b))

Berkomentar:

p = prompt; // store a copy of prompt function for reuse
with(p()) // extend scope chain with first input
    p( // print result
        slice(b = -p() % length) // take second input negated and modulo length
        +                        // and slice string by result
        slice(0, b) // concatenate with opposite slice
    )

CJam, 5 byte

llim>

Ini cukup lurus ke depan.

l               e# Read the first line
 li             e# Read the second line and convert to integer
   m>           e# Shift rotate the first string by second integer places

Cobalah online di sini

C, 93 byte

main(a,v,n)char**v;{a=v[2]-v[1]-1;n=atoi(v[2]);a=a*(n>0)-n%a;printf("%s%.*s",v[1]+a,a,v[1]);}

Lebih jelas adalah versi argumen fungsi yang dimodifikasi untuk membuat versi argumen baris perintah

f(s,n,c)char*s;{c=strlen(s);c=c*(n>0)-n%c;printf("%s%.*s",s+c,c,s);}

Yang ini hanya 68 byte, yang hanya menunjukkan betapa dirugikannya C ketika berhadapan dengan argumen baris perintah.

Jika shift,, npositif maka strlen(s)-n%strlen(s)offset dan jika nnegatif offset tersebut -n%strlen(s). The printfcetakan dari offset, c, sampai akhir string, dan kemudian final ckarakter dari awal.

Contoh:

$ ./rotstr "Halo dunia!" 5
orld! Hello w
$ ./rotstr "Pengujian ..." -3
ting ... Tes
$ ./rotstr "~~~" 1000
~~~
$ ./rotstr "12345" 0
12345
$ ./rotstr "ABA" 17
BAA
$ ./rotstr "Halo dunia!" -16
o dunia! Neraka

Python 3, 45 byte

s=input();n=int(input());print(s[-n:]+s[:-n])

Inti dari program ini adalah

s[-n:]+s[:-n]

Semua yang lain hanyalah pekerjaan yang canggung dengan I / O.

K, 8 7 byte

{|x!|y}

Sudah ada "putar" primitif ( !) yang melakukan generalisasi operasi ini untuk daftar. String K adalah daftar karakter, jadi itu berlaku. Namun, spec lebih menyukai CJam dan Pyth, karena rotate K kebetulan bergerak berlawanan arah dengan apa yang diinginkan. Membungkus !fungsi dan meniadakan argumen implisit xakan melakukan apa yang kita inginkan:

  f:{(-x)!y}
{(-x)!y}
  f[5;"Hello world!"]
"orld!Hello w"
  f[-3;"Testing..."]
"ting...Tes"
  f[17;"ABA"]
"BAA"

Pendekatan yang sedikit lebih pendek, yang disarankan oleh kirbyfan64sos, adalah menghilangkan tanda kurung dan negasi untuk membalikkan string ( |) sebelum dan sesudah rotasi.

Jika bukan karena ketidakcocokan impedansi ini, solusinya akan sederhana

!

Disebut secara identik:

  f:!
!
  f[5;"Hello, World!"]
", World!Hello"
  f[-5;"Hello, World!"]
"orld!Hello, W"
  f[0;"Hello, World!"]
"Hello, World!"

Pip, 10 byte

Ini sangat mungkin ditingkatkan lebih lanjut. Namun, untuk bahasa tanpa operator shift, 10 byte tidak buruk.

a@_M-b+,#a

Penjelasan:

            a, b are command-line args (implicit)
       ,#a  range(len(a))
    -b+     range(-b, len(a)-b)
a@_M        map(lambda x: a[x], range(-b, len(a)-b))
            Concatenate the list and print (implicit)

Ia bekerja karena tali dan daftar indeks di Pip adalah siklus: "Hello"@9 == "Hello"@4 == "o".

rs , 180 chars

^(-\d+) (.*)/\1 \2\t
+^(-\d+) (.)(.*?)\t(.*)$/\1 \3\t\2\4
^(-\d+) \t/\1 
^(-?)(\d+)/\1 (_)^^(\2)
+_(_*) (.*)(.)$/\1 \3\2
^- /- \t
+^- (.*?)\t(.*?)(.)$/- \1\3\t\2
^-? +/
\t/

Demo langsung .

Sebagian besar dari ini membalikkan string jika angka input negatif. Saya mengambil keuntungan dari kenyataan bahwa hanya beberapa karakter ASCII yang inputnya valid dan menggunakan tab untuk keuntungan saya.

Perhatikan bahwa saya harus sedikit curang: karena rs adalah pengubah teks baris tunggal, saya harus menggunakan <number> <text>sebagai format input.

Jawa, 167

enum S{;public static void main(String[]r){int n=-Integer.parseInt(r[1]),l=r[0].length();while(n<0)n+=l;n%=l;System.out.print(r[0].substring(n)+r[0].substring(0,n));}}

Mengambil input melalui baris perintah.

cukup lucu, awalnya saya tidak sengaja membalikkan bagaimana string seharusnya digeser. Tetapi memperbaiki kesalahan itu lebih pendek dengan hanya mengalikan n dengan -1 lalu menulis logika dengan benar.

diperluas:

enum Shift{
    ;
    public static void main(String[]args){
        int n=-Integer.parseInt(args[1]),length=args[0].length();
        while(n<0)n+=length;
        n%=length;
        System.out.print(args[0].substring(n)+args[0].substring(0,n));
    }
}

PHP> = 7.1, 88 Bytes (Tidak Bersaing)

for([,$s,$t]=$argv;$t;)$s=$t<0?substr($s,1).$s[!$t++]:$s[-1].substr($s,!$t--,-1);echo$s;

Testcases

Japt , 2 byte

éV

Cobalah online

Casio Basic, 27 byte

StrRotate s,s,-n:Print s

Ternyata, ada built-in untuk ini di Casio ClassPad! Tapi itu bekerja secara terbalik -n.

24 byte untuk kode, 3 byte untuk ditentukan s,nsebagai argumen.

05AB1E , 6 byte

DgI+FÁ

Cobalah secara online atau verifikasi semua kasus uji .

Penjelasan:

D         # Duplicate the text input
 g        # Take it's length
          #  i.e. "Testing..." → 10
  I       # Take the integer input
   +      # Add them together
          #  i.e. 10 and -3 → 7
    F     # Loop that many times
     Á    #  And rotate once towards the right during every iteration

Karena 05AB1E hanya memiliki builtin untuk Rotate satu kali ke kanan / kiri , dan bukan Rotate Njumlah ke kanan / kiri , saya memutar length + inputjumlah kali dan memutar itu berkali-kali ke arah kanan.

Sebagai contoh:

• "Pengujian ..." dan -3 akan berputar 10 + -3 = 7kali ke kanan, menghasilkan ting...Tes.
• "Hello world" dan 5 akan berputar 11 + 5 = 16kali ke kanan, menghasilkan worldHello.

Julia 0,6 , 31 byte

s|n=String(circshift([s...],n))

Cobalah online!

Stax , 2 byte

|)

Jalankan dan debug itu

Perl 5 + -palF, 26 byte

$_=substr$_.$_,@F-<>%@F,@F

Cobalah online!