সংখ্যা হিসাবে বিভক্ত করুন, স্ট্রিং হিসাবে যোগদান করুন, পুনরাবৃত্তি করুন


14

এর প্রক্রিয়াটি বিবেচনা করুন:

  1. একটি অ-নেতিবাচক পূর্ণসংখ্যক এন নেওয়া
    যেমন 27

  2. এটি পূর্ণসংখ্যায় বিভক্ত করা N - floor(N/2)এবং floor(N/2)(একটি 'বৃহত্তর' এবং 'ছোট' অর্ধেক) এবং সেগুলিতে সেগুলি লিখছি।
    যেমন 27হয়ে যায় 14 13

  3. পূর্ণসংখ্যাকে একটি নতুন, আরও বড় পূর্ণসংখ্যার সাথে যুক্ত করার জন্য স্থানটি সরিয়ে ফেলা হচ্ছে।
    যেমন 14 13হয়ে যায় 1413

  4. 2 এবং 3 পদক্ষেপ পুনরাবৃত্তি করা হয়েছে কিছু পছন্দসই সংখ্যা number
    যেমন 1413707 706707706353853 353853353853353853→ ...

এই চ্যালেঞ্জটি হুবহু এটি করা সম্পর্কে, তবে সবসময় বেস 10 এ নয়।

চ্যালেঞ্জ

একটি প্রোগ্রাম লিখুন যা বি, এন, এবং এস তিনটি সংখ্যায় নেবে:

  • বি 2 থেকে 10 এর পূর্ণসংখ্যা যা N এর বেস (বাইনারি থেকে দশমিক)।

  • এন বিভাজন-পুনরায় যোগদান প্রক্রিয়া প্রয়োগ করার জন্য অ-নেতিবাচক পূর্ণসংখ্যা ger ব্যবহারকারীর ইনপুটটিকে আরও সহজ করার জন্য, এটি বেস বিতে স্ট্রিং হিসাবে দেওয়া হয় , পূর্ণসংখ্যা নয়।

  • এস হ'ল একটি অ-নেতিবাচক পূর্ণসংখ্যা যা বিভাজন-পুনরায় যোগদান প্রক্রিয়াটির পুনরাবৃত্তি করার সংখ্যা is

প্রোগ্রামটির আউটপুট হ'ল এস বিভক্ত-যোগ প্রক্রিয়াগুলির পরে বেস বিতে N এর স্ট্রিং প্রতিনিধিত্ব।

এস যখন হয় 0 , কোনও বিভাজন হয় না, সুতরাং আউটপুট সর্বদা এন হয়

যখন এন থাকে 0, সমস্ত বিভাজনের ফর্ম থাকে 0 0এবং 0আবার হ্রাস পায় , তাই আউটপুট সর্বদা থাকে0

উদাহরণ

  • B = 10, N = 27, S = 11413
  • B = 10, N = 27, S = 2707706
  • B = 9, N = 27, S = 11413
  • B = 9, N = 27, S = 2652651
  • B = anything, N = anything, S = 0N
  • B = anything, N = 0, S = anything0

N = 1for S = 0থেকে সমস্ত বি এর সারণী 7:

B       S=0     S=1     S=2     S=3         S=4             S=5                 S=6                                 S=7
2       1       10      11      101         1110            111111              10000011111                         10000100001000001111
3       1       10      21      1110        202201          101101101100        1201201201212012012011              212100212102121002121212100212102121002120
4       1       10      22      1111        223222          111311111311        2232222232322322222322              11131111131311311111311113111113131131111131
5       1       10      32      1413        432431          213441213440        104220331443104220331442            2433241322130211014044424332413221302110140443
6       1       10      33      1514        535535          245550245545        122553122553122553122552            4125434125434125434125441254341254341254341254
7       1       10      43      2221        11111110        40404044040403      2020202202020220202022020201        10101011010101101010110101011010101101010110101011010100
8       1       10      44      2222        11111111        44444454444444      2222222622222222222226222222        11111113111111111111131111111111111311111111111113111111
9       1       10      54      2726        13581357        62851746285173      3142536758708231425367587081        15212633743485606571782880411521263374348560657178288040
10      1       10      55      2827        14141413        70707077070706      3535353853535335353538535353        17676769267676676767692676771767676926767667676769267676

S = 0to 3: এলোমেলো এন সহ সমস্ত বি এর সারণী

B       S=0     S=1         S=2                 S=3
2       11011   11101101    11101111110110      11101111110111110111111011
3       2210    11021101    20102012010200      1001212100121210012121001211
4       1113    230223      112112112111        2302302302323023023022
5       101     2323        11341134            31430423143042
6       120     4040        20202020            1010101010101010
7       134     5252        24612461            1230456412304564
8       22      1111        445444              222622222622
9       4       22          1111                505505
10      92      4646        23232323            1161616211616161

বিস্তারিত

  • স্টিডিন বা কমান্ড লাইনের মাধ্যমে ইনপুট নিন। Stdout যাও আউটপুট।
  • কোনও প্রোগ্রামের পরিবর্তে, আপনি এমন একটি ফাংশন লিখতে পারেন যা বি, এন এবং এস গ্রহণ করে এবং ফলাফলটি সাধারণত মুদ্রণ করে বা এটি ফেরত দেয় (স্ট্রিং হিসাবে)।
  • বি, এন এবং এস যে কোনও ক্রমে নেওয়া যেতে পারে।
  • সমস্ত ইনপুট যা আউটপুট উত্পাদন করে যার দশমিক মান 2 32 এর নীচে কাজ করা উচিত।
  • এন স্বাভাবিক উপায়ে প্রতিনিধিত্ব করা হয়। অর্থাত সবচেয়ে গুরুত্বপূর্ণ অঙ্ক প্রথম এবং শূন্য নিজেই যা লেখা আছে ব্যতীত কোন বসানো শূন্যগুলি 0। (এর 00পরিবর্তে আউটপুটিং 0অবৈধ))
  • বাইটের মধ্যে সংক্ষিপ্ততম কোডটি জয়ী।

Iff তুমি আমার চ্যালেঞ্জ ভোগ, দেওয়ার কথা বিবেচনা ব্লক বিল্ডিং বট ঝাঁকে ঝাঁকে! কিছু ভালোবাসা :)


উত্তরগুলির জন্য লিডারবোর্ড সত্যিই প্রয়োজনীয় কিনা তা আমি জানি না।
orlp

5
@orlp সম্ভবত না। আমি উত্তর সরিয়ে ফেলব এবং এটিকে ফিরিয়ে দেব। আমি কেবল আমার এবং অপ্টিমাইজার স্ট্যাক স্নিপেট শেননিগানগুলি প্রদর্শন করতে চেয়েছিলাম ।
ক্যালভিনের

উত্তর:


5

পাইথ, 21 19 বাইট

vujksmjldQc2UiGQvwz

ফর্ম্যাটে ইনপুট নেয় N\nB\nS। এটি অনলাইনে ব্যবহার করে দেখুন: বিক্ষোভ বা পরীক্ষার জোতা

ব্যাখ্যা

                      implicit: z = 1st input (N)
                                Q = 2nd input evaluated (B)
 u              vwz   reduce z (evaluated 3rd input) times by:
             iGQ         convert string from base Q to base 10
            U            create a range [0, 1, ..., ^-1]
          c2             split into 2 lists (lengths are N-[N/2] and [N/2])
     m                   map each list d to:
       ld                   their length
      j  Q                  in base Q
    s                    join both lists
  jk                     join the numbers by ""
v                     convert string to int (getting rid of leading zeros)

5

পাইথ, 29 21 বাইট

jku+j-JiGQK/J2QjKQvwz

সত্যিই সরল বাস্তবায়ন।

নিম্নলিখিত বিন্যাসে স্টিডিনে ইনপুট নেয়:

N
B
S

এটি এর 00জন্য ভুল আউটপুট দেয় N=0
জাকুব 26'15

5

গণিত, 101 বাইট

Nest[a~Function~(b=FromDigits)[Through@((c=IntegerString)@*Ceiling<>c@*Floor)[a/2],#],#2~b~#,#3]~c~#&

Throughসিলিং এবং মেঝে উভয় ফাংশন প্রয়োগ করতে কিছু কৌশল ব্যবহার করে। শুধু ত্রুটি উপেক্ষা করুন।


5

সিজেম, 24 বাইট

q~:B;{:~Bb_)\]2f/Bfbs}*i

এটি এখানে পরীক্ষা করুন। হিসাবে ইনপুট লাগে "N" S B

ব্যাখ্যা

q~                       e# Read an eval input.
  :B;                    e# Store the base in B and discard it.
     {               }*  e# Repeat S times.
      :~                 e# Turn the string N into an array of digits.
        Bb               e# Interpret as base B.
          _)\            e# Duplicate and increment. Swap order.
             ]2f/        e# Wrap them in an array and (integer-)divide both by 2.
                 Bfb     e# Convert both to base B.
                    s    e# Flatten into a single string.
                       i e# Convert to an integer to fix the N = 0 case.

"0" 1 9outputted 00। আমি এটি গল্ফ দেওয়ার চেষ্টা করেছি: q~:B;{:~Bb,2/z:,Bfbs}*তবে এটিও অবৈধ কারণ এটি খালি স্ট্রিংয়ের পরিবর্তে আউটপুট করেছিল।
জিমি 23013

একটি iশেষে যত্ন নিতে হবে 00। আপনি প্রতিস্থাপন বাইট ফিরে পেতে পারেন 2/:I-I]সঙ্গে )\]2f/
ডেনিস

3

জাভাস্ক্রিপ্ট ( ES6 ) 78 79

পুনরাবৃত্তি ফাংশন। পরীক্ষার জন্য স্নিপেট চালান (কেবল ফায়ারফক্স)

1 বাইট সম্পাদনা করুন thx @ ডকম্যাক্স

F=(b,n,s,S=x=>x.toString(b),m=parseInt(n,b))=>m*s?F(b,S(-~m>>1)+S(m>>1),s-1):n

// Ungolfed

U=(b,n,s)=>
{
  var S=x=>x.toString(b) // function to convert in base b
  var m=parseInt(n,b) // string in base b to integer
  if (m==0 || s==0)
    return n
  else  
    return F(b,S((m+1)>>1) + S( m>>1 ),s-1)
}

// Test
test=[
  {B: 10, N: '0', S:3, K: '0' }, {B: 10, N: '27', S: 1, K: '1413' }, {B: 10, N: '27', S: 2, K: '707706' }, {B: 9, N: '27', S: 1, K: '1413' }, {B: 9, N: '27', S: 2, K: '652651' }
];

test2=[[2, '11011', '11101101', '11101111110110', '11101111110111110111111011'],[3, '2210', '11021101', '20102012010200', '1001212100121210012121001211'],[4, '1113', '230223', '112112112111', '2302302302323023023022'],[5, '101', '2323', '11341134', '31430423143042' ]  ,[6, '120', '4040', '20202020', '1010101010101010'],[7, '134', '5252', '24612461', '1230456412304564'],[8, '22', '1111', '445444', '222622222622'],[9, '4', '22', '1111', '505505'],[10, '92', '4646', '23232323', '1161616211616161' ]
]
test2.forEach(r=>test.push(
  {B:r[0],N:r[1],S:1,K:r[2]}, {B:r[0],N:r[1],S:2,K:r[3]}, {B:r[0],N:r[1],S:3,K:r[4]}
))  

test.forEach(t => (
  r=F(t.B, t.N, t.S), 
  B.innerHTML += '<tr><th>'+(r==t.K?'Ok':'Failed')
      +'</th><td>'+t.B +'</td><td>'+t.N
      +'</td><td>'+t.S +'</td><td>'+r +'</td><td>'+t.K +'</td></tr>'
))
th,td { font-size: 12px; padding: 4px; font-family: helvetica }
<table><thead><tr>
  <th>Test<th>B<th>N<th>S<th>Result<th>Check
  </tr></thead>
  <tbody id=B></tbody>
</table>


আপনার সাফল্যের প্রমাণগুলি কতটা বিস্তৃত তা আমি সত্যিই পছন্দ করি। এছাড়াও, আপনি প্রতিস্থাপন 1 রক্ষা করতে পারে m&&sসঙ্গে m*s
ডকম্যাক্স 26'15

1
@ ডকম্যাক্স এটি একটি বাস্তব এবং দরকারী ইউনিট পরীক্ষা। গল্ফ করার সময় সমস্ত কিছু ভাঙ্গা খুব সহজ।
edc65

1

ECMAScript 6, 90 বাইট

var f=(B,N,S)=>((n,s)=>S?f(B,s(n+1>>1)+s(n>>1),S-1):s(n))(parseInt(N,B),x=>x.toString(B))

একটি ভেরিয়েবল ব্যবহার করে একটি পুনরাবৃত্ত ফাংশন সংজ্ঞায়িত করা সত্যিই ভাল শৈলী নয়, তবে এটি ECMAScript 6 এ আমি সংক্ষিপ্ততম কোডটি নিয়ে আসতে পারি।

কর্নার "00" => "0"কেসটি ডানদিকে পেয়ে তিনটি বাইট অপচয় করে (সরল s(n)পরিবর্তে)N )

এটা চেষ্টা আউট করতে, আপনি ব্যবহার করতে পারেন হট্টগোল এর REPL : কপি / তাই মত কোড এবং মুদ্রণ উদাহরণ আবাহন ফলাফল আটকান: console.log(f(9, "27", 2))


1

কমন লিস্প - 113 টি অক্ষর

(lambda(b n s)(dotimes(i s)(setf n(format ()"~vR~vR"b (- #1=(parse-integer n :radix b)#2=(floor #1# 2))b #2#)))n)

Ungolfed

(lambda(b n s)
  (dotimes(i s)
    (setf n (format () "~vR~vR" b (- #1=(parse-integer n :radix b)
                                     #2=(floor #1# 2))
                                b #2#)))
  n)
  • ~vRবেস ফর্ম্যাটে নির্দেশ আউটপুট পূর্ণসংখ্যা v, যেখানে vএকটি আর্গুমেন্ট হিসাবে প্রদান করা হয় format
  • parse-integer:radixএকটি নির্দিষ্ট বেস থেকে রূপান্তর করার জন্য একটি যুক্তি গ্রহণ করে ।
  • #1=এবং #1#(যথাক্রমে নির্ধারিত এবং ব্যবহার) হ'ল পাঠক ভেরিয়েবল যা সাধারণ উপ-এক্সপ্রেশনগুলি ভাগ করতে দেয়। প্রসারিত হলে, তারা নিম্নলিখিত কোড দেয়:

    (lambda (b n s)
      (dotimes (i s)
        (setf n
                (format nil "~vr~vr" b
                        (- (parse-integer n :radix b)
                           (floor (parse-integer n :radix b) 2))
                        b (floor (parse-integer n :radix b) 2))))
      n)

0

বীচি , 27 বাইট

Lcb:+J[(bFB:a)%2i]+b//2TBab

কমান্ড-লাইন আর্গুমেন্ট হিসাবে বেস, পূর্ণসংখ্যা এবং পুনরাবৃত্তির সংখ্যা নেয়। অ্যালগরিদম সোজা, তবে কয়েকটি আকর্ষণীয় ভাষার বৈশিষ্ট্য ব্যবহার করা হয়:

                             a, b, c initialized from cmdline args, and i = 0 (implicit)
Lc                           Do c times:
        bFB:a                Convert b from base a to decimal and assign back to b
      [(     )%2i]           Construct a list containing b%2 and 0 (using i to avoid
                               scanning difficulties)
                  +b//2      Add floor(b/2) to both elements of list; the list now contains
                               b-b//2 and b//2
                       TBa   Convert elements of list back to base a
     J                       Join list
    +                        Coerce to number (necessary to turn 00 into plain 0)
  b:                         Assign back to b
                          b  Print b at the end

পিপের স্কেলারের ধরণ, যা উভয় সংখ্যা এবং স্ট্রিংগুলিকে উপস্থাপন করে, যেমন তালিকাতে আইটেম-ভিত্তিক ক্রিয়াকলাপ; দুর্ভাগ্যক্রমে, প্রথম বন্ধনী এবং দ্বি-চরিত্রের অপারেটরFB , TBএবং //অস্বীকার কোন সুবিধা।

মাঝারি অ্যাসাইনমেন্ট ব্যতীত বিকল্প সমাধান, তবে এখনও 27 বাইট:

Lcb:+J[bFBa%2i]+bFBa//2TBab

0

সি, 245 বাইট

int b,z,n,f,r;c(char*t,n){return n?((z=c(t,n/b)),z+sprintf(t+z,"%d",n%b)):0;}main(){char t[99],*p;gets(t);b=atoi(t);f=n=strtol(p=strchr(t,32)+1,0,b);if(!(r=atoi(strchr(p,32)+1)))f=0;while(r--)n=strtol(t+c(t+c(t,n-n/2),n/2)*0,0,b);puts(f?t:"0");}

এটি কিছুই জিততে পারে না , তবে এটি মজাদার ছিল!


0

পিএইচপি ,115 112 বাইট

function($b,$n,$s){while($s--)$n=($c=base_convert)(ceil($n=$c($n,$b,10)/2),10,$b).$c(floor($n),10,$b);return$n;}

এটি অনলাইন চেষ্টা করুন!

Ungolfed:

function split_join_repeat( $b, $n, $s ) {
    // repeat S times
    for( $x=0; $x < $s; $x++ ) {
        // convert N from base B to base 10 for arithmetic
        $n = base_convert( $n, $b, 10 );
        // divide and split in base 10, convert back to base B and join
        $n = base_convert( ceil( $n / 2 ), 10, $b ) .
            base_convert( floor( $n / 2 ), 10, $b );
    }
    return $n;
}

আউটপুট

B = 10, N = 27, S = 1   1413
B = 10, N = 27, S = 2   707706
B = 9, N = 27, S = 1    1413
B = 9, N = 27, S = 2    652651

2   1   10  11  101 1110    111111  10000011111 10000100001000001111    
3   1   10  21  1110    202201  101101101100    1201201201212012012011  212100212102121002121212100212102121002120  
4   1   10  22  1111    223222  111311111311    2232222232322322222322  11131111131311311111311113111113131131111131    
5   1   10  32  1413    432431  213441213440    104220331443104220331442    12141204110401030043301214120411040103004330    
6   1   10  33  1514    535535  245550245545    122553122553122553122552    131022143412311313533131022143412311313533  
7   1   10  43  2221    11111110    40404044040403  2020202202020220202022020201    40556522600645213204055652260064521320  
8   1   10  44  2222    11111111    44444454444444  2222222622222222222226222222    76650460747555347665046074755534    
9   1   10  54  2726    13581357    62851746285173  3142536758708231425367587081    4861155667688600048611556676886000  
10  1   10  55  2827    14141413    70707077070706  3535353853535335353538535353    17676769267677271767676926767727

0

জাপট , 17 বাইট

_nW o ó ®ÊsWÃq}gV

এটি অনলাইন চেষ্টা করুন!

সিঙ্গেলটন তালিকা হিসাবে এন এর সাথে এস, এন, বি ক্রমে ইনপুট নেয় । সিঙ্গলটন তালিকা ব্যতীত এন গ্রহণের জন্য 2 বাইট খরচ হয় ।

ব্যাখ্যা:

_             }g     #Get the Sth item generated by this function...
                V    #...Starting with N as the 0th item:
 nW                  # Evaluate the previous item as a base B number
    o                # Create a list with that length
      ó              # Divide it into two lists as evenly as possible
        ®   Ã        # For each of those lists:
         Ê           #  Get the length
          sW         #  Convert it to base B
             q       # Join the two strings together

0

ফোরথ (গফার্থ) , 105 বাইট

: f base ! 0 ?do 0. 2swap >number nip 2drop 2 /mod >r i + r> 0 tuck <# #s 2drop #s #> loop type decimal ;

এটি অনলাইন চেষ্টা করুন!

ব্যাখ্যা

বেসকে বি তে পরিবর্তন করে, তারপরে একটি লুপে এস বার চালিত হয়:

  • স্ট্রিংকে একটি সংখ্যায় রূপান্তর করে
  • 2 টি ভাগে বিভক্ত সংখ্যা (বিজোড়ের তুলনায় একটির চেয়ে বেশি বড়)
  • দুটি সংখ্যাকে আবার স্ট্রিংয়ে একত্রিত করে

শেষ হয়ে গেলে স্ট্রিংটি মুদ্রণ করে এবং বেসটি 10 ​​এ ফিরে সেট করে (যাতে আমরা একাধিকবার একসাথে চালাতে পারি)

কোড ব্যাখ্যা

:f                    \ start a new word definition
  base !              \ set the base to B
  0 ?do               \ loop from 0 to S-1 (runs S times)
    0. 2swap          \ places a double-length 0 on the stack behind the string
    >number           \ converts the string to a number in the current base
    nip 2drop         \ get rid of string remainder and second part of double
    2 /mod            \ get the quotient and remainder of dividing by 2
    >r                \ throw the quotient on the return stack
    i                 \ get a copy of the quotient from the return stack
    +                 \ add quotient and remainder
    r>                \ move quotient from return stack to stack
    0 tuck            \ convert both to double-length numbers
    <#                \ start a pictured numeric output
      #s              \ add entire number to output
      2drop           \ drop empty number
      #s              \ add second number to output
    #>                \ convert output to a string and drop number from stack
  loop                \ end loop
  type                \ print output string
  decimal             \ set base back to 10
;                     \ end word definition
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.