Meydan okuma

Bu görev an N tamsayı girişi bir alacak bir programı yazmak zorunda (-1e9 <= K <0 && 0 <N <= + 1E9) , daha sonra hesaplamak , T = (abs (K)% M + 1) , eğer N pozitiftir, ardından T-th karakterini en başından çıkartın, T-th karakterini kaynağınızın sonundan çıkarın.

M, kaynağınızın bayt cinsinden boyutudur.

Örnek: Kaynağınız:abcd efg/hi

Giriş:

 2

Çıktı:

 c

Giriş :

-3

Çıktı:

g 

Giriş :

-9249678

Çıktı:

b 

Giriş :

-11

Çıktı:

i 

Kısıtlamalar

• Herhangi bir DOSYA işlemi kullanmayın
• İstediğiniz herhangi bir dili kullanabilirsiniz
• Tüm bayramları bozduğu için 1 baytlık gönderimlerden kaçının ya da kullanmayın.
• En kısa çözüm kazanır!

DÜZENLEME: Sorun bildirimi, çözümlerin rasgele bir test verileri (ve tüm çözümler için aynı veriler) kullanılarak değerlendirilebilmesi için değiştirildi, bu nedenle lütfen çözümünüzü uygun şekilde güncelleyin, rahatsızlıktan dolayı özür dileriz (varsa).

x86 derlemesi (32 bit Linux, AT&T sözdizimi): 548

Dosyanın sonunda yeni satır yok:

pushl 8(%esp)
call atoi
mov $274,%ebx
cmp $0,%eax
jg a
dec %eax
a:cdq
idiv %ebx
cmp $0,%edx
jge p
add %ebx,%edx
p:add $s,%edx
cmp $s+273,%edx
jl l
push $34
mov %esp,%edx
l:mov $4,%eax
mov $1,%ebx
mov %edx,%ecx
mov $1,%edx
int $128
mov $0,%ebx
mov $1,%eax
int $128
s:.ascii "pushl 8(%esp)
call atoi
mov $274,%ebx
cmp $0,%eax
jg a
dec %eax
a:cdq
idiv %ebx
cmp $0,%edx
jge p
add %ebx,%edx
p:add $s,%edx
cmp $s+273,%edx
jl l
push $34
mov %esp,%edx
l:mov $4,%eax
mov $1,%ebx
mov %edx,%ecx
mov $1,%edx
int $128
mov $0,%ebx
mov $1,%eax
int $128
s:.ascii "

İle derledim gcc -nostartfiles -m32 qc1.S -o qc1

Doğrulama, pozitif sayılar:

$ for i in $(seq 548 1095); do ./qc1 $i; done | cmp - qc1.S && echo Good
Good

Doğrulama, negatif sayılar:

$ for i in $(seq -1095 -548); do ./qc1 $i; done | cmp - qc1.S && echo Good
Good

Edit , garip numaralandırma şemasını doğru anladı. Bence. Uzunluğunu değiştirmedi.

Whaddaya biliyor, HQ9 + büyük geri dönüş yapıyor!

Q

Aralarından seçim yapabileceğiniz tek bir karakter olduğunda endekslemeyi zahmete sokmanıza gerek yok!

Yakut 1.9, 66 karakter

z=gets.to_i;s="z=gets.to_i;s=%p;$><<(s%%s)[z%%66]";$><<(s%s)[z%66]

Aslında normal bir kine için pek fark yok.

• Düzenle: Yeni özellikleri şimdi izler.

GolfScript 26 karakter

{':f`f'+1/\~.1<- 26%=}:f`f

Dinamik diller icat edilmeden önce ayinler daha eğlenceliydi.

Düzenleme: Sızıntılar için burada "gerçek" bir GolfScript quine, hayır `ve ~ sadece girdi ayrıştırmak için kullanılır.

Engelli GolfScript 44 karakterleri

'"\x27"\+1/\~.1<- 22%='"\x27"\+1/\~.1<- 22%=

Aynı dize iki kez tekrarlanan ne kadar güzel olduğuna dikkat edin, bu yüzden dize hazır bilgisi sadece 'önünde bir saldırıya ihtiyaç duyar ve kullanıma hazırdır.

Lenguage, 4 bayt

Kaynak kodu 4 boş bayttan oluşur. Girdi ne olursa olsun, çıktı bir byte ile tamamlanan bir boş bayt olmalıdır ..

Smalltalk, 94 90 59 52

örneğin, Object sınıfında derleyin:

q:n|s|s:=thisContext method source.^s at:n\\s size+1

sonra herhangi bir nesneye q: <n> gönderin; burada bir tamsayı:

doğrulama:

1 q: 0 -> q
1 q: 1 ->:
1 q: 2 -> n
...
1 q: -1 ->)
1 q: -2 ->)
1 q: -3 -> 1

veya daha iyisi:
(0 ila: 100) toplayın: [: n | 1 q: n] as: String
->')q:n|s m|s:=thisContext method source.m:=s size.^s at:(n>=0ifTrue:n-1\\m+1ifFalse:m-(0-n\\m))q:n|s m|'

(-1 downTo: -500) toplamak: [: n | 1 q: n] as: String
->')m\\n-0(-m:eslaFfi1+m\\1-n:eurTfi0=>n(:ta s^.ezis s=:m.ecruos dohtem txetnoCsiht=:s|m s|n:q))m\\n-0('

Smalltalkers olmayanlar için açıklama:
thisContext , yöntemi istenebilecek, kaynak istenebilecek geçerli yığın çerçevesidir .

Runik Efsunlar , 17 bayt

"3X4+kSq:l͍iS%%@

Çevrimiçi deneyin!

Program dizesini oluşturmak için sadece standart quine kullanır, ardından belirli bir dizindeki karakteri almak için dize tabanlı modulo operatörü ^1'i kullanır (bu, doğal ve negatif göstergeleri, Python'un etkilediği davranışı destekler).

1. _{,"Bölmek" komutu keser parçalar halinde dize kadar (mantıksal yeterince ters *dize çoğaltarak xkez), +bitiştirir ve -kaldırır xucundan karakterleri (mantıksal yeterince ters +). Bu nedenle %komut şu rolü alır charAt(x): kalan tek temel dize işlemi (yığın benzeri işlemler, yığınla ilgili aynı komutlar tarafından işlendikten sonra; örneğin l, yığının boyutu, yani l͍bir dizenin uzunluğudur).}

JavaScript (ES6), 28 bayt

f=n=>("f="+f).substr(n%28,1)

Değiştirilmiş bir kine.

28'den büyük %28bir değer işlenir , 0'dan küçük bir değer işlenir .substr().