যতটা সম্ভব মন্দ হতে

Question

ভূমিকা

এটি এই চ্যালেঞ্জের ফলোআপ যেখানে আপনি সেই ব্যক্তির দু'জন দুজনের ভূমিকা নিচ্ছেন। দুষ্ট হওয়ার কারণে আপনি আপনার ভাগকে সর্বাধিক করে তুলতে চান না, বরং যতটা সম্ভব অন্যায্য হন এবং আপনি এটি খুব স্পষ্ট করে তুলতে যাচ্ছেন না, এজন্য আপনি নিম্নলিখিত স্কিমটি নিয়ে এসেছেন:

আপনি অন্যকে বলতে যাচ্ছেন যে আপনি নিজের ভাইবালির মতো যথাসম্ভব ন্যায্য হতে চান এবং এভাবে আপনি পূর্ণসংখ্যকে সমান দৈর্ঘ্যের টুকরো টুকরো টুকরো টুকরো টুকরো টুকরো টুকরো টুকরো টুকরো টুকরো টুকরো টুকরো টুকরো টুকরো টুকরো করে বিভক্ত করতে যাচ্ছেন। সুতরাং প্রতিটি পূর্ণসংখ্যার জন্য আপনি সঠিক পরিমাণে লোকের সাথে উপস্থিত হবেন যে বৃহত্তম এবং ক্ষুদ্রতম অংশের মধ্যে পার্থক্য সর্বাধিক।

উদাহরণস্বরূপ, আপনি যদি পূর্ণসংখ্যা দেওয়া হয় তবে আপনি 6567এটি যেমন রেখে দিতে পারেন, এটি দুটি টুকরো 65,67বা চার ভাগে ভাগ করুন 6,5,6,7। এটি আপনাকে নিম্নলিখিত সর্বাধিক পার্থক্য দেয়:

6567    -> max() = 0
65,67   -> max(|65-67|) = 2
6,5,6,7 -> max(|6-5|,|6-5|,|6-6|,|6-7|,|5-6|,|5-7|,|6-7|) = 2

যেহেতু আপনি শুধুমাত্র মন্দ হতে চান আপনি পছন্দ না 67ধরে 7এবং এইভাবে আপনি হবে আউটপুট পারেন 2বা 4।

---

আরেকটি (কম বিশেষ ক্ষেত্রে); পূর্ণসংখ্যা দেওয়া হলে 121131আপনি এটি এভাবে ভাগ করতে পারেন:

121131      -> max() = 0
121,131     -> max(|121-131|) = 10
12,11,31    -> max(|12-11|,|12-31|,|11-31|) = 20
1,2,1,1,3,1 -> max(…) = 2

এবার কেবল একটিই সমাধান রয়েছে - যথা 3- তিন জনের সাথে পার্থক্য সর্বাধিক।

চ্যালেঞ্জ

একটি পূর্ণসংখ্যা দেওয়া সর্বাধিক মন্দ হওয়ার কোনও সম্ভাব্য উপায় নির্ধারণ করে এবং এটি অর্জনের জন্য প্রয়োজনীয় লোকের সংখ্যা রিপোর্ট করে ।

বিধি

• ইনপুট সর্বদা ≥ 1 হবে
• ইনপুট হয় হয় পূর্ণসংখ্যা, অঙ্কের তালিকা বা স্ট্রিং
• আপনাকে অবৈধ ইনপুটগুলি পরিচালনা করতে হবে না

Testcases

আপনার কেবলমাত্র প্রয়োজনীয় ব্যক্তির ফলাফলের প্রতিবেদন করতে হবে, সম্ভাব্য পার্টিশনগুলি কেবল উদাহরণের জন্য:

In -> splits (difference) -> Out
1 -> [1] (0) -> 1
10 -> [1,0] (1) -> 2
11 -> [11] or [1,1] (0) -> 1 or 2
12 -> [1,2] (1) -> 2
42 -> [4,2] (2) -> 2
101 -> [1,0,1] (1) -> 3
2222 -> [2222] or [22,22] or [2,2,2,2] (0) -> 1 or 2 or 4
6567 -> [65,67] or [6,5,6,7] (2) -> 2 or 4
123000 -> [123,000] (123) -> 2
123001 -> [123,001] (122) -> 2
121131 -> [12,11,31] (20) -> 3
294884 -> [294,884] (590) -> 2
192884729 -> [192,884,729] (692) -> 3
123456189012 -> [123456,189012] (65556) -> 2
123457117346 -> [1234,5711,7346] (6112) -> 3

Comments

আমি ভাবছি যদি কেউ প্রোগ্রামিং ল্যাঙ্গুয়েজে কোনও সমাধান জমা দেবে? : ডি

— এস কে

Answer 1

জেলি ,  16  14 বাইট

Ṁ_Ṃ
sLÆD$ḌÇÞṪL

একটি মোনাডিক লিঙ্কটি পূর্ণসংখ্যার (অঙ্কগুলি) তালিকা নিয়ে এবং পূর্ণসংখ্যা ফেরত দেয়।

এটি অনলাইন চেষ্টা করুন! অথবা একটি পরীক্ষা-স্যুট দেখুন

কিভাবে?

Ṁ_Ṃ - Link 1, maximal difference: list of numbers
Ṁ   - maximum
  Ṃ - minimum
 _  - subtract

sLÆD$ḌÇÞṪL - Main link: list of numbers, theDigits  e.g. [1,2,3,0,0,1]
    $      - last two links as a monad:
 L         -   length                                    6
  ÆD       -   divisors                                  [1,2,3,6]
s          - split into chunks (vectorises)              [[[1],[2],[3],[0],[0],[1]],[[1,2],[3,0],[0,1]],[[1,2,3],[0,0,1]],[[1,2,3,0,0,1]]]
     Ḍ     - from decimal (vectorises)                   [[1,2,3,0,0,1],[12,30,1],[123,1],[123001]]
       Þ   - sort by:
      Ç    -   call last link (1) as a monad              3             29        122     0
           -                                         ... [[123001],[1,2,3,0,0,1],[12,30,1],[123,1]]
        Ṫ  - tail                                        [123,1]
         L - length                                      2

Comments

হ্যাঁ, আমি জানি আপনি পাইথকে জানেন না! +1 কারণ জেলি মনগুলি একই চিন্তা করে! খুব খারাপ ŒṖএবং ./উভয়ই লম্বা

— মিঃ এক্সকোডার

Answer 2

পাইথ , 20 বাইট

leoeSaM^N2vcRQ*M{yPl

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

আমি আর পার্টিশন ব্যবহার করি না, কারণ এটি দীর্ঘ হয়ে যায় !!! আমি দৈর্ঘ্যের বিভাজকের সমান দৈর্ঘ্যের সাবলিস্টে বিভক্ত হয়েছি।

Answer 3

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

gDÑΣôDδαà}θ÷

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

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

gDÑΣôàsß-}θ÷

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

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

gDÑΣôDδαà} θ ÷ | পুরো প্রোগ্রাম।

ছ | দৈর্ঘ্য (অঙ্কের গণনা)।
 ডি | সদৃশ (দৈর্ঘ্যের দুটি কপি স্ট্যাকের দিকে চাপুন)।
  Ñ ​​| বিভাজনগুলি (স্ট্যাকের শীর্ষে) পান।
   ।} | একটি মূল ফাংশন অনুসারে বাছাই করুন।
-------------------------------------------------- ------------
    .Dδαà | কী ফাংশন # 1।
    ô | Size আকারের অংশে (ইনপুট) বিভক্ত করুন।
     ডি | প্রতিলিপি.
      δα | পরম পার্থক্য বাহ্যিক পণ্য।
        à | সর্বাধিক পান।
    ßসß- | কী ফাংশন # 2 (বিকল্প)।
    ô | Size আকারের অংশে (ইনপুট) বিভক্ত করুন।
     à | সর্বোচ্চ।
      s | শীর্ষ দুটি উপাদান অদলবদল করুন।
       ß | নূন্যতম।
        - | বিয়োগ।
-------------------------------------------------- ------------
          । ÷ | কাস্টম বাছাই করে সর্বাধিক উপাদান দ্বারা দৈর্ঘ্য ভাগ করুন।

05AB1E এই চ্যালেঞ্জের জন্য অবিশ্বাস্যরূপে ক্ষুদ্র।

Answer 4

জাভাস্ক্রিপ্ট (ES6), 118 115 বাইট

3 বাইট সংরক্ষিত হয়েছে @ এডক 65 এর জন্য ধন্যবাদ

স্ট্রিং হিসাবে ইনপুট নেয়।

f=(s,k=l=s.length,m)=>k?f(s,k-1,l%k||(d=Math.max(...a=s.match(eval(`/.{${l/k}}/g`)))-Math.min(...a))<m?m:(r=k,d)):r

পরীক্ষার মামলা

f=(s,k=l=s.length,m)=>k?f(s,k-1,l%k||(d=Math.max(...a=s.match(eval(`/.{${l/k}}/g`)))-Math.min(...a))<m?m:(r=k,d)):r

console.log(f('1')) // [1] (0) -> 1
console.log(f('10')) // [1,0] (1) -> 2
console.log(f('11')) // [11] or [1,1] (0) -> 1 or 2
console.log(f('12')) // [1,2] (1) -> 2
console.log(f('42')) // [4,2] (2) -> 2
console.log(f('101')) // [1,0,1] (1) -> 3
console.log(f('2222')) // [2222] or [22,22] or [2,2,2,2] (0) -> 1 or 2 or 4
console.log(f('6567')) // [65,67] or [6,5,6,7] (2) -> 2 or 4
console.log(f('123000')) // [123,0] (123) -> 2
console.log(f('123001')) // [123,1] (122) -> 2
console.log(f('121131')) // [12,11,31] (20) -> 3
console.log(f('294884')) // [294,884] (590) -> 2
console.log(f('192884729')) // [192,884,729] (692) -> 3
console.log(f('123456189012')) // [123456,189012] (65556) -> 2
console.log(f('123457117346')) // [1234,5711,7346] (6112) -> 3

Comments

আপনি কি রেজিপ্যাক্সের পরিবর্তে ইওল চেষ্টা করেছিলেন?

— edc65

@ edc65 আমি সেটার কথা ভুলে যাচ্ছি। ধন্যবাদ!

— আরনাউল্ড

Answer 5

পাইথন 2 , 138 132 বাইট

n=input()
l=len(n)
print len(max([[int(n[l/i*j:][:l/i])for j in range(i)]for i in range(1,l+1)if l%i<1],key=lambda a:max(a)-min(a)))

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

Answer 6

Haskell, , 114 বাইট

f n|l<-length n=snd$maximum[(a-b,div l i)|i<-[1..l],mod l i<1,a<-i%n,b<-i%n]
i%[]=[]
i%n=read(take i n):i%drop i n

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

Answer 7

পার্ল 5 , 70 বাইট

s%.%/A/g;/$/,map$;[$-=$`-$_]=@1,@1for@1=(/.{@{+}}/gc)x!/./g%eg;$_=pop@

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

Answer 8

জেলি , 20 বাইট

ŒṖL€E$ÐfḌạþ`ẎṀ$$ÐṀḢL

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