একটি অ্যারের বিপরীত ডেল্টাস t

17

একটি অ্যারের বিপরীত ডেল্টাস t

আপনার টাস্কটি, স্বাক্ষরিত 32 বিট পূর্ণসংখ্যার একটি অ্যারে দেওয়া হয়েছে, এটির বিপরীতমুখী ডেল্টাস দিয়ে এটি পুনরায় তৈরি করুন। উদাহরণস্বরূপ, তালিকা

1  3  4  2  8

ডেল্টাস ধারণ করে:

  2  1 -2  6

যা তখন উপেক্ষিত, ফলনশীল:

 -2 -1  2 -6

এবং পুনরায় কম্পাইল, ফলন:

1 -1 -2  0 -6

চূড়ান্ত ফলাফল হিসাবে।

ইনপুট আউটপুট

আপনাকে একটি তালিকা / অ্যারে / টেবিল / টিপল / স্ট্যাক / ইত্যাদি দেওয়া হবে। কোনও মানক ইনপুট পদ্ধতির মাধ্যমে ইনপুট হিসাবে স্বাক্ষরিত পূর্ণসংখ্যাগুলির of

উপরের ডেল্টা ইনভার্সন পদ্ধতিটি অনুসরণ করে আপনাকে কোনও গ্রহণযোগ্য আকারে আবারও পরিবর্তিত ডেটা আউটপুট করতে হবে।

আপনি এন ইনপুট পাবেন 0 < N < 10যেখানে প্রতিটি নম্বর সীমার মধ্যে পড়ে-1000 < X < 1000

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

5 6 7 8          -> 5 4 3 2
1 3 4 2 8        -> 1 -1 -2 0 -6
32 18 25 192 199 -> 32 46 39 -128 -135

মন্তব্য

  • আপনি ডেল্টা ভিত্তিক পদ্ধতিতে সীমাবদ্ধ নন: আপনি যদি সহজ পদ্ধতিটি (যা খুব বেশি শক্ত হওয়া উচিত নয়) কাজ করতে পারেন তবে আপনি এটি ব্যবহারে নির্দ্বিধায়।
  • উপরে বর্ণিত হিসাবে আপনি সর্বদা কমপক্ষে 1 টি ইনপুট পাবেন এবং 9 এর বেশি হবে না।
  • আউটপুটটির প্রথম সংখ্যাটি সর্বদা ইনপুটটির প্রথম নম্বর হতে হবে, যদি এটি না হয় তবে আপনার পদ্ধতিটি ভুল।
  • কেবলমাত্র স্ট্যান্ডার্ড ইনপুট আউটপুট গ্রহণ করা হয়
  • স্ট্যান্ডার্ড লুফোলস প্রযোজ্য
  • এটি কোড-গল্ফ , তাই সর্বনিম্ন বাইট-কাউন্ট জেতা!
  • আনন্দ কর!

আমরা একটি বিজয়ী আছে।

ডেনিস এর জেলি উত্তর এ একটি ক্ষুদ্র 3 বাইট সত্য যে আমি ছাপ এটা পেটানো যাবে না বছরের কম বয়সী হই কারণে স্বর্ণ বাড়িতে গ্রহণ করেছে।

আমি মৃদু হতাশ হয়েছি আমি আসল স্পেকের উপর ভিত্তি করে কোনও উত্তর দেখতে পাইনি, তবে, পরে আমি অবশ্যই এটির উপর একটি অনুগ্রহ রাখতে পারি।

code-golf  integer 
— ATaco
সূত্র
1
আমি কি পুনরায় সংশোধন পদক্ষেপ বুঝতে পারি না? আপনি কীভাবে -2, -1, 2, -6 থেকে 1, -1, -2, 0, -6 ??
— ফোগমিস্টার
@ ফগমিস্টার আপনি একই প্রাথমিক মান থেকে শুরু করেন এবং তারপরে মূলগুলির পরিবর্তে এই পার্থক্যগুলি প্রয়োগ করুন।
— মার্টিন ইন্ডার
স্ট্যান্ডার্ড ইনপুট আউটপুট - আমি এর আগে কোনও চ্যালেঞ্জ হিসাবে ব্যবহার করে শুনিনি, তবে আমি অনুমান করি যে এর অর্থ স্টিডিন / স্টাডআউট নয়, অন্যথায় এখানে সমস্ত উত্তরই ভুল বলে মনে হচ্ছে। আমি অনুমান করি এর অর্থ হ'ল আপনি চার্চের সংখ্যা বা কিছু হিসাবে ইনপুট নিতে পারবেন না? যাইহোক, যদি এর অর্থ এটি হয় তবে এটি সম্ভবত অন্য কিছু বলা উচিত কারণ স্ট্যান্ডার্ড আউটপুট / ইনপুটটিরও অন্য অর্থ রয়েছে।
— হ্যারাল্ড কর্নেলিয়াসসেন
@ মার্টিনএন্ডার 1 + 0 = 1, 3-2 = -1 ?, 4-1 = -2 ?? এটাই আমি ভেবেছিলাম কিন্তু সেই সংখ্যাগুলি যুক্ত হয় না। উহু! কিছু মনে করো না. আমি এটা দেখেছি। আপনি মূল মান থেকে শুরু করে নতুন পার্থক্য সহ একটি নতুন অ্যারে তৈরি করেন। সুতরাং -2 এর পার্থক্যের সাথে 1 -1 এ চলে যায়, তারপরে -1 এর ডিফার্টের সাথে এটি -2 এ চলে যায় এবং তাই হয়।
— ফোগমিস্টার
1
@HaraldKorneliussen এটা সম্ভবত উল্লেখ এর এই (এবং যে সম্ভবত সবাই কি অভিমানী হয়)
— মার্টিন Ender

উত্তর:

26

জেলি , 7 3 বাইট

ḤḢ_

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

পটভূমি

(ক, খ, সি, ডি) এর ডেল্টাস হ'ল বি - এ , সি - বি , এবং ডি - সি । সংক্ষিপ্তভাবে হ্রাস করা (a, b - a, c - b, d - c) বিয়োগফল দ্বারা a - (b - a) = 2a - b , 2a - b - (c - b) = 2a - c , এবং 2a - c - (ডি - সি) = 2 এ - ডি , সুতরাং সঠিক ফলাফলটি (2 এ - এ, 2 এ - বি, 2 এ - সি, 2 এ - ডি) ।

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

ḤḢ_  Main link. Argument: A (array)

Ḥ    Unhalve; multiply all integers in A by 2.
 Ḣ   Head; extract first element of 2A.
  _  Subtract the elements of A from the result.
— ডেনিস
সূত্র
1
ভাল, এটি প্যাক আপ। এখানে পরাজয়ের হাতছাড়া হওয়া ছাড়া আর কিছুই করার নেই।
— স্টিভেন এইচ।
3
ডেনিস কেবল আমার কাছে একটি প্রশ্ন পোস্ট করার জন্য অপেক্ষা করে এবং এই ক্ষুদ্র জেলি উত্তরগুলি দিয়ে আমাকে স্নিপ করে। আমার কোন অভিযোগ নেই
— এটাকো
10

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

lambda x:[x[0]*2-n for n in x]

আইডিয়নে এটি পরীক্ষা করুন ।

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

(ক, খ, সি, ডি) এর ডেল্টাস হ'ল বি - এ , সি - বি , এবং ডি - সি । সংক্ষিপ্তভাবে হ্রাস করা (a, b - a, c - b, d - c) বিয়োগফল দ্বারা a - (b - a) = 2a - b , 2a - b - (c - b) = 2a - c , এবং 2a - c - (ডি - সি) = 2 এ - ডি , সুতরাং সঠিক ফলাফলটি (2 এ - এ, 2 এ - বি, 2 এ - সি, 2 এ - ডি) ।

— ডেনিস
সূত্র
7

গণিত, 8 বাইট

2#-{##}&

অনির্দিষ্ট সংখ্যক যুক্তি গ্রহণ করে নামহীন ফাংশন। এটি একটি "সহজ" উপায় ব্যবহার করে: সম্পূর্ণ তালিকাকে উপেক্ষা করে এবং (মূল) প্রথম উপাদানটিকে দ্বিগুণ করে।

যেমন উদাহরণস্বরূপ বলা হয় 2#-{##}&[1,3,4,2,8]; মত একটি তালিকা ফেরত {1,-1,-2,0,-6}।

— গ্রেগ মার্টিন
সূত্র
প্রকৃতপক্ষে, ধন্যবাদ - কেবল একটি টাইপো।
— গ্রেগ মার্টিন
2

আর, 23 18 17 বাইট

x=scan();2*x[1]-x

অটো-ভেক্টরাইজেশন এবং উদ্ধার করতে ডিফল্ট মুদ্রণ!

— জোনাথন ক্যারল
সূত্র
2*x[1]-xপরিবর্তে কেন ?
— বিলিউব
অপ্টিমাইজ করার জন্য কিছু ছেড়ে দিতে হবে, তাই না? (আপনাকে ধন্যবাদ)
— জোনাথন ক্যারল
2

পার্ল 6 ,  40  16 বাইট

{[\+] .[0],|.rotor(2=>-1).map({[-] @_})}
{.map(.[0]*2-*)}

সম্প্রসারিত:

{ # bare block lambda with single implicit parameter ｢$_｣ ( input is a List )

  [\[+]]  # triangle reduce the following using ｢&infix:<+>｣

    .[0], # the first value

    |(    # Slip this list into outer one ( Perl 6 doesn't auto flatten )

      .rotor( 2 => -1 ) # take the input 2 at a time, backing up 1
      .map({ [-] @_ })  # reduce the pairs using ｢&infix:<->｣

    )
}
{ # bare block lambda with single implicit parameter ｢$_｣ ( input is a List )

  .map(          # map over the inputs
    .[0] * 2 - * # take the first value multiply by 2 and subtract the current value
    #          ^- this makes the statement a WhateverCode, and is the input
  )
}
— ব্র্যাড গিলবার্ট বি 2 গিলস
সূত্র
2

মস্তিষ্ক-ফ্লাক , 76 বাইট

([][()]){{}(({})<(({}){}[{}]<>)<>>)([][()])}{}({}<<>([]){{}({}<>)<>([])}<>>)

অনলাইনে চেষ্টা করে দেখুন!

ব্যাখ্যা:

Part 1:
(      )                                        # Push:
 []                                             # the height of the stack
   [()]                                         # minus 1
        {                                  }    # While the height - 1 != 0:
         {}                                     # Pop the height
           (({})<                               # Hold onto the top value, but put it back.
                                                # This ensures that the top value is always
                                                # what was the first element of input
                 (            )                 # Push:
                  ({}){}                        # Top * 2
                        [{}]                    # minus the next element
                            <> <>               # onto the other stack

                                 >)             # Put back the element we held onto.
                                   (      )     # Push:
                                    []          # The height of the stack
                                      [()]      # Minus 1  
                                            {}  # Pop the counter used for the height
Part 2:
({}<                                            # Hold onto the top element.
                                                # This was the first number for input
                                                # so it needs to end up on top
    <>                                          # Switch stacks
      ([])                                      # Push the height of the stack
          {              }                      # While the height != 0:
           {}                                   # Pop the height
             (    )                             # Push:
              {}                                # The top element of this stack
                <>                              # onto the other stack
                   <>                           # and switch back
                     ([])                       # Push the new height of the stack
                          <>                    # After every element has switched stacks
                                                # (which reverses their order),
                                                # switch stacks
                            >)                  # Push the first element back on
— রিলে
সূত্র
2

হাস্কেল, 20 19 বাইট

f(x:r)=x:map(2*x-)r

ডেনিস হিসাবে একই সমাধান, আপনার ধারণার জন্য আপনাকে ধন্যবাদ 2a - x ।

ক্রিশ্চিয়ান সেভার্সকে একটি বাইট ধন্যবাদ সংরক্ষণ করা হয়েছে।

— Renzeee
সূত্র
একটি বাইট সংরক্ষণ করুন:f(x:r)=x:map(2*x-)r
— খ্রিস্টান সিভর্স
ধন্যবাদ, আমি @ এবং ছাড়াও বেশ কয়েকটি ভিন্ন পদ্ধতির চেষ্টা করেছি, তবে কেবল xসামনে রাখার কথা ভাবি নি ।
— রেঞ্জি
1

পিএইচপি, 48 বাইট

for(;''<$c=$argv[++$i];)echo-$c+2*$a=$a??$c,' ';

ডেনিস থেকে কৌশলটি ব্যবহার করে। ব্যবহার করুন:

php -r "for(;''<$c=$argv[++$i];)echo-$c+2*$a=$a??$c,' ';" 1 3 4 2 8

নন-ডেনিস 55 বাইট সংস্করণ:

for(;''<$c=$argv[++$i];$l=$c)echo$a+=($l??$c*2)-$c,' ';
— user59178
সূত্র
সঙ্গে এক বাইট সংরক্ষণ a&পরিবর্তে ''<এবং দুটি বাইট _পরিবর্তে ' '।
— তিতাস
1

এপিএল, 8 বাইট

+\⊃,2-/+

ব্যাখ্যা:

+\           ⍝ running sum of
  ⊃          ⍝ first item of list
   ,         ⍝ followed by
    2-/      ⍝ differences between every pair in
       +     ⍝ input list

পরীক্ষার কেস:

      ( +\⊃,2-/+ ) ¨ (5 6 7 8) (1 3 4 2 8) (32 18 25 192 199)
┌───────┬────────────┬──────────────────┐
│5 4 3 2│1 ¯1 ¯2 0 ¯6│32 46 39 ¯128 ¯135│
└───────┴────────────┴──────────────────┘
— সামুদ্রিক
সূত্র
1

ল্যাবরেথ , 34 বাইট

?:_2*}
@    _
)\?_1"
,    ;
!`-}:{

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

ব্যবহার @Dennis এর (2a - a, 2a - b, 2a - c, 2a - d)পদ্ধতির।

এখানে চিত্র বর্ণনা লিখুন

হলুদ টাইলগুলি নিয়ন্ত্রণ প্রবাহের জন্য। এই 2 ডি প্রোগ্রামিং ল্যাঙ্গুয়েজে, প্রোগ্রামটি শুরু করতে পূর্বের দিকে বাম-সর্বাধিক টাইল থেকে শুরু হয়। জংশনে, দিকটি প্রধান স্ট্যাকের শীর্ষের চিহ্ন দ্বারা নির্ধারিত হয়। ফাঁকা টাইলস দেয়াল হয়।

সবুজ

এই বিভাগটি সহায়তার স্ট্যাকের 2a সংরক্ষণ করে।

  • ? প্রথম নম্বরটি পান এবং এটিকে মূল স্ট্যাকের শীর্ষে চাপুন
  • : স্ট্যাকের শীর্ষটি নকল করুন
  • _2 স্ট্যাকের শীর্ষে দুটি চাপুন
  • *পপ y, পপ x, ধাক্কাx*y
  • } সহায়ক স্ট্যাকের শীর্ষে মূল স্ট্যাকের শীর্ষে যান।
  • _ স্ট্যাকের শীর্ষে শূন্যটি চাপুন

কমলা

এই বিভাগটি বর্তমান সংখ্যার থেকে 2 এ বিয়োগ করে, ফলাফলকে উপেক্ষা করে, ফলাফলকে আউটপুট দেয়, পরবর্তী অক্ষরটি (ডিলিমিটার) পায়, ইওএফ, একটি নতুন লাইন আউটপুট দেয়, পরের সংখ্যাটি পায় তবে প্রস্থান হয়।

  • "Noop। উত্তর থেকে আগত হলে, স্ট্যাকের শীর্ষটি শূন্য হবে এবং প্রোগ্রামটি দক্ষিণে চালিয়ে যাবে। যদি পশ্চিম থেকে আগত হয় তবে স্ট্যাকের শীর্ষটি এক হবে এবং প্রোগ্রামটি ডানদিকে ঘুরবে (দক্ষিণে অব্যাহত)
  • ;স্ট্যাকের শীর্ষটি বাতিল করুন। যেহেতু শূন্য বা একটি কেবল নিয়ন্ত্রণ প্রবাহের জন্য ব্যবহৃত হয়, আমাদের এগুলি ত্যাগ করতে হবে
  • { সহায়ক স্ট্যাকের শীর্ষস্থানীয় (2 ক) মূল স্ট্যাকের শীর্ষে যান
  • : মূল স্ট্যাকের শীর্ষে নকল করুন
  • } সহায়ক স্ট্যাকের শীর্ষে মূল স্ট্যাকের শীর্ষে যান
  • -পপ y, পপ x, ধাক্কাx-y
  • \`` Negate the top of the stack. This and the previous three operations have the effect of- (x-2a) = 2a-x`
  • ! স্ট্যাকের শীর্ষে পপ করুন এবং এটিকে একটি সংখ্যা হিসাবে আউটপুট করুন
  • , পরবর্তী অক্ষর (যা ডিলিমিটার হবে) বা EOF হলে ifণাত্মক একটিকে চাপ দিন
  • )স্ট্যাকের শীর্ষটি বৃদ্ধি করুন। যদি শেষ অক্ষরটি ইওএফ হয়, তবে স্ট্যাকের শীর্ষস্থানটি এখন শূন্য হবে এবং প্রোগ্রামটি সোজা @প্রস্থান এবং প্রস্থান অবধি চলতে থাকবে । যদি শেষ চরিত্রটি একটি বিস্ময়কর হয়, তবে স্ট্যাকের শীর্ষস্থানটি ইতিবাচক হবে যার ফলে প্রোগ্রামটি ডানদিকে পরিণত হবে এবং পূর্ব দিকে অগ্রসর হবে\
  • \ একটি নতুন লাইন আউটপুট
  • ? পরের নম্বরটি পান
  • _1 মোড়ের ডানদিকে ঘুরতে স্ট্যাকের শীর্ষে একটিকে চাপুন
— রবার্ট হিকম্যান
সূত্র
হু, এটি আমাকে মনে করিয়ে দেয় যে আমি এই চ্যালেঞ্জটিও সমাধান করেছি তবে সমাধানগুলি পোস্ট করতে সম্পূর্ণ ভুলে গেছি। আমি 24 বাইটে তিনটি পৃথক সমাধান পেয়েছি (এবং আমি নিশ্চিত যে তারা অনুকূল নয়), তাই আমি অনুমান করি যে আমি আমার পোস্ট দেওয়ার আগে মিলিয়ে বা পরাজিত করতে কয়েক দিন বা তার বেশি সময় দেব। চমৎকার কাজ, এখনও! :)
— মার্টিন এন্ডার
@ মার্টিনএেন্ডার, আমার জন্য অপেক্ষা করার দরকার নেই। আমি সন্দেহ করি যে কোনও সময়ই আমি আরও ভাল সমাধানের কথা ভাবতে সক্ষম হব। আমি এখনও স্ট্যাক-ভিত্তিক সমস্যা সমাধানের অভ্যস্ত হয়ে যাচ্ছি। আমি প্রোগ্রামিং সম্পর্কে চিন্তা করার নতুন উপায় শিখতে উপভোগ করছি।
— রবার্ট হিকম্যান
1

ল্যাবরেথ , 24 বাইট

+:}:?
}
<}}?;%):,\!-{:{>

ইনপুট এবং আউটপুট ফর্ম্যাটটি লাইনফিড-পৃথক তালিকা (যদিও ইনপুট ফর্ম্যাটটি আসলে অনেক বেশি নমনীয়) flex প্রোগ্রামটি একটি ত্রুটি দিয়ে শেষ হয়।

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

আমি এই বাইট গণনাতে আরও দুটি সমাধান পেয়েছি, যা মূলত একই কাজ করে তবে কিছুটা আলাদা নিয়ন্ত্রণ প্রবাহ ব্যবহার করে।

:+:}:?
{
,}-!
?  {
:";\@

{:+:}:?
_
<>__-?:;%):,\!

ব্যাখ্যা

নির্দেশ পয়েন্টার (আইপি) প্রথম লাইনের সাথে পূর্ব দিকে অগ্রসর হতে শুরু করে, তবে এর আগে সমস্ত কমান্ড ?মূলত গ্লোবাল স্টেটে কোনও বিকল্প নেই, যেহেতু আমরা কোথাও স্ট্যাক গভীরতার কমান্ড ব্যবহার করছি না। সুতরাং কোডটি ?পশ্চিম দিকে যেতে শুরু করবে , যেহেতু আইপিটি যখন শেষ প্রান্তে আঘাত করে তখন ঘুরিয়ে দেয়।

সুতরাং কোডটি নিম্নলিখিত রৈখিক বিটের কোড দিয়ে শুরু হয়:

?:}:+}

সূত্রটি 2aব্যবহার করার জন্য এটি কেবল আমাদের অনুলিপি তৈরি করে [2a - a, 2a - b, 2a - c, ...]।

?   Read first integer a.
:}  Move a copy off to the auxiliary stack.
:+  Multiply a by 2 (by adding it to itself).
}   Move that off to the auxiliary stack as well.

আমরা এখন প্রোগ্রামের মূল লুপটি প্রবেশ করি, কোডের একক লাইনের মধ্য দিয়ে লুপের জন্য মোটামুটি মানক কৌশলটি ব্যবহার করে:

<...>

মনে রাখবেন যে যখনই আমরা আঘাত করব তখন স্ট্যাকটি খালি থাকবে <তাই আমরা জানি আমরা সেখানে শূন্য পাব। <তারপর rotates সমগ্র লাইন, বাম, এটা দিয়ে আইপি গ্রহণ সুতরাং আমরা এই পাবেন:

...><

আইপি এর পরে বাম দিকে সরে যেতে হবে, যেখানে >লাইনটি তার মূল স্থানে স্থানান্তরিত করতে হবে (পরবর্তী পুনরাবৃত্তির জন্য এটি প্রস্তুত করতে)। তারপরে লাইনটি ডান থেকে বামে কেবল চালানো হয়, সুতরাং একক লুপ পুনরাবৃত্তিটি হ'ল:

{:{-!\,:)%;?}}

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

{:   Pull 2a back to the main stack and make a copy.
{    Pull the latest value i of the input list back to main as well.
-    Compute 2a-i/
!\   Print it with a trailing linefeed.
,    Read a character. If there are input elements left, this will be some
     form of separator character, and therefore a positive value x. However,
     at the end of the program, this will give -1.
:)   Make an incremented copy.
%    Try to to compute x%(x+1). This will error out at EOF.
;    Discard the result of the division.
?    Read the next input value.
}}   Move that and the remaining copy of 2a back to the auxiliary stack.
— মার্টিন ইন্ডার
সূত্র
এই সমাধানগুলি দুর্দান্ত। এগুলি পরীক্ষা করে দেখার জন্য এবং ল্যাবরেথে চিন্তাভাবনা শিখতে দুর্দান্ত।
— রবার্ট হিকম্যান
0

সি ++ 14, 36 বাইট

নামবিহীন ল্যাম্বদা হিসাবে এর ইনপুটটি সংশোধন করছে:

[](auto&c){for(auto&x:c)x=2*c[0]-x;}

ডেনিস থেকে কৌশলটি ব্যবহার করে। int[]বা যেমন কোনও ধারক জন্য কাজ করে vector<int>।

ব্যবহার:

#include<iostream>

auto f=
[](auto&c){for(auto&x:c)x=2*c[0]-x;}
;

int main(){
  int a[] = {1,  3,  4,  2,  8};
  f(a);
  for(auto&x:a)
    std::cout << x << ", ";
  std::cout<<"\n";
}
— কার্ল ন্যাপ
সূত্র
0

সিজেম, 16 বাইট

ইনপুট ফর্ম্যাট: [1 2 3 4]। সহজ সূত্র ব্যবহার করে।

l~_(2*/;a/,@@*.-

ব্যাখ্যা:

l~_(2*/;a/,@@*.-
l~_                     e#Read input twice into an array. Stack: [1 2 3 4] [1 2 3 4]
   (                    e#Get first element of the array. Stack: [1 2 3 4] [2 3 4] 1
    2*                  e#Multiply by two. Stack: [1 2 3 4] [2 3 4] 2
      /;                e#Discard second element. Stack: [1 2 3 4] 2
        a               e#Wrap into an array. Stack: [1 2 3 4] [2]
         /,             e#Rotate and get length. Stack: [2] [1 2 3 4] 4
           @@           e#Rotate twice. Stack: [1 2 3 4] 4 [2]
            *           e#Repeat len times. Stack: [1 2 3 4] [2 2 2 2]
             .-         e#Vectorized substraction. Stack: [-1 0 1 2]
                        e#Implictly print

কোন পরীক্ষার লিঙ্কের জন্য দুঃখিত। আমার ধারণা এসই এর ভিতরে বন্ধনীগুলির সাথে লিঙ্কগুলি পছন্দ করে না।

— রোমান গ্রাফ
সূত্র
এছাড়াও cjam.tryitonline.net রয়েছে , যা বেস 64৪ সমস্ত ক্ষেত্রকে এনকোড করে। উভয় দোভাষী যদিও আমাকে ত্রুটি দেয়।
— ডেনিস
0

পুশি , 9 বাইট

{&}2*K~-_

Cmd কমান্ড লাইনে কমা দ্বারা seperated মান হিসাবে আর্গুমেন্ট দিন: $ pushy invdeltas.pshy 1,3,4,2,8। এখানে ব্রেকডাউন, উদাহরণস্বরূপ স্ট্যাক সহ:

           % Implicit: Input on stack              [1, 3, 4, 2, 8]
{&}        % Copy first item, put at end of stack  [1, 3, 4, 2, 8, 1]
   2*      % Multiply by 2                         [1, 3, 4, 2, 8, 2]
     K~    % Negate everything on stack            [-1, -3, -4, -2, -8, -2]
       -   % Subtract last item from all           [1, -1, -2, 0, -6]
        _  % Print whole stack

দ্রষ্টব্য: পিছনের আউটপুটটি অনুমোদিত হলে এটি 8 বাইট হতে পারে: @&2*K~-_

— FlipTack
সূত্র
0

পার্ল, 26 + 3 ( -plaপতাকা) = 29 বাইট

$_="@{[map$F[0]*2-$_,@F]}"

অথবা

$_=join$",map$F[0]*2-$_,@F

ব্যবহার:

perl -plae '$_="@{[map$F[0]*2-$_,@F]}"' <<< "32 18 25 192 199"
— ডেনিস ইবায়েভ
সূত্র
0

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

-+2×⊃

এটি একটি 5-ট্রেন, এটি দুটি নেস্টেড 3-ট্রেন ("কাঁটাচামচ") এর মতো পার্স করে: -+(2×⊃)

এর মতো পড়ে: -সম্পূর্ণ অ্যারের প্লাস ( +) এর দ্বিগুণ ( 2×) প্রথম উপাদান ( ⊃)

— ngn
সূত্র
0

ised, 11 বাইট

2*$1_0-$1

আবাহন: ised --l 'file with input.txt' '2*$1_0-$1

(সম্পাদনা করুন: ডেনিস থেকে বীজগণিত চুরি করে সংশোধন করা হয়েছে)

— কালপুরুষ
সূত্র
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.