Kimya dersine geri dön


15

Giriş

Kimyada öğrendiğim ilk şeylerden biri, alkanların yanması için formül vermekti. En temel örnekti: 2CH4 + 4O2 > 4H2O + 2CO2. Denklemin her katsayıyı 2'ye bölerek basitleştirilebileceğini unutmayın CH4 + 2O2 > 2H2O + CO2 . İşleri kolaylaştırmak için bu adımı göz ardı edeceğiz .

Herhangi bir alkanın yanmasıyla oksijenin kullanıldığını görebilirsiniz. Reaksiyondan sonra sadece CO2 ve H20 yapılır.

Görev:

STDIN veya mümkün olan en yakın eşdeğerden girdi alan ve STDOUT veya mümkün olan en yakın eşdeğeri kullanarak toplam reaksiyonu veren tam bir program verin.

Giriş daima şeklinde olacak C(n)H(2n+2)olan n > 0. Bunlar bazı örnek girdilerdir:

CH4
C2H6
C3H8
C4H10
C5H12
C6H14

etc.

Yararlı bir ipucu:

Her alkanın yanma reaksiyonunda standart bir deseni vardır:

2C(n)H(2n+2) + (3n+1)O2 > (2n+2)H2O + (2n)CO2

Örneğin

C4H10Aşağıdaki denklem verir: 2C(4)H(2*4+2) + (3*4+1)O2 > (2*4+2)H2O + (2*4)CO2. Her şeyi hesapladıktan sonra, bu son denklemi elde ederiz:2C4H10 + 13O2 > 10H2O + 8CO2

Örnekler:

input:  CH4
output: 2CH4 + 4O2 > 4H2O + 2CO2

input:  C3H8
output: 2C3H8 + 10O2 > 8H2O + 6CO2

input:  C4H10
output: 2C4H10 + 13O2 > 10H2O + 8CO2

input:  C12H26
output: 2C12H26 + 37O2 > 26H2O + 24CO2

Kurallar:

  • Tam bir program sağlamanız gerekir.
  • Programınızın STDIN'den veya mümkünse en yakın eşdeğerinden girdi alması gerekir.
  • Programınızın STDOUT veya mümkünse en yakın eşdeğerini kullanarak çıktı alması gerekir.
  • Okunabilirliği artırmak için örneklerde boşluk kullandığımı unutmayın, bunlar gerekli değildir . 2CH4 + 4O2 > 4H2O + 2CO2ve 2CH4+4O2>4H2O+2CO2her ikisi de geçerli çıktılardır. Bununla birlikte, çıktı için sürekli olarak boşluklar kullanırsanız, % -10 bonus kazanırsınız
  • Bu , bu yüzden en az bayt miktarı ile program kazanır!


Yani girdinin doğru formüller olacağını varsayabiliriz?
TanMath

@TanMath, evet, geçersiz formüller hakkında endişelenmenize gerek yok
Adnan

"sürekli olarak boşluk kullan" - sürekli olarak 0 boşluk kullanılsın mı?
Mego

1
@Mego, hayır. 0 boşluk kullanmak hiç boşluk kullanmak değildir, bu nedenle kural geçerli değildir
Adnan

Yanıtlar:



7

Python 3, 86 * 0.9 = 77.4 bayt

s=input()
N=int(s.split('H')[1])
print("2%s + %dO2 > %dH20 + %dCO2"%(s,N*1.5-2,N,N-2))

Girilen Hsayı yerine sayı sayısını ayıklar C. Bu, özel kasadan kaçınır CH4ve çıktı ifadelerini basitleştirir N=2n+2.

Çıktının parametreleri dize biçimlendirme yoluyla takılı. İlk özet sadece girdi dizesidir ve geri kalanı hesaplanmış sayılara takılmıştır. N*1.5-2(Aynı olarak N*3/2-2) bir kayan nokta verir, ancak dize biçimlendirmesi bunu bir int'e dönüştürür.


4

Java, 0.9 * 202 = 181.8 bayt

Bazen kendimi sadece Java ile incitip geçirmediğimi merak ediyorum.

@TNT ve @TFeld'e iyi 20 baytlık tıraş için teşekkürler!

A sınıfı {public static void main (String [] a) {String s = a [0] .substring (1, a [0] .indexOf ("H")); uzun n = Long.parseLong ((s.length) ()> 0)? S: "1"); System.out.printf ("% 2 s +% dO2>% dH2O +% dCO2", a [0], 3 * n + 1,2 * n + 2 , 2x n);}}

Gayet basit. Temelde, girdi kesmek Ciçin Hve bu alt dize olsun. Eğer bir şey yoksa, nbire ayarladım . Aksi takdirde, Cve arasındaki sayıya ayarladım H. Aşağıdaki kod sadece yazdırır ve uygun gösterime koyar.

Ungolfed:

a sınıfı{
    public static void main (Dize [] a) {
         Dize s = a [0]. Alt dize (1, bir [0] .indexOf ("H"));
         long n = Long.parseLong ((s.length ()> 0)? s: "1");
         System.out.printf ("% 2 s +% dO2>% dH2O +% dCO2", a [0], 3 * n + 1,2 * n + 2,2 * n);
    }
}

2
İyi cevap, ancak komut satırı argümanlarını değil STDIN kullanmalısınız. Gerçi (doğru sayarsam ham puanınızdan -11) printfyerine kullanarak kısaltabilirsiniz +.
TNT

Bana komut satırı argümanlarını kullanmanın STDIN için kabul edilebilir bir alternatif olduğu söylendi. Ayrıca, benim kullanmamı nasıl ifade ettiğinizi açıklığa kavuşturabilir misiniz printf? (Biraz titiz, daha önce kullanmadım.: D)
Addison Crump

printfmekaniğini kullanır java.util.Formatter. Yazdırma ifadenizde "% d" gibi bir dizginiz olabilir ve bu satırdan sonra yazdırılacak bir değer veya değişken olabilir. Yazdırmak için çok değişkeninizin olduğu durumlarda yararlı olabilir, örneğin .
TNT

Ve STDIN yerine komut satırı argümanlarının kabul edilebilir olması benim için yeni (ve oldukça yararlı) bir haber. :)
TNT

1
@VoteToClose Evet, Java ile kendinizi incitiyorsunuz.
Kritixi Lithos

4

Python 2, 122 91 * 0.9 = 81.9 bayt

i=input()
n=2*int(i[1:i.find('H')]or 1)
print'2%s + %dO2 > %dH2O + %dCO2'%(i,n*3/2+1,n+2,n)

3

Javascript ES6, 63 * .9 = 56,7 bayt

_=>`2${_} + ${$=_.split`H`[1],$*1.5-2}O2 > ${$}H2O + ${$-2}CO2`

ESMin yanıtıma benzer.


3

Pyth, 69 bayt * 0.9 = 62 63 * 0.9 = 57 56 * 0.9 = 50 53 * 0.9 = 48 bayt

Js>z+xz\H1s[\2z%" + %dO2 > %dH2O + %dCO2"[-*1.5J2J-J2

H değerlerini kullandığım xnor'un cevabı gibidir. Bir J değişkeni molekülün moleküler formülünde H miktarını depolamak için kullanılır.

Burada deneyin


Boşluk için altı bayt harcarsınız, ancak bonustan sadece beş bayt kazanırsınız, bu yüzden buna değmez.
lirtosiast

2

Javascript ES6, 96 * 0.9 = 86.4

f=s=>`2C${(n=(s.match(/\d+(?!.*\d)/)[0]-2))>2?n/2:''}H${n+2} + ${1.5*n+1}O2 > ${n+2}H2O + ${n}CO2`

2

CJam, 45 44 bayt

2r_'H/1=[i_((_2/1$+)@@]"+%dO2>%dH2O+%dCO2"e%

Çevrimiçi deneyin

Özel kasadan kaçınmak CH4için, ilk sayıyı hiç kullanmıyorum ve yalnızcaH . Bu değeri verir 2n+2. Daha sonra kalan değerler buna göre hesaplanır ve biçimlendirilir.

Açıklama:

2       Push leading 2 for output.
r       Get input.
_'H/    Copy and split at 'H.
1=      Take second part after split, this is 2n+2.
[       Start list.
  i       Convert string value to integer.
  _((     Copy and decrement twice, giving 2n.
  _2/     Copy and divide by 2, giving n.
  1$      Copy the 2n to the top.
  +       Add, to get 3n.
  )       Increment, giving 3n+1. We now have 2n+2, 2n, 3n+1 on stack.
  @@      Rotate top 3 entries twice, to get 3n+1, 2n+2, 2n.
]       Close list.
"+%dO2>%dH2O+%dCO2"
        Format string for output.
e%      "printf" operator.

2r_[[~]W=_2/(3*)\_2-]"+%dO2>%dH2O+%dCO2"e%bir bayt kaydeder.
Dennis

2

Perl, (84 + 1) * 0.9 = 76.5

( -nBayrakla çalıştırmak için +1 karakter )

Benim ilk Perl golf!

@x=(1,m/C(\d)/g);$n=$x[$#x];say"2$_ + ".(3*$n+1)."O2 > ".(($n*=2)+2)."H20 + ${n}CO2"

STDIN'in sondaki bir yeni satır içermemesi önemlidir. Örnek kullanım:

llama@llama:...code/perl/ppcg64412chemistry$ printf CH4 | perl -n chemistry.pl
2CH4 + 4O2 > 4H20 + 2CO2

Ungolfed-imsi:

#!/usr/bin/perl
use 5.10.0;

$_ = 'C3H8';
my @x = (1, m/C(\d)/g);
my $n = $x[$#x];
say "2$_ + ".(3*$n+1)."O2 > ".(($n*=2)+2)."H20 + ${n}CO2";

Çizgiler

my @x = (1, m/C(\d)/g);
my $n = $x[$#x];

burada oldukça ilginç. $#xifadesinin "son doldurulmuş endeksini" temsil eder @x(ve SE'nin sözdizimi vurgulaması bunun aptal olduğu için bir yorum olduğunu düşünür), bu nedenle varsa normal ifadenin $x[$#x]yakalanan kısmını veya başka bir şekilde seçer . (Perl, diğer tüm durumlarda bir dize olması umurunda değildir ; Perl'de iyi olan dizelerde sayısal işleçler kullanabilirsiniz.)C(\d)11


1

JS, 118 (106) bayt

x=prompt();y=x.replace("CH","C1H").match(/\d{1,}/g)[0];alert(2+x+" + "+(3*y+1)+"O2 > "+(2*y+2)+"H2O + "+(2*y)+"CO2");

1

𝔼𝕊𝕄𝕚𝕟, 51 * .9 = 45,9 karakter / 64 * .9 = 57,6 bayt

a=ïČ`H”[1],`2⦃ï} + ⦃a*1.5-2}O2 > ⦃a}H2O + ⦃a-2}CO2`

Try it here (Firefox only).

açıklama

a=ïČ`H”[1],      // split input along H to get 2n+2
`  2⦃ï}          // 2C(n)H(2n+2) – this is the same as 2[input alkane's formula]
   + ⦃a*1.5-2}O2 // + 2(3n+1)O2
   > ⦃a}H2O      // > (2n+2)H2O
   + ⦃a-2}CO2    // + (2n)O2
`                // implicitly output the template string above

Cevabımı kim reddetti, lütfen bir açıklama alabilir miyim?
Mama Fun Roll

1

Python, 0.9 * 195 = 175 0.9 * 190 = 171 0.9 * 148 = 133 bayt

i=raw_input()
O=3*int(i[1:i.find('H')]or 1)+1;C=2*int(i[1:i.find('H')]or 1);print"2"+i+" + "+`O`+"O2"+" > "+i[i.find('H')+1:]+"H2O"+ " + "+`C`+"CO2"

Burada deneyin


printVe bir "karakter arasında boşluk bırakmanız gerekmez ve CO2değişken daha kısa bir şey olarak adlandırılabilir :)
undergroundmonorail

@undergroundmonorail teşekkürler
TanMath

Yana i[1]ya olması sağlanır "H"veya bir rakam, sen başka byte kaydedebilirsiniz if i[1]>"9"(veya değiştirin "9"58 ila 71 bir ASCII değerine sahip başka bir karakterle)
undergroundmonorail

1

F #, 113

let s=stdin.ReadLine()
float s.[1+s.IndexOf 'H'..]|>fun f->printf"2%s + %gO2 > %gH2O + %gCO2"s<|f*1.5-2.<|f<|f-2.

1

MATLAB, 96 * 0,9 = 86,4 bayt

s=input('');i=[sscanf(s,'C%dH'),1];n=i(1);fprintf('%s + %dO2 > %dH2O + %dCO2',s,3*n+1,2*n+2,2*n)

Oldukça açıklayıcı. Bir giriş dizesi alır (bunu MATLAB yürütmeye çalışmaz, böylece tırnak içine koymak gerekir!). Daha sonra girişteki C ve H arasındaki sayıyı ondalığa dönüştürür. 1 değeri sscanf çıktısına bir dizi olarak eklenir, böylece dizideki CH4ilk dizinin C ve H arasında bir sayı yoksa 1 alırız. Sonra boşluklarla yazdırır sorudaki formülü takip eder.

Bu aynı zamanda birlikte çalışması gerekir Octave çevrimiçi tercüman kullanarak burada .


1

C ++, 160 * 0.9 = 144 bayt

#include<iostream>
int main(){int n=1,t;std::cin.get();std::cin>>n;t=2*n;printf("2C");n-1&&printf("%i",n);printf("H%i + %iO2 > %iH2O + %iCO2",t+2,t+n+1,t+2,t);}

Beklediğimden biraz daha fazla. Önce karakteri okur ve atar, sonra int okur ve sonucu çıkarır. Sorun şu kin 1 olmakla ilgilidir. Çıktı almanın daha kısa bir yolunu düşünemiyorum.

Ungolfed

#include <iostream>
int main()
{
    int n = 1, t;
    std::cin.get();
    std::cin >> n;
    t = 2 * n;
    printf("2C");
    n - 1 && printf("%i", n);
    printf("H%i + %iO2 > %iH2O + %iCO2", t + 2, t + n + 1, t + 2, t);
}

1

Clojure / ClojureScript, 98 * 0.9 = 88.2 bayt

#(let[n(max 1(int((re-find #"C(.*)H"%)1)))m(* 2 n)](str "2"%" + "(inc(* 3 n))"O2 > "(+ 2 m)"H2O + "m"CO2"))

Anonim bir işlev oluşturur. Giderek Deneyin burada tecavüz (def f #(let...)), sonra (f "C3H8").


1

Excel, 123 * 0.9 = 110.7 bayt

=="2"&A1&" + "&(3*MID(A1,FIND("H",A1)+1,9)/2-2)&"O2 > "&MID(A1,FIND("H",A1)+1,9)&"H2O + "&(MID(A1,FIND("H",A1)+1,9)-2)&"CO2"

CH4 girişini C1H4 olarak alabilseydik, 122 * 0.9 = 109.8 bayta düşürülebilir

="2"&A1&" + "&3*MID(A1,2,FIND("H",A1)-2)+1&"O2"&" > "&MID(A1,FIND("H",A1)+1,9)&"H2O + "&(MID(A1,FIND("H",A1)+1,9)-2)&"CO2"

Sitemizi kullandığınızda şunları okuyup anladığınızı kabul etmiş olursunuz: Çerez Politikası ve Gizlilik Politikası.
Licensed under cc by-sa 3.0 with attribution required.