পুনরায় ডিজিটার বেজ সন্ধান করা

Question

একটি পুনরুক্তি হ'ল একটি প্রাকৃতিক সংখ্যা যা কেবল একই অঙ্কটি পুনরাবৃত্তি করেই লেখা যায়। উদাহরণস্বরূপ, 777এটি একটি পুনরুক্তি, যেহেতু এটি সম্পূর্ণরূপে 7তিনবার পুনরাবৃত্তি করা অঙ্কটির দ্বারা গঠিত ।

এটি কেবল দশমিক (বেস 10) সংখ্যার মধ্যে সীমাবদ্ধ নয়, তবে:

• বাইনারি (বেস 2) এ লেখার সময় প্রতিটি মার্সেন নাম্বার ( এম _এন = 2 ^এন -1 ফর্মের ফর্মের ) একটি পুনরুক্তি।
• Unary (বেস 1) এ যখন লেখা হয় তখন প্রতিটি সংখ্যা তুচ্ছভাবে একটি পুনরায় ডিজিটিট হয়।
• প্রতি NUMBER nএছাড়াও জাভাস্ক্রিপ্টে গার্বেজ repdigit হিসেবে লেখা যেতে পারে 11বেস n-1(উদাহরণস্বরূপ, 17যখন হেক্সাডেসিমেল (বেস 16) লেখা হয় 11, এবং 3যখন বাইনারি লেখা (বেস 2) হয় 11)।

এখানে চ্যালেঞ্জটি হ'ল অন্যান্য ঘাঁটিগুলি সন্ধান করা যেখানে ইনপুট নম্বরটি একটি পুনরুক্তি হতে পারে।

ইনপুট

যে x > 3কোনও সুবিধাজনক বিন্যাসে একটি ধনাত্মক পূর্ণসংখ্যা ।

আউটপুট

একটি ধনাত্মক পূর্ণসংখ্যা bসঙ্গে (x-1) > b > 1যেখানে প্রতিনিধিত্ব xবেস মধ্যে bএকটি repdigit হয়।

• যদি এরকম কোনও bউপস্থিত না থাকে তবে আউটপুট 0বা কিছু ভুয়া মান।
• যদি এরকম একাধিক bউপস্থিত থাকে তবে আপনি যে কোনও বা সমস্ত আউটপুট নিতে পারেন।

বিধি

• (x-1) > b > 1সীমাবদ্ধতা ইউনারী তুচ্ছ ধর্মান্তর বা "বিয়োগ এক" বেস প্রতিরোধ করা হয়। আউটপুট সংখ্যা ইউনারী বা কোনো সুবিধাজনক বেস লেখা যেতে পারে, কিন্তু বেস নিজেই তুচ্ছ ধর্মান্তর এক হবে না।
• ইনপুট / আউটপুট যে কোনও উপযুক্ত পদ্ধতির মাধ্যমে হতে পারে ।
• স্ট্যান্ডার্ড লুফোলের বিধিনিষেধগুলি প্রযোজ্য।

উদাহরণ

In --> Out
11 --> 0            (or other falsey value)
23 --> 0            (or other falsey value)
55 --> 10           (since 55 is 55 in base 10)
90 --> 14           (since 90 is 66 in base 14 ... 17, 29, 44 also allowed)
91 --> 9            (since 91 is 111 in base 9 ... 12 also allowed)

Comments

আমরা কি ধরে নিতে পারি b ≤ 36(অনেকগুলি ভাষার অন্তর্নির্মিত বেস রূপান্তর ফাংশন উচ্চতর হয় না)?

— ডুরকনব

@ ডুরকনব এই সমস্যাটির ব্যাপ্তিটিকে b ≤ 36 গুরুতরভাবে সীমাবদ্ধ করে ধরে নিচ্ছেন এবং বিদ্যমান সমস্ত উত্তর সঠিকভাবে বৃহত্তর ঘাঁটিগুলি পরিচালনা করে, তাই আমি না বলতে চাই, আপনি bযা দিয়েছেন তার চেয়েও উপরের অংশটিকে ধরে নিতে পারবেন না ।

— অ্যাডমবর্কবার্ক

বেশিরভাগ সংখ্যা কিছু বেসে পুনঃ ডিজিট হয়। উদাহরণস্বরূপ, 91 = 13 * 7 সুতরাং এটি বেস 12 এর 77

— নীল

@Neil ... এটা, সেখানে ... প্রায় মত আপনাকে কিছু করতে করছি

— AdmBorkBork

Answer 1

জেলি, 11 9 বাইট

bRI¬P€TḊṖ

ঘাঁটির একটি তালিকা প্রদান করে, যা যদি কিছু না থাকে তবে খালি (মিথ্যা)। এটি অনলাইন চেষ্টা করুন!

কিভাবে এটা কাজ করে

bRI¬P€TḊṖ  Main link. Argument: x (number)

 R         Range; yield [1, ..., x].
b          Base; convert x to base n, for each n in the range.
  I        Compute the increment (differences of successive values) of each array
           of base-n digits. This yields only 0's for a repdigit.
   ¬       Apply logical NOT to each increment.
    P€     Compute the product of all lists of increments.
      T    Get the indices of all truthy products.
       Ḋ   Discard the first index (1).
        Ṗ  Discard the last index (x - 1).

Answer 2

Pyth, 11 10

fqjQT)r2tQ

স্পষ্টতই পাইথের অনার্য qএকটি তালিকার জন্য যা প্রায় 10 দিন আগে সমস্ত অনন্য মান রয়েছে for স্পষ্টত পাইথ বাগগুলি তদন্ত করা গল্ফ স্কোরকে উন্নত করে।

সেই [2..input-1)ভিত্তিতে ইনপুটটির অঙ্কের অনন্য সেটটির দৈর্ঘ্য 1 হলে তালিকাটি ফিল্টার করে ।

পরীক্ষা স্যুট

ব্যাখ্যা:

r2tQ     ##  generate the python range from 2 to the input (Q) - 1
         ##  python range meaning inclusive lower and exclusive upper bounds
f        ##  filter that list with lambda T:
  jQT    ##  convert the input to base T
 q    )  ##  true if the resulting list digits has all equal elements

Answer 3

রুবি, 87 69 63 বাইট

->x{(2..x-2).find{|b|y=x;a=y%b;a=0if a!=y%b while(y/=b)>0;a>0}}

আমাকে হাতে ভিত্তি রূপান্তর বাস্তবায়ন করতে হয়েছিল, যেহেতু রুবির বিল্টিনগুলি কেবল ৩ base বেসে চলে যায় ...

রিটার্নস nilপাওয়া যায়নি জন্য।

->x{      # anonymous lambda that takes one argument
(2..x-2)  # range of the possible bases to search over
.find{    # return the first element that satisfies the block, or nil if none
|b|       # b represents the base currently being tested
y=x;      # a temporary value to avoid mutating the original value of x
a=y%b;    # the first (well, last) digit in base b, which will be compared to

                   y/=b      # divide the number by the base
   if a!=y%b                 # if this digit does not match (is different)...
a=0                          # set a to a value representing "failure"
             while(    )>0;  # keep doing this until we get zero (no digits left)

a>0       # return whether a has maintained its original value (no digit change)
}}        # find then returns the first element for which this is true (or nil)

Answer 4

পাইথন, 71 72 78 বাইট

lambda x:{b for b in range(2,x-1)for d in range(x)if x*~-b==x%b*~-b**d}

কোনও পুনরাবৃত্তি নয়, কেবল সমস্ত ঘাঁটি চেষ্টা করে এবং সেই কাজ করে তাদের একটি সেট আউটপুট দেয়।

এটি এনকোড করতে bএবং dএকক সংখ্যায় লোভনীয় , তবে এগুলি বের করার জন্য এটি অনেক বেশি বন্ধুত্বপূর্ণ এক্সপ্রেশন গ্রহণ করে। 77 বাইট:

lambda x:{k/x for k in range(2*x,x*x-x))if x*~-(k/x)==x%(k/x)*~-(k/x)**(k%x)}

---

72 বাইট:

f=lambda x,b=2:b*any(x*~-b==x%b*~-b**d for d in range(x))or f(x,b+1)%~-x

প্রথম bকাজ করে যা কাজ করে, বা 0যদি না করে তবে Out

একজন প্রতিনিধির ইউনিট xএর dটি সংখ্যা cবেস bমূল্য আছে x==c*(b**d-1)/(b-1)। সমানভাবে x*(b-1)==c*(b**d-1),।

মানটি cঅবশ্যই x%bশেষ সংখ্যা হবে । dপাটিগণিতভাবে নির্ধারণ করার জন্য আমি কোনও উপায় দেখতে পাচ্ছি না , সুতরাং কোডটি কোনও সম্ভাবনা রয়েছে কিনা তা দেখার জন্য সমস্ত সম্ভাবনার চেষ্টা করে।

অনুলিপি 5 বাইট সংরক্ষিত ডেনিস এর কৌতুক যখন একটি falsey আউটপুট দেবার bপৌছানোর x-1আউটপুট মডিউল গ্রহণ করে x-1। ডেনিস থেকে বাঁচানো আরেকটি বাইট আমাকে স্মরণ করিয়ে দিয়েছিল যে অনাবশ্যকভাবে বর্ণনামূলকভাবে উচ্চতর নজির রয়েছে ~।

inপরিবর্তে এর সাথে একটি সমান দৈর্ঘ্যের সমাধান any।

f=lambda x,b=2:b*(x*~-b in[x%b*~-b**d for d in range(x)])or f(x,b+1)%~-x

Answer 5

রুবি, 50 বাইট

->n{(2..n-2).find{|b,i=n|i%b==(i/=b)%b ?redo:i<1}}

আমি সত্যিই সেই বিরক্তিকর জায়গাটি সরিয়ে ফেলতে চাই তবে রুবি নতুন হিসাবে আগত, আমি এখনও এর সিনট্যাকটিক কিরকগুলি সম্পর্কে বেশ অপরিচিত।

Comments

এই ক্ষেত্রে আপত্তিকর তাত্পর্যটি এটি b?একটি বৈধ পদ্ধতির নাম হতে পারে, তাই আপনি স্থান থেকে মুক্তি পেতে পারেন না।

— জর্দান

Answer 6

ইমোজিকোড , 214 বাইট

(77 টি অক্ষর):

🐇🐹🍇🐇🐖🏁➡🚂🍇🍦b🍺🔲🗞🔷🔡😯🔤🔤🚂🍮i 2🍮n 0🔁◀i➖b 1🍇🍦v🔷🔡🚂b i🍊▶🐔🔫v🔪v 0 1📏v🍇🍮n i🍉🍫i🍉😀🔷🔡🚂n 9🍎0🍉🍉

বেস 9 এ মুদ্রণের ফলাফল।

আমি এখন কয়েক সপ্তাহ ধরে ইমোজিকোড সহ একটি কোড গল্ফ করার অর্থ করছি, তবে ভাষাটি সম্প্রতি সম্প্রতি 😉 এর সাথে কাজ করার জন্য যথেষ্ট স্থিতিশীল হয়ে উঠেছে 😉 বোনাস হিসাবে, এই প্রশ্নটি কার্যকারিতার এক টুকরো ইমোজিকোডের ব্যবহারের পক্ষে আসলেই ভাল: অন্যান্য বেসগুলিতে পূর্ণসংখ্যার প্রতিনিধিত্ব করে।

অগল্ফোড (e ইমোজিকোডে একটি লাইন মন্তব্য)

🐇🐹🍇         👴 define main class "🐹"
  🐇🐖🏁➡🚂🍇  👴 define main method

    👴 read an integer from stdin, store it in frozen variable "b"
    🍦 b 🍺 🔲 🗞 🔷🔡😯🔤🔤 🚂

    🍮 i 2  👴 i = 2
    🍮 n 0  👴 n = 0

    🔁◀i➖b 1🍇     👴 while i < b - 1
      🍦 v 🔷🔡🚂b i  👴 v = the string representation of b in base i

      👴 Split v on every instance of the first character of v.
      👴 If the length of that list is greater than the actual length of v,
      👴 n = i
      🍊▶🐔🔫v🔪v 0 1📏v🍇
        🍮 n i
      🍉

      🍫 i  👴 increment i
    🍉
    😀 🔷🔡🚂 n 9  👴 represent n in base 9 instead of 10, to save a byte 😜
    🍎 0          👴 return error code 0
  🍉
🍉

Answer 7

পাইথন 2, 79 বাইট

f=lambda x,b=2:~-b*x in[i%b*~-b**(i/b)for i in range(b*x)]and b or f(x,-~b)%~-x

আইডিয়নে চেষ্টা করে দেখুন ।

ধারণা

কোন repdigit এক্স ভিত্তির খ> 1 এবং অঙ্ক ঘ জন্য <b নিম্নলিখিত সন্তুষ্ট।

যেহেতু ডি <বি , মানচিত্র (বি, ডি) b সিবি + ডি ইনজেকশনযুক্ত।

এছাড়াও, বি, এক্স> 1 , আমাদের সি <x , তাই সিবি + ডি <সিবি + বি = (সি + 1) বি ≤ এক্সবি রয়েছে ।

এর অর্থ এই যে, জন্য উপযুক্ত মান এটি গ এবং ঘ একটি প্রদত্ত বেস জন্য খ , আমরা সব মাধ্যমে পুনরুক্তি করতে পারেন আমি এ [0, ..., bx) এবং তা পরীক্ষা (খ - 1) X == (ঝ% খ) (খ ^{i / b} - 1) ।

কোড

(B - 1) x সেট (i% বি) (বি ^{i / b} - 1) এ আছে কিনা নামযুক্ত ল্যাম্বদা চ পরীক্ষা 0 ≤ i <bx। , বি = 2 দিয়ে শুরু করে ।

• পরীক্ষাটি সফল হলে আমরা ফিরলাম খ ।

• অন্যথায়, আমরা একই এক্স এবং খ দ্বারা 1 দ্বারা বর্ধিত , আবার এফ কল করব ।

যেহেতু খ অবশেষে x - 1 এ পৌঁছতে পারে , তাই আমরা এই ক্ষেত্রে 0- এ ফিরে আসার জন্য চূড়ান্ত ফলাফলের Modulo x - 1 নিই । নোট করুন যে খ = 2 শর্তটি সন্তুষ্ট করলে তা ঘটবে না , যেহেতু এটি পুনরাবৃত্তি না করে ফিরে আসে। তবে, প্রশ্নটি গ্যারান্টি দেয় যে এই ক্ষেত্রে খ = 2 <এক্স - 1 ।

Answer 8

পার্ল 6, 45 43 42 বাইট

{grep 2..$^x-2: {[==] $x.polymod($_ xx*)}}

ব্যাখ্যা করা (সাজানো)

রেফারেন্সের জন্য, একটি ভেরিয়েবল $^xকরা { ... }সমান-> $x { ... }

{grep 2..$^x-2: {[==] $x.polymod($_ xx*)}}
{                                          # Anonymous function taking $x
 grep                                      # Return the all values in
      2..$^x-2: {                          # Range from 2 to $x - 2 satisfying:
                 [==]                      #     Reduce with ==:
                      $x.polymod(          #         (See below for polymod)
                                 $_ xx*    #         An infinite list containing
                                           #         the current value
                                       )}}

পলিমোড (টিএল; ডিআর): $n.polymod($b xx *)আপনাকে $nবেসের জন্য / সংখ্যাগুলির বিপরীত তালিকা দেয়$b

পলিমোড (বাস্তবের জন্য): পলিমোড পদ্ধতিটি পাইথনের divmodকার্যকারিতার আরও শক্তিশালী সংস্করণের মতো । ফিরে আসা তালিকায় $n.polymod(*@args)বাকী ( $n mod $x) যোগ করে এবং পরবর্তী বিভাগের জন্য ভাগফলটি ব্যবহার করে * @ টি অর্গগুলিতে প্রতিটি মান দ্বারা $ n ভাগ করে। আমি অনুভব করেছি যে আমি এটি খারাপভাবে ব্যাখ্যা করেছি তাই এখানে কয়েকটি উদাহরণ দেওয়া হয়েছে (পার্ল in তে লিখিত, তবে বেশিরভাগের দ্বারা আমি বুঝতে পারি যথেষ্ট পরিষ্কার):

12.polymod(7)    # returns (5, 1)
# Roughly equivalent to:
(12 mod 7, 12 div 7)

86400.polymod(60,60,24) # returns (0, 0, 0, 1)
# Roughly equivalent to (this will give you an array rather than a list):
my $n = 86400;
my @remainders; # Here lies the end result
for (60, 60, 24) -> $divisor {
    @remainders.push( $n mod $divisor );
    $n div= $divisor;
}
@remainders.push($n)

# This is essentially the base conversion algorithm everyone
# knows and loves rolled into a method.
# Given an infinite list of divisors, polymod keeps going until
# the remainder given is 0.     
0xDEADBEEF.polymod(16 xx *) # returns (15 14 14 11 13 10 14 13)
# Roughly equivalent to (but gives an array rather than a list):
my $n = 0xDEADBEEF;
my @remainders; # Here lies the end result
while $n > 0 {
    @remainders.push( $n mod 16 );
    $n div= 16;
}

Comments

আসলে যেহেতু আপনাকে বৈধ মানগুলির "যে কোনও বা সমস্ত " আউটপুট দেওয়ার অনুমতি দেওয়া হয় , আপনি grepপদ্ধতির পরিবর্তে পদ্ধতিটি ব্যবহার করতে পারেন first।

— ব্র্যাড গিলবার্ট

ওহ ভাল ক্যাচ, আমি এটি মিস করেছি

— হটকিজ

Answer 9

ডায়ালগ এপিএল , 28 বাইট

 {b/⍨⍵{1=≢∪⍵⊥⍣¯1⊢⍺}¨b←1+⍳⍵-3}

{... ⍵... }বেনামী ফাংশন প্রয়োগ করা x(দ্বারা প্রতিনিধিত্ব ⍵)
b←1+⍳⍵-32 থেকে পূর্ণসংখ্যার - ⍵-2 সঞ্চিত হিসাবে b
⍵{... }¨বি (প্রতিটি উপাদানের জন্য ⍵), ফাংশন প্রয়োগ {... }যেমন বাম যুক্তি এক্স সঙ্গে ⍺
⍵⊥⍣¯1⊢⍺যে বেস ধর্মান্তরিত এক্স
1=≢∪1 ট্যালি সমান অনন্য অঙ্কের?
b/⍨খ এর উপাদানগুলি যেখানে সত্য (সেখানে কেবল একটি অনন্য অঙ্ক আছে)।

উদাহরণস্বরূপ কেস

যদি কোনও ভিত্তি বিদ্যমান না থাকে তবে আউটপুট খালি থাকে (যা মিথ্যা), যা এই প্রোগ্রাম দ্বারা প্রদর্শিত হতে পারে:

 WhatIsEmpty
 →''/TRUE ⍝ goto (→) TRUE: if (/) emptystring ('')
 'False'
 →END       
TRUE:       
 'True'     
END:        

এই 'মিথ্যা' মুদ্রণ

Answer 10

পাইথ, 26 19 বাইট

hMfql{eT1m,djQdr2tQ

এখানে চেষ্টা করুন!

আমি এটি গল্ফ করার পরে একটি ব্যাখ্যা যুক্ত করব। একটি সংক্ষিপ্ত বাস্তবায়ন এবং ব্যাখ্যার জন্য এই উত্তরটি দেখুন ।

Comments

আমাকে মনে করিয়ে দেওয়ার জন্য ধন্যবাদ যে আমি আমার উদাহরণগুলিতে 90এবং অতিরিক্ত ঘাঁটিগুলি ভুলে গেছি 91!

— অ্যাডমবর্কবার্ক

Answer 11

এমএটিএল , 15 14 বাইট

3-:Q"G@:YAd~?@

এটি ভাষা / সংকলকের বর্তমান সংস্করণ (14.0.0) এর সাথে কাজ করে ।

যদি কোনও বেস বিদ্যমান না থাকে তবে আউটপুট ফাঁকা (যা মিথ্যা)।

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

3-:Q    % take input x implicitly. Generate range of possible bases: [2,3,...,x-2]
"       % for each base b
  G     %   push input again
  @:    %   generate vector of (1-based) digits in base b: [1,2,...,b]
  YA    %   convert to that base
  d~    %   differences between consecutive digits; negate
  ?     %   if all values are true (that is, if all digits were equal)
    @   %     push that base
        %   end if implicitly
        % end for each implicitly
        % display implicitly

Answer 12

গণিত, 55 বাইট

Cases[4~Range~#-2,a_/;Equal@@#~IntegerDigits~a]/.{}->0&

বেনামে ফাংশন, খুব জটিল নয়। কেবল পুনরায় ডিজিট-নেসের উপর ভিত্তি করে ঘাঁটিগুলি ফিল্টার করে।

Answer 13

পাইথন 2, 75 বাইট

n=input()
b=1
while b<n-2:
 i=n;b+=1
 while i%b==i/b%b:i/=b
 if i<b:print b

আমার রুবি উত্তর একটি বন্দর। যদি বিদ্যমান থাকে তবে সমস্ত বৈধ ঘাঁটি মুদ্রণ করে।

Answer 14

জুলিয়া, 45 বাইট

n->filter(b->endof(∪(digits(n,b)))<2,2:n-2)

এটি একটি বেনামে ফাংশন যা একটি পূর্ণসংখ্যা গ্রহণ করে এবং পূর্ণসংখ্যার অ্যারে প্রদান করে। এটি কল করতে, এটি একটি ভেরিয়েবলের জন্য বরাদ্দ করুন। এটি সমস্ত প্রযোজ্য ঘাঁটি বা একটি খালি অ্যারে ফিরিয়ে দেবে। বড় ঘাঁটি নিয়ে কোনও সমস্যা নেই।

প্রথমে আমরা অন্তর্ভুক্ত ব্যাপ্তি তৈরি করি [2, n - 2], যেখানে এন ইনপুট। আমরা তারপরে filterকেবলমাত্র পূর্ণসংখ্যার খ এর তালিকা তৈরি করি যার জন্য বেস বিতে এন এর চেয়ে কম 2 অনন্য সংখ্যা রয়েছে। এটি করার জন্য, প্রতিটি পূর্ণসংখ্যা জন্য খ সীমার মধ্যে, আমরা এর সংখ্যা পেতে এন বেস খ একটি অ্যারের ব্যবহার ব্যবহার অনন্য আইটেম পাওয়া , এবং শেষ উপাদান (যেমন দৈর্ঘ্য) ব্যবহার করে সূচক পেতে ।digits∪endof

Answer 15

ব্র্যাচল্যাগ , 12 বাইট

>>.ℕ₂≜&ḃ↙.=∧

এটি অনলাইন চেষ্টা করুন! (জেনারেটর হিসাবে!)

ইনপুট ভেরিয়েবলের মাধ্যমে ইনপুট নেয় এবং এটি সম্ভব হয় ক্ষেত্রে আউটপুট ভেরিয়েবলের মাধ্যমে একটি বেসকে আউটপুট দেয়, অন্যথায় ব্যর্থ হয়। একই সময়ে, এটি একটি জেনারেটর হিসাবেও কাজ করে যা সমস্ত ঘাঁটির একটি তালিকা তৈরি করে, যেখানে সেই তালিকাটি খালি থাকতে পারে।

আদর্শভাবে এটি দেখতে দেখতে কিছুটা দেখতে পারা যায় ḃ↙.=&>>, সম্ভবত সেই ফর্মটিতে জেনারেটরের কার্যকারিতা বা অনুরূপটিকে উত্সর্গ করা (যেহেতু এটি শেষ পর্যন্ত অকারণে আঘাত হানে) তবে এখন পর্যন্ত 12 বাইট এটি কীভাবে পেতে হয় তা আমি সবচেয়ে সংক্ষিপ্ত জানি।

     ≜          Assign an integer value to
  .             the output variable
   ℕ₂           which is greater than or equal to 2
 >              and less than a number
>               which is less than the input.
      &         The input
       ḃ↙.      in base-(the output)
          =     is a repdigit.
           ∧    (which is not necessarily the output)

Answer 16

রুবি , 46 43 বাইট

ম্যানুয়ালি বিভাজনের প্রয়োজন এড়াতে রুবি ২.৪-তে প্রবর্তিত পূর্ণসংখ্যার # ডিজিটের ফাংশনটি ব্যবহার করে ।

-3 বাইটস @ জর্দানকে ধন্যবাদ

->n{(2..n-2).find{|i|!n.digits(i).uniq[1]}}

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

Comments

@ জর্দান আহ হ্যাঁ আমি সেই কৌশলটি ভুলে যেতে থাকি haha

— মান কালি

Answer 17

05 এ বি 1 ই , 7 বাইট

ÍL¦ʒвÙg

সমস্ত সম্ভাব্য মান আউটপুট করে দেয় বা ভুয়া মান হিসাবে একটি খালি তালিকা (যদিও প্রযুক্তিগতভাবে বৈধ আউটপুটগুলিও মিথ্যা হয়, যেহেতু কেবলমাত্র 105AB1E এ সত্যবাদী এবং অন্য সব কিছু মিথ্যা)।

এটি অনলাইন বা চেষ্টা করে দেখুন সমস্ত পরীক্ষার কেস যাচাই করুন ।

ব্যাখ্যা:

Í        # Decrease the (implicit) input-integer by 2
 L       # Create a list in the range [1, input-2]
  ¦      # Remove the first value to make the range [2, input-2]
   ʒ     # Filter this list by:
    в    #  Convert the (implicit) input to the base of the number we're filtering
     Ù   #  Uniquify it, leaving only distinct digits
      g  #  Get the length of this, which is truthy (1) if all digits were the same
         # (and then output the filtered list implicitly as result)

Answer 18

পার্ল 5 -Minteger -na , 63 বাইট

map{$r=$,=($c="@F")%$_;$r*=$c%$_==$,while$c/=$_;$r&&say}2..$_-2

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

কোনও সমাধান না থাকলে সম্ভাব্য সমস্ত উত্তর বা কিছুই আউটপুট করে।