Ini adalah jenis tantangan baru yang terinspirasi oleh Memulihkan masalah kode sumber yang termutasi .

Anda harus menulis dua program atau fungsi, keduanya dalam bahasa yang sama. Yang pertama harus menyelesaikan Tugas # 1 dan yang kedua harus menyelesaikan Tugas # 2.

Skor Anda akan menjadi jumlah dari program yang lebih panjang dan jarak Levenshtein antara dua kode sumber program. Skor yang lebih rendah lebih baik sehingga Anda harus mencoba membuat dua solusi yang sama sambil menjaga panjang pendeknya program.

Tugas 1

Anda diberi bilangan bulat positif Ndan Anda harus output Collatz urutan dari Nyang dipisahkan oleh spasi atau baris baru. Pemisah trailing diperbolehkan.

Elemen pertama dari urutan Collatz adalah N. Sisa dari unsur-unsur yang dihasilkan berdasarkan penerus mereka $a_{i-1}$ :

Segera setelah urutan mencapai 1tidak ada elemen baru yang dihasilkan.

Input => Output contoh:

6 => 6 3 10 5 16 8 4 2 1
8 => 8 4 2 1
1 => 1

Tugas # 2

Sepasang prima kembar adalah sepasang bilangan bulat positif yang selisihnya 2 dan keduanya adalah bilangan prima.

Anda diberi bilangan bulat positif Ndan Anda harus menampilkan pasangan bilangan prima kembar terkecil di mana kedua bilangan prima lebih besar dari bilangan prima yang lebih Nkecil dan dua bilangan prima harus dipisahkan oleh spasi atau baris baru. Pemisah trailing diperbolehkan.

Input => Output contoh:

6 => 11 13
42 => 59 61
1 => 3 5

Cuplikan untuk menghitung skor

(Modifikasi yang ada di Pulihkan masalah kode sumber yang dimutasi .)

var f=document.getElementById("f"),g=document.getElementById("s");function h(){var a=f.value,e=g.value,m=Math.max(a.length,e.length);if(10000<a.length)a="<span style='color:red'>First program is too long!</span>";else if(10000<e.length)a="<span style='color:red'>Second program is too long!</span>";else{if(0===a.length)a=e.length;else if(0===e.length)a=a.length;else{var d=[],b;for(b=0;b<=e.length;b++)d[b]=[b];var c;for(c=0;c<=a.length;c++)d[0][c]=c;for(b=1;b<=e.length;b++)for(c=1;c<=a.length;c++)d[b][c]=e.charAt(b-1)===a.charAt(c-1)?d[b-1][c-1]:Math.min(d[b-1][c-1]+1,Math.min(d[b][c-1]+1,d[b-1][c]+ 1));a=d[e.length][a.length]}a="Distance = "+a+"   Longer length = "+m+"   Score = <strong>"+(a+m)+"</strong>"}document.getElementById("d").innerHTML=a}f.onkeyup=h;g.onkeyup=h;

First program<textarea id=f rows=2 cols=80 style="width:100%"></textarea>Second program<textarea id=s rows=2 cols=80 style="width:100%"></textarea><p id=d></p>

Edit

Di tajuk jawaban, mari gunakan format

[Language], [longer length] + [distance] = [final score].

Misalnya

Python 2, 60 + 32 = 92

Pyth, 18 + 13 = 31

Urutan Collatz:

QWtQ=Q@,/Q2h*Q3QQ

Twin Primes:

=Qf!ttP*T+T2hQQ+Q2

Coba di sini.

Beberapa ide berkat FryAmTheEggman.

CJam, 24 + 17 = 41 42

Program Collatz :

ri2*{:N2%N3*)N2/?__p(}g;

Program primes kembar :

ri_2+]{:)_{mp}/&_+((}gS*

Keduanya mengambil input dari STDIN dan mencetak nomor yang dipisahkan spasi / baris baru ke STDOUT

Cobalah secara online di sini

CJam, 25 + 16 = 41

Program Collatz:

l~2*{_2%{3*)}{2/}?_p_(}g;

Program primes kembar:

l~_2+]{:)_{mp}/&!_&}gS*

Uji di sini.

Saya baru saja bermain golf untuk mereka berdua. Saya akan melihat apakah saya dapat mengurangi skor entah bagaimana.

Pyth, 20 + 14 = 40 34

Collatz:

QWtQ=Q@,/Q2h*3QQQ

Pasangan Utama:

~Q1WttP*Q+Q2~Q1;Q+Q2

Keduanya adalah program yang mengambil input dari STDIN dan menampilkan angka pada baris baru. Hanya memutarkan kedua jawaban sambil menggunakan primitif pengulangan yang sama untuk saat ini. Ini mungkin bisa diperbaiki sedikit.

Sunting: Menambahkan kondisi yang lebih baik memeriksa dicuri dari @isaacg. Sepertinya menggunakan filter masih lebih pendek daripada menggunakan loop sementara untuk pasangan prima.

Cobalah online di sini.

05AB1E , 14 + 13 10 9 = 27 24 23

Skor -4 berkat ASCII saja

Urutan collatz (14 byte):

[DÉi3*>ë2÷}Ð,#

Cobalah online!

Bilangan prima kembar (14 byte):

[DÅND>>Dp#}s,,

Cobalah online!

Golfed Twin primes (11 bytes):

[ÅNDÌp#]DÌ»

Cobalah online!

Java 8, 118 + 84 = 202

Collatz:

n->{for(System.out.println(n);n>1;System.out.println(n=n%2<1?n/2:3*n+1));}

Bilangan prima kembar:

n->{t:for(int p,z;;n++){for(z=n;z<n+3;z=z+2)for(p=2;p<z;p++)if(z%p<1)continue t;System.out.print(n+" "+(n+2));break;}}

Mathematica, 53 + 29 = 82

Urutan Collatz:

Print/@(NestWhileList[If[OddQ@#,3#+1,#/2]&,#,#>1&]);&

Program primes kembar:

Print/@(NestWhile[NextPrime,#,!PrimeQ[#+2]&]+{0,2});&

> <> , 116 + 86 = 202

Program Collatz (46):

0i:0(?v$a*$'0'-+!
?v6,>:>~:nao:1=?;3*:2%
 >1+^

Program primes kembar (116):

0i:0(?v$a*$'0'-+!
v&2+1~<:-2
<v!?%&+1:&:v?=&:&:
 >&~0$2&2+v>&~143.
:&:1+&%?!v>:&:&=?v
0v?*r$0~&< .561~&<.1
:<;noan-2

Aduh. Kedua program mulai dengan atoifungsi yang sama , tetapi setelah itu bilangan prima kembar menurun. Bagian kode yang sama diulang dua kali untuk pemeriksaan awal - mungkin sedikit lebih pendek untuk menggunakan kembali bagian tersebut, tetapi pengaturan untuknya tidak akan menghemat banyak byte.

Bisa melakukan jauh lebih baik dengan melemparkan setengah bagian belakang bilangan prima kembar ke tempat-tempat yang tidak terpakai dari program Collatz, tetapi saya tidak yakin apakah itu diizinkan.

C ++ Jarak = 114 Panjang lagi = 155 Skor = 269

Tugas 1

void c(int N){while(N>1){cout<<N<<' ';N=(N%2==0)?N/2:N*3+1;}cout<<N;}

Tugas 2

int p(int x){int z=0;for(int i=2;i<x;i++){if(x%i==0){z=1;break;}}return z;}
void c(int N){N=(N%2==0)?N+1:N+2;int M=N+2;while(p(N)+p(M)>0){N=M;M+=2;}cout<<N<<' '<<M;}

Tugas 2 ditingkatkan

int p(int N){int z=0;for(int i=2;i<N;i++){if(N%i==0){z=1;break;}}return z;}
void c(int N){N=(N%2==0)?N+1:N+2;while(p(N)+p(N+2)>0){N+=2;}cout<<N<<' '<<N+2;}