pengantar

Lagu masa kecil Eeny, meeny, miny, moe sering digunakan untuk memilih siapa "itu" ketika bermain tag. Semua orang akan berdiri dalam lingkaran dan menunjuk satu orang yang dipilih secara acak. Mereka akan bernyanyi:

Eeny, meeny, miny, moe,
Tangkap kaki harimau.
Jika dia berteriak, biarkan dia pergi,
Eeny, meeny, miny, moe.

Ketika mereka menyanyikan setiap kata, mereka menunjuk orang berikutnya dalam lingkaran. Orang yang diarahkan ketika "moe" terakhir dinyanyikan akan menjadi "itu". Anak-anak akan segera berdiri dan berpencar.

Tujuan

Laksanakan program terpendek dalam byte yang mengambil input, jumlah anak, dan daftar kata-kata yang dinyanyikan ketika mereka diarahkan.

Pemenang akan dipilih dalam satu minggu.

Memasukkan

Dari STDIN, bilangan bulat tunggal, positif, jumlah anak. Ini mungkin lebih dari jumlah kata dalam lagu.

Keluaran

Menulis untuk STDOUT daftar di mana setiap baris mewakili anak dan berisi kata dinyanyikan saat mereka sedang diarahkan. Jika ada terlalu banyak anak, baris kosong mungkin dihilangkan.

Persyaratan

• Selalu mulai dengan anak pertama.
• Tampilkan kata-kata tanpa tanda baca.
• "Moe" terakhir harus ditekankan sebagai "MOE!" termasuk tanda baca.

Contoh

Memasukkan

3

Keluaran

Eeny moe tiger toe hollers go miny
meeny Catch by If let Eeny MOE!
miny a the he him meeny

Memasukkan

7

Keluaran

Eeny by him
meeny the go
miny toe Eeny
moe If meeny
Catch he miny
a hollers MOE!
tiger let

Memasukkan

1

Keluaran

Eeny meeny miny moe Catch a tiger by the toe If he hollers let him go Eeny meeny miny MOE!

Memasukkan

21

Keluaran

Eeny
meeny
miny
moe
Catch
a
tiger
by
the
toe
If
he
hollers
let
him
go
Eeny
meeny
miny
MOE!

TeaScript , 82 byte

D`${a="Ey Ú9y ·ny "}¶e C® a g by e e If  Ò@s ¤t m go ${a}MOE!`q.KαtΣj═)j╝

Dekompresi, chunk, transpose, gabung, output.

Penjelasan

              // Implicit: x = input
D`...blah...` // Decompress "Eeny miny moe..."
q             // Split
Kα            // chunk into x-size blocks (α == x)
t             // Transpose
Σ             // Loop through lines
j═)             // Join with spaces
j╝            // Join with newline

Cobalah online

Non-bersaing 81 byte

Tidak αdirantai .jadi saya harus memperbaiki bug ini

D`${a="Ey Ú9y ·ny "}¶e C® a g by e e If  Ò@s ¤t m go ${a}MOE!`qKαtΣj═)j╝

Pyth, 103 89 84 karakter

Disimpan 18 byte dengan kompresi string, terima kasih kepada @Dennis dan @FryAmTheEggman
Menyimpan byte lain berkat @isaacg

Peringatan: ada banyak unsintables dalam kode; gunakan tautan di bawah untuk mencobanya.

VQjd%Q>cs[J."@y)òÎ5O¹c×Ú"."@yæ\J}ÇZH66¥ÓÀD¸¶=ðÉ §J%ÔþÖúÅ="J"MOE!")\@N

Cobalah online | Suite uji

Mungkin bisa bermain golf. Saran diterima!

Bagaimana itu bekerja

VQjd%Q>cs[J."..."."..."J"MOE!")\@N    Implicit: Q = eval(input)
VQ                                    For each item N in range 0...int(Q):
         [                    )        Create an array out of the following:
          J."..."                       Set J to this string, decompressed. ("Eeny@meeny@miny@")
                 ."..."                 This string, decompressed. ("moe@Catch@...let@him@go@")
                       J                J.
                        "MOE!"          "MOE!".
        s                              Join the array with the empty string.
       c                       \@      Split the result on "@".
      >                          N     Cut off the first N items.
    %Q                                 Take every Qth item.
  jd                                   Join with spaces.

Jelly, 84 byte

“£Dṡ“Ṙ©“Ė“¡Ḳ⁵“=U“¡Ẹ⁵“¡Ṇm“ȯf“ŀQ“ÞṖċ¥“ṅ_“Ẉ1“¡æḷ“¡ƒmxĠ“¡ṇƭEỤr“¡Þ¦»ṫ-2;;“MOE!”W¤sƓZj€⁶j⁷

Cobalah online!

JavaScript (ES6), 167 byte

l=Array(n=+prompt()).fill``;`${s=`Eeny meeny miny `}moe Catch a tiger by the toe If he hollers let him go ${s}MOE!`.split` `.map((w,i)=>l[i%n]+=w+` `);alert(l.join`
`)

Penjelasan

l=Array(              // l = array of lines
  n=+prompt()         // n = input number
).fill``;             // initialise l as empty strings

`${s=`Eeny meeny miny `}moe Catch a tiger by the toe If he hollers let him go ${s}MOE!`

.split` `.map((w,i)=> // for each word w
  l[i%n]+=w+` `       // add it to the lines
);
alert(l.join`
`)                    // output the lines

Haskell, 160 157 byte

import Data.Lists
unlines.map unwords.transpose.(`chunksOf`(["moe Catch a tiger by the toe If he hollers let him go","MOE!"]>>=words.("Eeny meeny miny "++)))

Tergantung "Eeny meeny miny "pada bagian lain ("moe Catch ..." dan "MOE!"), gabungkan kedua string, pisahkan menjadi kata-kata, ambil potongan dengan ukuran yang diperlukan, transpos dan gabungkan lagi menjadi satu string.

@Mauris menemukan 3 byte dengan memfaktorkan substring umum "Eeny meeny miny" dan membuat fpointfree.

Python 2, 154 147 byte

EDIT: Terima kasih, Joe Willis!

i=input()
s='Eeny meeny miny '
for j in range(i):print' '.join((s+'moe Catch a tiger by the toe If he hollers let him go '+s+'MOE!').split()[j::i]) 

Ini menggunakan trik yang [0 :: n] mencetak elemen ke-n dari daftar.

Coba di sini

Ruby, 160 byte

puts (a=[*%w[Eeny meeny miny moe Catch a tiger by the toe If he hollers let him go Eeny meeny miny MOE!].each_slice(gets.to_i)])[0].zip(*a[1..-1]).map{|x|x*' '}

Semua upaya saya untuk "mengompresi" string baru saja membuatnya lebih lama. Masih berusaha ...

puts                      # output to STDOUT...
(a=                       # assign this stuff to the variable a
 [*                       # convert to array...
  %w[blah blah]           # %w splits on spaces
  .each_slice(gets.to_i)  # split into slices of input number
 ]
)[0]                      # take the first element of a
.zip(*a[1..-1])           # zip it with the remaining elements
                          #   because transpose complains about ragged 2D arrays
.map{|x|x*' '}            # join all sub-arrays on space
                          #   puts automatically inserts newlines for us

JavaScript (ES6), 189 byte:

a=prompt(),b=Array(a--).fill``,c=0;"Eeny meeny miny moe Catch a tiger by the toe If he hollers let him go Eeny meeny miny MOE!".split` `.map(v=>(b[c]+=v+' ',c+=c>a-1?-c:1));alert(b.join`\n`)

Penjelasan:

a=prompt(), //Get the STDIN
b=Array(a--).fill``, //Make an array based on how many kids there are
c=0; //Start the iteration variable
"Eeny meeny miny moe Catch a tiger by the toe If he hollers let him go Eeny meeny miny MOE!"
.split` `.map(
    v=>(
        b[c] += v + ' ',
        c += c > a - 1 ? -c : 1
    )
);alert(b.join`\n`)

Python 3, 279 278 272 173 byte

(Terima kasih kepada Mathias Ettinger yang benar-benar menyelamatkan saya 100+ BYTES! )

s=" Eeny meeny miny moe Catch a tiger by the toe If he hollers let him go Eeny meeny miny moe!";w=s.split();i=input();i=int(i)
for z in range(i):W=w[z::i];print(" ".join(W))  

Jika ada yang punya tips atau saran, saya akan sangat menghargainya. Terima kasih!

Mathematica, 154 byte

StringRiffle[Thread@Partition[StringSplit@"Eeny meeny miny moe Catch a tiger by the toe If he hollers let him go Eeny meeny miny MOE!",#,#,1,""],"
"," "]&

Menggunakan metode split-chunk-transpose-join-output dari sebagian besar jawaban lainnya.

MATLAB, 167 byte / karakter:

n=input('');s='Eeny meeny miny ';s=strsplit([s 'moe Catch a tiger by the toe If he hollers let him go ' s 'MOE!']);f=@fprintf;for i=1:n f('%s ',s{i:n:end});f('\n');end

Penjelasan:

n=input('');             % Grab the input (number of children)
s='Eeny meeny miny ';    % Common string portion
% Build the full string and split into cell array at spaces
s=strsplit([s 'moe Catch a tiger by the toe If he hollers let him go ' s 'MOE!']);
f=@fprintf;              % Just a shorthand for later (only saves 1 char here)
for i=1:n                % Loop to the number of children
    f('%s ',s{i:n:end}); % Print each nth word, shifted by child
    f('\n');             % Start each child's words on a new line
end

Tidak akan memenangkan penghargaan apa pun selama ini, tapi itu menyenangkan. :-)

Japt, 90 87 86 byte

Uo mW{V=`EydÚ9yd·nyd` +`¶C®»dgdbydÈIfddÒ@sd¤tdmdgod{V}MOE!` qd f@Y%U¥W} m¸·

Banyak hal yang tidak patut. Cobalah online!

Bagaimana itu bekerja

              // Implicit: U = input
Uo mW{     }  // Create the range 0...U and map each item W to:
V=`...`       //  Set V to this string, decompressed. "Eenydmeenydmined"
+`...{V}MOE!` //  Concatenate it with this string, decompressed, with V inserted.
qd            //  Split at "d"s.
f@Y%U¥W       //  Filter to only the items where (index % U == W).
m¸            // Map each item by joining with spaces.
·             // Join the result with newlines.

Saya sudah mencoba mengompresi string dengan pembatas yang berbeda. Satu-satunya hal yang lebih efisien daripada spasi adalah huruf kecil, tetapi sebagian besar sudah digunakan, dan dengan demikian, tidak dapat digunakan untuk memisahkan string. Inilah jumlah kompresi yang dicapai dengan sisanya:

space -> 69 bytes
c -> 66 (including a null byte)
d -> 65
j -> 69
k -> 69
p -> 68
q -> 69
s -> 61 (but there's an s in "hollers")
u -> 65
w -> 67
x -> 69
y -> 69

Saat ini saya menggunakan d . Dimungkinkan untuk menyimpan byte dengan s, menggantikan beberapa huruf lain di hollers.