ডিসি, 104 বাইট
ইনপুট টার্মিনাল থেকে নেওয়া হয়, আউটপুট মুদ্রিত হয় এবং স্ট্যাকের মধ্যেও।
কারণ এটি ব্যবহার করে? অপারেটর, আপনার ব্যবহার করতে হবে dc -e "<solution>"
বা dc <file with solution in it>
।
কেউ কখনও আমার উত্তরগুলি দেখে না, তাদের পক্ষে একাই ভোট দিন, তবে আমি সত্যিই কেবল ডিসি-র সমস্যার সমাধান উপভোগ করি। এটি এখনও পর্যন্ত এই থ্রেডের সবচেয়ে কম দক্ষ সমাধান, তবে আমি ভেবেছিলাম যে আমি এটি যাইহোক পোস্ট করব।
1sb?sn[lesi]ss[lble1+dse^dln=sln>c]sc[liSflq1+sq]sm[Lfplq1-dsq0<p]dsp[lb1+sb0si0selcxli0!=mlbln!=h]dshxx
স্টার্টার স্টাফ
1sb Store 1 in register b
?sn Store user input in register n
[lesi]ss A macro to copy the e to the i register, stored in the s register
ফলাফল লক্ষ্যের চেয়ে বড় বা লক্ষ্যের সমান না হওয়া পর্যন্ত সমস্ত ক্ষমতায় একটি বেস বাড়ানোর জন্য ম্যাক্রো
[lble1+dse^dln=sln>c]sc
[lb ] load our base num (register b)
[ le ] load our exponent (register e)
[ 1+dse ] add 1 to the exponent, copy and store in the e register
[ ^d ] raise the base to the exponent and copy it
[ ln=s ] load the user input, if that is equal to the power result run the macro in register s
[ ln>c] load the user input, if it's greater than the power result run the macro in register c (this one)
[ ]sc save this macro in register c
উপরের এক্সপোজন ম্যাক্রোগুলি থেকে অন্য স্ট্যাকের মতো পাওয়া যায় এমন বৈধ এক্সপোঞ্জার মান সংরক্ষণ করতে ম্যাক্রো
[liSflq1+sq]sm
[liSf ] copy the i register to the top of the stack in register f
[ lq1+sq] add 1 to the q register
[ ]sm save this macro in the m register
ম্যাক্রো 2 থেকে আমাদের লক্ষ্য সংখ্যায় সমস্ত ঘাঁটি দিয়ে ম্যাক্রো (ম্যাক্রো সি) এর উপরে 2x চালানোর জন্য
[lb1+sb0si0selcxli0!=mlbln!=h]dsh
[lb1+sb ] add 1 to the base number
[ 0si0se ] reset the i and e registers (previously found value and exponent
[ lcx ] load and run the c macro
[ li0!=m ] load the result of the c macro and if it's not 0, run m to save it to the f stack
[ lbln!=h] if our base number is not equal to our target number, run macro h (this macro)
[ ]dsh duplicate this macro and save one copy, so that one is left on the stack to run later
ম্যাক্রো f স্ট্যাক থেকে মান মুদ্রণ করতে
[Lfplq1-dsq0<p]dsp
[Lfp ] load the top value from the f register and print it
[ lq1-dsq ] load the q register and subtract one from it and save it
[ 0<p] if the q register is greater than 0, run macro p (this macro) again
[ ]dsp duplicate this macro and save one copy, so that one is left on the stack to run later
xx finally run the two macros on the stack (h and then p)
[1 2 3 6]
সর্বশেষ পরীক্ষার মামলার জন্য আমার উত্তর ছাপে । এটিও মুদ্রণ করতে পারে[6 3 2 1]
,[1.0 2.0 3.0 6.0]
বা[6.0 3.0 2.0 1.0]
?