ভারসাম্যের রাসায়নিক সমীকরণ!

30

বার্ড একটি উচ্চ বিদ্যালয়ের শিক্ষার্থী যার রসায়নে কিছু সমস্যা রয়েছে problems ক্লাসে তাকে কিছু পরীক্ষা-নিরীক্ষার জন্য রাসায়নিক সমীকরণ ডিজাইন করতে হয়েছে, যেমন হেপাটেনের দহন:

সি 7 এইচ 16 + 11O 2 → 7CO 2 + 8H 2 ও

গণিত যেহেতু বার্ডের সবচেয়ে শক্তিশালী বিষয় নয়, তাই প্রায়শই প্রতিক্রিয়াটির প্রো-এবং শিক্ষাগুলির মধ্যে সঠিক অনুপাতটি খুঁজে পেতে তার বেশ কষ্ট হয়। যেহেতু আপনি বার্ডের টিউটর, তাই তাকে সহায়তা করা আপনার কাজ! একটি প্রোগ্রাম লিখুন, যা বৈধ রাসায়নিক সমীকরণ পেতে প্রয়োজনীয় প্রতিটি পদার্থের পরিমাণ গণনা করে।

ইনপুট

ইনপুট পরিমাণ ছাড়াই রাসায়নিক সমীকরণ। খাঁটি ASCII এ এটি সম্ভব করার জন্য, আমরা যে কোনও সাবস্ক্রিপশনকে সাধারণ সংখ্যা হিসাবে লিখি। এলিমেন্টের নামগুলি সর্বদা একটি বড় অক্ষর দিয়ে শুরু হয় এবং এটি একটি বিয়োগফল দ্বারা অনুসরণ করা যেতে পারে। অণুগুলি +লক্ষণগুলি দিয়ে পৃথক করা হয় , ->সমীকরণের উভয় পক্ষের মধ্যে একটি ASCII-art তীর প্রবেশ করা হয়:

Al+Fe2O4->Fe+Al2O3

ইনপুটটি একটি নতুন লাইন দিয়ে শেষ করা হয়েছে এবং এতে কোনও স্পেস থাকবে না। যদি ইনপুটটি অবৈধ হয়, আপনার প্রোগ্রামটি আপনার যা পছন্দ করতে পারে।

আপনি ধরে নিতে পারেন, ইনপুটটি কখনই 1024 বর্ণের বেশি হয় না। আপনার প্রোগ্রামটি হয় স্ট্যান্ডার্ড ইনপুট থেকে ইনপুট প্রথম আর্গুমেন্ট থেকে বা বাস্তবায়নের সংজ্ঞায়িত উপায়ে রানটাইমের সময় পড়তে পারে যদি না সম্ভব হয়।

আউটপুট

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

2Al+Fe2O3->2Fe+Al2O3

যদি কোন অণুর সংখ্যা 1 হয় তবে এটিকে ফেলে দিন। একটি সংখ্যা সর্বদা একটি ধনাত্মক পূর্ণসংখ্যার হতে হবে। আপনার প্রোগ্রামটি অবশ্যই এমন সংখ্যার ফলস্বরূপ হবে যাতে তাদের যোগফল সর্বনিম্ন। উদাহরণস্বরূপ, নিম্নলিখিতটি অবৈধ:

40Al+20Fe2O3->40Fe+20Al2O3

সমাধান না হলে মুদ্রণ করুন

Nope!

পরিবর্তে. কোনও নমুনা ইনপুট যার কোনও সমাধান নেই

Pb->Au

বিধি

  • এটি কোড-গল্ফ। সংক্ষিপ্ততম কোডটি জয়ী।
  • আপনার প্রোগ্রামটি সমস্ত যুক্তিসঙ্গত ইনপুটগুলির জন্য যুক্তিসঙ্গত সময়ে শেষ করতে হবে।

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

প্রতিটি পরীক্ষার ক্ষেত্রে দুটি লাইন থাকে: একটি ইনপুট এবং একটি সঠিক আউটপুট।

C7H16+O2->CO2+H2O
C7H16+11O2->7CO2+8H2O

Al+Fe2O3->Fe+Al2O3
2Al+Fe2O3->2Fe+Al2O3

Pb->Au
Nope!
code-golf  chemistry 
— FUZxxl
সূত্র
1
আমি ভুল হতে পারি, তবে এটি কোড গল্ফের পরিবর্তে কোনও প্রোগ্রামিং চ্যালেঞ্জের প্রাকৃতিক প্রার্থীর মতো বলে মনে হচ্ছে।
— ডেভিডসি
1
অন্তর্নির্মিত solve(ফাংশনটি ব্যবহার করে এবং eval(ইনপুটটি ব্যাখ্যা করার জন্য আমি একবার আমার টিআই-89 গ্রাফিং ক্যালকুলেটরটিতে একটি রাসায়নিক সমীকরণ সল্ভার লিখেছিলাম :)
— মেল্লামব্যাক
3
@ মেল্লামোকব কেন আপনি এটি পোস্ট করেন না, আপনি আমার কাছ থেকে মৌলিকত্বের জন্য উত্সাহ পাবেন
— রাচেট ফ্রিক
5
"যেহেতু আপনি বার্ডস টিউটর, তাই তাকে সহায়তা করা আপনার কাজ!" - আমি ভাবতাম যে কোনও শিক্ষিকা তার নিজের জন্য সফ্টওয়্যার লেখার চেয়ে
— বার্ডকে
1
@ কুয়েলিনলি এটি ভুল নয়, একেবারে আলাদা।
— FUZxxl

উত্তর:

7

সি, 442 505 অক্ষর

// element use table, then once parsed reused as molecule weights
u,t[99];

// molecules
char*s,*m[99]; // name and following separator
c,v[99][99]; // count-1, element vector

i,j,n;

// brute force solver, n==0 upon solution - assume at most 30 of each molecule
b(k){
    if(k<0)for(n=j=0;!n&&j<u;j++)for(i=0;i<=c;i++)n+=t[i]*v[i][j]; // check if sums to zero
    else for(t[k]=0;n&&t[k]++<30;)b(k-1); // loop through all combos of weights
}

main(int r,char**a){
    // parse
    for(s=m[0]=a[1];*s;){
        // parse separator, advance next molecule
        if(*s==45)r=0,s++;
        if(*s<65)m[++c]=++s;
        // parse element
        j=*s++;
        if(*s>96)j=*s+++j<<8;            
        // lookup element index
        for(i=0,t[u]=j;t[i]-j;i++);
        u+=i==u;
        // parse amount
        for(n=0;*s>>4==3;)n=n*10+*s++-48;
        n+=!n;
        // store element count in molecule vector, flip sign for other side of '->'
        v[c][i]=r?n:-n;
    }
    // solve
    b(c);
    // output
    for(i=0,s=n?"Nope!":a[1];*s;putchar(*s++))s==m[i]&&t[i++]>1?printf("%d",t[i-1]):0;
    putchar(10);
}

হিসাবে চালান:

./a.out "C7H16+O2->CO2+H2O"
./a.out "Al+Fe2O4->Fe+Al2O3"
./a.out "Pb->Au"

ফলাফল:

C7H16+11O2->7CO2+8H2O
8Al+3Fe2O4->6Fe+4Al2O3
Nope!
— বাচ্চা খরগোস
সূত্র
+1 এটি প্রেসের চেয়ে অনেক বেশি সম্মানজনক। বিতর্ক
— আর্দনিউ
2
কোঁকড়া ধনুর্বন্ধনী এড়ানোর জন্য স্টেটমেন্ট বিভাজক হিসাবে কমা ব্যবহার করার চেষ্টা করুন। কোডটি সংক্ষিপ্ত করার জন্য টের্নারি অপারেটরগুলির সাথে যদি-অন্য-পরে-নির্মাণগুলি প্রতিস্থাপন করে দেখুন। টি [আমি]> 1 printf, (T "% s" এর, [আমি]): 0; এক বাইট খাটো। এছাড়াও: মি [0] * এম এর সমান।
— FUZxxl
6

গণিত 507

আমি বর্ণিত অগমেন্ট রাসায়নিক সংমিশ্রণ ম্যাট্রিক্স পদ্ধতির নিয়োগ করেছি

এলআরথরন, রাসায়নিকের সাথে ভারসাম্য অর্জনের একটি উদ্ভাবনী পদ্ধতির - বিক্রিয়া সমীকরণ: একটি সরলীকৃত ম্যাট্রিক্স - ম্যাট্রিক্স নাল স্থান নির্ধারণের জন্য বিপরীত কৌশল। কেম.এডুকেটর , 2010, 15, 304 - 308।

একটি সামান্য ঝাঁকুনি যুক্ত করা হয়েছিল: যে কোনও সমাধানে পূর্ণসংখ্যার মানগুলি নিশ্চিত করতে আমি উপাদানগুলির সর্বশ্রেষ্ঠ সাধারণ বিভাজক দ্বারা নাল-স্পেস ভেক্টরের স্থানান্তরকে বিভক্ত করেছিলাম। সমীকরণকে ভারসাম্য বজায় রাখার একাধিক সমাধান রয়েছে এমন ক্ষেত্রে এখনও আমার প্রয়োগ বাস্তবায়িত হয় না।

b@t_ :=Quiet@Check[Module[{s = StringSplit[t, "+" | "->"], g = StringCases, k = Length, 
  e, v, f, z, r},
e = Union@Flatten[g[#, _?UpperCaseQ ~~ ___?LowerCaseQ] & /@ s];v = k@e;
s_~f~e_ := If[g[s, e] == {}, 0, If[(r = g[s, e ~~ p__?DigitQ :> p]) == {}, 1, 
   r /. {{x_} :> ToExpression@x}]];z = k@s - v;
r = #/(GCD @@ #) &[Inverse[Join[SparseArray[{{i_, j_} :> f[s[[j]], e[[i]]]}, k /@ {e, s}], 
Table[Join[ConstantArray[0, {z, v}][[i]], #[[i]]], {i, k[#]}]]][[All, -1]] &
   [IdentityMatrix@z]];
Row@Flatten[ReplacePart[Riffle[Partition[Riffle[Abs@r, s], 2], " + "], 
   2 Count[r, _?Negative] -> " -> "]]], "Nope!"]

টেস্ট

b["C7H16+O2->CO2+H2O"]
b["Al+Fe2O3->Fe+Al2O3"]
b["Pb->Au"]

enter image description here

বিশ্লেষণ

এটি উপাদান দ্বারা রাসায়নিক প্রজাতি সমন্বিত নিম্নলিখিত রাসায়নিক রচনা টেবিলটি স্থাপন করে কাজ করে, এতে একটি অতিরিক্ত নালিকা ভেক্টর যুক্ত করা হয় (বাড়ানো রাসায়নিক সংমিশ্রণের টেবিল হয়ে উঠছে:

chemical composition table

অভ্যন্তরীণ কোষগুলি ম্যাট্রিক্স হিসাবে সরানো হয় এবং উল্টানো হয়, ফলন দেয়।

inversion

ডান-সর্বাধিক কলামটি উত্পাদিত হয়:

{- (1/8), - (11/8), 7/8, 1

ভেক্টরের প্রতিটি উপাদানকে উপাদানগুলির জিসিডি দ্বারা ভাগ করা হয় (1/8), প্রদান করে:

{-1, -11, 7, 8}

যেখানে theণাত্মক মানগুলি তীরের বাম দিকে স্থাপন করা হবে। এর নিরঙ্কুশ মানগুলি মূল সমীকরণের ভারসাম্য বজায় রাখতে প্রয়োজনীয় সংখ্যাগুলি:

solution

— DavidC
সূত্র
উদ্দীপনা পয়েন্ট যুক্ত করতে ভুলবেন না!
— আরডনিউ
:} ঠিক আছে, এবং আমি অক্ষর গণনাটি
— শীর্ষে রেখেছি
আমি মনে করি আপনি বাম-হাতের নয়, ডান হাতের কলামটি বোঝাচ্ছেন। আমি ব্যাখ্যার (+1) প্রশংসা করি তবে আমি অবাক হই: যদি অণুগুলির সংখ্যা উপাদানগুলির সংখ্যার চেয়ে আরও বেশি না হয় তবে আপনি কীভাবে প্যাড করবেন? এখন কাগজ পড়ার জন্য বন্ধ।
— পিটার টেলর
কোনও কারণে, আমি কেবল আজ আপনার মন্তব্য জুড়ে এসেছি। হ্যাঁ, আমি "ডান হাতের কলাম" বলতে চাইছিলাম। আমি এটিতে কাজ করার পরে এত বেশি সময় কেটে গেছে যে কোথায় প্যাডিং ব্যবহৃত হয় তা আমি দেখতে (বা মনে রাখতে পারি না)। দুঃখিত।
— ডেভিডসি
3

পাইথন, 880 টি অক্ষর

import sys,re
from sympy.solvers import solve
from sympy import Symbol
from fractions import gcd
from collections import defaultdict

Ls=list('abcdefghijklmnopqrstuvwxyz')
eq=sys.argv[1]
Ss,Os,Es,a,i=defaultdict(list),Ls[:],[],1,1
for p in eq.split('->'):
 for k in p.split('+'):
  c = [Ls.pop(0), 1]
  for e,m in re.findall('([A-Z][a-z]?)([0-9]*)',k):
   m=1 if m=='' else int(m)
   a*=m
   d=[c[0],c[1]*m*i]
   Ss[e][:0],Es[:0]=[d],[[e,d]]
 i=-1
Ys=dict((s,eval('Symbol("'+s+'")')) for s in Os if s not in Ls)
Qs=[eval('+'.join('%d*%s'%(c[1],c[0]) for c in Ss[s]),{},Ys) for s in Ss]+[Ys['a']-a]
k=solve(Qs,*Ys)
if k:
 N=[k[Ys[s]] for s in sorted(Ys)]
 g=N[0]
 for a1, a2 in zip(N[0::2],N[1::2]):g=gcd(g,a2)
 N=[i/g for i in N]
 pM=lambda c: str(c) if c!=1 else ''
 print '->'.join('+'.join(pM(N.pop(0))+str(t) for t in p.split('+')) for p in eq.split('->'))
else:print 'Nope!'

পরীক্ষা:

python chem-min.py "C7H16+O2->CO2+H2O"
python chem-min.py "Al+Fe2O4->Fe+Al2O3"
python chem-min.py "Pb->Au"

আউটপুট:

C7H16+11O2->7CO2+8H2O
8Al+3Fe2O4->6Fe+4Al2O3
Nope!

880 এর চেয়ে অনেক কম হতে পারে তবে আমার চোখ আমাকে ইতিমধ্যে হত্যা করছে ...

— jadkik94
সূত্র
2

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

পূর্ববর্তী বাইট গণনা: 794, 776, 774, 765, 759, 747, 735, 734, 720, 683, 658, 655, 654, 653, 651, 638, 637, 636 বাইট

দ্বিতীয় ইন্ডেন্টেশন স্তরটি কেবল একটি ট্যাব, তৃতীয়টি একটি ট্যাব এবং পরে একটি স্থান।

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

from sympy import*
import sys,re
from sympy.solvers import*
from collections import*
P=str.split
L=map(chr,range(97,123))
q=sys.argv[1]
S,O,a,i,u,v=defaultdict(list),L[:],1,1,'+','->'
w=u.join
for p in P(q,v):
 for k in P(p,u):
     c=L.pop(0)
     for e,m in re.findall('([A-Z][a-z]*)(\d*)',k):
      m=int(m or 1)
      a*=m
      S[e][:0]=[c,m*i],
 i=-1
Y=dict((s,Symbol(s))for s in set(O)-set(L))
Q=[eval(w('%d*%s'%(c[1],c[0])for c in S[s]),{},Y)for s in S]+[Y['a']-a]
k=solve(Q,*Y)
if k:
 N=[k[Y[s]]for s in sorted(Y)]
 g=gcd(N[:1]+N[1::2])
 print v.join(w((lambda c:str(c)*(c!=1))(N.pop(0)/g)+str(t)for t in P(p,u))for p in P(q,v))
else:print'Nope!'
— Zachary
সূত্র
তিনটি বাইট সংরক্ষণ করুন ''.join(map(chr,range(97,122))): ডি
— অ্যালিকানডিল
। :(, যে না কাজ যাইহোক, নেই map(chr,range(97,123))12 বাইট জন্য সংরক্ষণ কাজ করে।
— Zachary
হ্যাঁ সঠিক! এটি অজগর 2!
— আলীকান্দিল
1

জাভাস্ক্রিপ্ট, 682 বাইট

x=>{m=1;x.split(/\D+/g).map(i=>i?m*=i:0);e=new Set(x.replace(/\d+|\+|->/g,"").match(/([A-Z][a-z]*)/g));e.delete``;A=[];for(let z of e){t=x.split`->`;u=[];for(c=1;Q=t.shift();c=-1)Q.split`+`.map(p=>u.push(c*((i=p.indexOf(z))==-1?0:(N=p.substring(i+z.length).match(/^\d+/g))?N[0]:1)));A.push(u)}J=A.length;for(P=0;P<J;P++){for(i=P;!A[i][P];i++);W=A.splice(i,1)[0];W=W.map(t=>t*m/W[P]);A=A.map(r=>r[P]?r.map((t,j)=>t-W[j]*r[P]/m):r);A.splice(P,0,W)}f=e.size;if(!A[0][f])return"Nope!";g=m=-m;_=(a,b)=>b?_(b,a%b):a;c=[];A.map(p=>c.push(t=p.pop())&(g=_(g,t)));c.push(m);j=x.match(/[^+>]+/g);return c.map(k=>k/g).map(t=>(t^1?t:"")+(z=j.shift())+(z.endsWith`-`?">":"+")).join``.slice(0,-1);}
স্নিপেট প্রসারিত করুন

এটি কুইলিনের উত্তরের আরও অনেক গল্ফ (বহু দশকের চরিত্র!)। নন-কেপেটিং হতে পারে কারণ নির্দিষ্ট জেএসের চ্যালেঞ্জ পরবর্তী পোস্টের বৈশিষ্ট্য রয়েছে।

— Zachary
সূত্র
0

জাভাস্ক্রিপ্ট, 705 বাইট

(অ-প্রতিদ্বন্দ্বী, কিছু বৈশিষ্ট্য চ্যালেঞ্জ পরবর্তী পোস্ট করে)

Other solutions all had elements of brute-forcing. I tried for a more deterministic approach by representing the chemical equation as a set of linear equations, and then solving using the Gauss-Jordan algorithm to take the reduced row-echelon form of that matrix. In order to isolate out the trivial case where everything is zero, I assume that one of the elements is a constant number - and that number is determined by just all the numbers multiplied together, in order to not have fractions. Then as a final step we'll divide each by the gcd to satisfy the last condition.

Ungolfed:

function solve(x) {
	//firstly we find bigNumber, which will be all numbers multiplied together, in order to assume the last element is a constant amount of that
	bigNumber = 1;
	arrayOfNumbers = new Set(x.split(/\D+/g));
	arrayOfNumbers.delete("");
	for (let i of arrayOfNumbers) bigNumber *= parseInt(i);
	
	//first actual step, we split into left hand side and right hand side, and then into separate molecules
	//number of molecules is number of variables, number of elements is number of equations, variables refer to the coefficients of the chemical equation
	//note, the structure of this is changed a lot in the golfed version since right is the same as negative left
	left = x.split("->")[0].split("+");
	righ = x.split("->")[1].split("+");
	molecules = left.length + righ.length;
	
	//then let's find what elements there are - this will also become how many equations we have, or the columns of our matrix minus one
	//we replace all the non-element characters, and then split based on the uppercase characters
	//this also sometimes adds a "" to the array, we don't need that so we just delete it
	//turn into a set in order to remove repeats
	elems = new Set(x.replace(/\d+|\+|->/g,"").match(/([A-Z][a-z]*)/g));
	elems.delete("");
	
	rrefArray = [];//first index is rows, second index columns - each row is an equation x*(A11)+y*(A21)+z*(A31)=A41 etc etc, to solve for xyz as coefficients
	//loop thru the elements, since for each element we'll have an equation, or a row in the array
	for (let elem of elems) {
		buildArr = [];
		//loop thru the sides
		for (let molecule of left) {
			//let's see how many of element elem are in molecule molecule
			//ASSUMPTION: each element happens only once per molecule (no shenanigans like CH3COOH)
			index = molecule.indexOf(elem);
			if (index == -1) buildArr.push(0);
			else {
				index += elem.length;
				numberAfterElement = molecule.substring(index).match(/^\d+/g);
				if (numberAfterElement == null) buildArr.push(1);
				else buildArr.push(parseInt(numberAfterElement));
			}
		}
		//same for right, except each item is negative
		for (let molecule of righ) {
			index = molecule.indexOf(elem);
			if (index == -1) buildArr.push(0);
			else {
				index += elem.length;
				numberAfterElement = molecule.substring(index).match(/^\d+/g);
				if (numberAfterElement == null) buildArr.push(-1);
				else buildArr.push(parseInt(numberAfterElement)*(-1));
			}
		}
		rrefArray.push(buildArr);
	}
	
	//Gauss-Jordan algorithm starts here, on rrefArray
	for (pivot=0;pivot<Math.min(molecules, elems.size);pivot++) {
		//for each pivot element, first we search for a row in which the pivot is nonzero
		//this is guaranteed to exist because there are no empty molecules
		for (i=pivot;i<rrefArray.length;i++) {
			row = rrefArray[i];
			if (row[pivot] != 0) {
				workingOnThisRow = rrefArray.splice(rrefArray.indexOf(row), 1)[0];
			}
		}
		//then multiply elements so the pivot element of workingOnThisRow is equal to bigNumber we determined above, this is all to keep everything in integer-space
		multiplyWhat = bigNumber / workingOnThisRow[pivot]
		for (i=0;i<workingOnThisRow.length;i++) workingOnThisRow[i] *= multiplyWhat
		//then we make sure the other rows don't have this column as a number, the other rows have to be zero, if not we can normalize to bigNumber and subtract
		for (let i in rrefArray) {
			row = rrefArray[i];
			if (row[pivot] != 0) {
				multiplyWhat = bigNumber / row[pivot]
				for (j=0;j<row.length;j++) {
					row[j] *= multiplyWhat;
					row[j] -= workingOnThisRow[j];
					row[j] /= multiplyWhat;
				}
				rrefArray[i]=row;
			}
		}
		//finally we put the row back
		rrefArray.splice(pivot, 0, workingOnThisRow);
	}
	
	//and finally we're done!
	//sanity check to make sure it succeeded, if not then the matrix is insolvable
	if (rrefArray[0][elems.size] == 0 || rrefArray[0][elems.size] == undefined) return "Nope!";
	
	//last step - get the results of the rref, which will be the coefficients of em except for the last one, which would be bigNumber (1 with typical implementation of the algorithm)
	bigNumber *= -1;
	gcd_calc = function(a, b) {
		if (!b) return a;
		return gcd_calc(b, a%b);
	};
	coEffs = [];
	gcd = bigNumber;
	for (i=0;i<rrefArray.length;i++) {
		num = rrefArray[i][molecules-1];
		coEffs.push(num);
		gcd = gcd_calc(gcd, num)
	}
	coEffs.push(bigNumber);
	for (i=0;i<coEffs.length;i++) coEffs[i] /= gcd;
	
	//now we make it human readable
	//we have left and right from before, let's not forget those!
	out = "";
	for (i=0;i<coEffs.length;i++) {
		coEff = coEffs[i];
		if (coEff != 1) out += coEff;
		out += left.shift();
		if (left.length == 0 && righ.length != 0) {
			out += "->";
			left = righ;
		} else if (i != coEffs.length-1) out += "+";
	}
	return out;
}
console.log(solve("Al+Fe2O4->Fe+Al2O3"));
console.log(solve("Al+Fe2O3->Fe+Al2O3"));
console.log(solve("C7H16+O2->CO2+H2O"));
console.log(solve("Pb->Au"));
Expand snippet

Golfed

s=x=>{m=1;x.split(/\D+/g).map(i=>i!=""?m*=i:0);e=(new Set(x.replace(/\d+|\+|->/g,"").match(/([A-Z][a-z]*)/g)));e.delete("");A=[];for(let z of e){t=x.split("->");u=[];for(c=1;Q=t.shift();c=-1)Q.split("+").map(p=>u.push(c*((i=p.indexOf(z))==-1?0:(N=p.substring(i+z.length).match(/^\d+/g))?N[0]:1)));A.push(u)}J=A.length;for(P=0;P<J;P++){for(i=P;!A[i][P];i++);W=A.splice(i,1)[0];W=W.map(t=>t*m/W[P]);A=A.map(r=>!r[P]?r:r.map((t,j)=>t-W[j]*r[P]/m));A.splice(P,0,W)}f=e.size;if (!A[0][f])return "Nope!";g=m=-m;_=(a,b)=>b?_(b,a%b):a;c=[];A.map(p=>c.push(t=p.pop())&(g=_(g,t)));c.push(m);j=x.match(/[^+>]+/g);return c.map(k=>k/g).map(t=>(t==1?"":t)+(z=j.shift())+(z.endsWith("-")?">":"+")).join("").slice(0,-1);}

console.log(s("Al+Fe2O4->Fe+Al2O3"));
console.log(s("Al+Fe2O3->Fe+Al2O3"));
console.log(s("C7H16+O2->CO2+H2O"));
console.log(s("Pb->Au"));
Expand snippet

— Kuilin Li
সূত্র
1
Noncompeting, as some features postdate the challenge.
— Zacharý
Oh wow I didn't notice how old this was. Thanks!
— Kuilin Li
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.