9

Diberikan bilangan bulat n, cetakn * reversed(n)

reversed(n)adalah angka yang Anda dapatkan ketika Anda reversedigit n.

reverse(512) = 215

reverse(1) = 1

reverse(101) = 101

>>>>>>>>

func(5) = 5*5 = 25

func(12) = 12*21 = 252

func(11) = 11*11 = 121

func(659) = 659*956 = 630004

Kode terpendek menang!

Papan peringkat

Tampilkan cuplikan kode

var QUESTION_ID=144816,OVERRIDE_USER=71625;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

Luaskan cuplikan

code-golf math arithmetic code-golf math integer code-golf arithmetic integer code-golf sequence base-conversion palindrome code-golf math primes integer code-golf parsing conversion syntax code-golf sequence primes code-challenge geometry optimization code-golf graph-theory code-golf number-theory primes integer code-golf source-layout cops-and-robbers code-golf source-layout cops-and-robbers code-golf sequence primes integer code-golf math number-theory primes rational-numbers code-golf math sequence number-theory primes code-golf string code-golf math combinatorics permutations restricted-complexity code-golf array-manipulation code-golf number sequence code-golf number sequence code-golf binary-matrix code-golf math tips javascript algorithm code-golf string code-golf number sequence code-golf math arithmetic parsing code-golf number sequence primes code-golf string ascii-art geometry integer code-golf geometry code-golf number array-manipulation code-golf math geometry code-golf number sequence arithmetic integer code-golf string kolmogorov-complexity code-golf number code-golf number chess code-golf sequence decision-problem subsequence code-golf math number primes code-golf primes permutations code-golf integer probability-theory statistics code-golf string code-golf sequence decision-problem parsing board-game code-golf binary graph-theory code-golf board-game classification tic-tac-toe code-golf ascii-art polyglot code-golf date code-golf geometry K Split X
sumber

3

Apa kebalikannya 100?

tsh

001, tetapi bagaimanapun, tidak masalah jika Anda memiliki angka nol tambahan di depan

K Split X

4

Mengapa downvote? Karena tantangan ini terlalu sepele (dibandingkan dengan beberapa tantangan lain, bukan!) Atau karena formatnya buruk / tidak jelas?

user202729

2

@ user202729 Saya downvoted karena saya tidak melihat atau mengantisipasi banyak variasi atau kedalaman jawaban. Pertanyaan ini membosankan, saya mencobanya. Salah satu alasan mengapa hal itu membosankan adalah karena sepele, yang menurut saya merupakan alasan sempurna untuk mengecilkan pertanyaan sendiri.

Ad Hoc Garf Hunter

10

05AB1E , 2 byte

R*

Cobalah online!

Dalam 05AB1E, bilangan bulat dan string diperlakukan sebagai tipe yang setara, jadi pembalikan ( R) dikonversi menjadi string dan pembalikan, sementara multiplikasi ( *) memperlakukan pembalikan dan input sebagai bilangan bulat.

Tuan Xcoder
sumber

4

Â*juga berlaku: D.

Magic Octopus Mm

4

JavaScript (SpiderMonkey) , 45 35 33 28 byte

n=>n*[...n].reverse().join``

Cobalah online!

Disimpan 2 byte berkat dennis
Disimpan 8 byte berkat kamoroso94
Disimpan 2 byte berkat ATaco
Disimpan 5 byte berkat Shaggy

Ephellon Dantzler
sumber

Selamat datang di PPCG! Anda tidak harus menghitung f=; fungsi anonim diizinkan secara default.

Dennis

Beralih (n+"").split("")ke [...(n+"")]untuk menyimpan beberapa byte. Anda tidak perlu plus unary, dan tanda kurung di sekitar string yang dibalik tidak cocok. Semua dalam semua, itu menghemat 10 byte.

kamoroso94

Anda dapat mengganti .join("")dengan .join``untuk menyimpan 2 byte.

ATaco

Simpan 5 byte dengan mengambil input sebagai string: tio.run/##BcFRCoAgDADQu/ilQYP6t4tEoNgMzTZxIXR6ey/…

Shaggy

4

Jelly , 3 byte

×ṚḌ

Saya baru mengenal Jelly, jadi beri tahu saya jika ada cara untuk melakukan ini dalam 1 atau 2 byte!

Cobalah online!

Penjelasan

×ṚḌ    (Input: 12)

 Ṛ     Reversed decimal digits (Stack: [2, 1])
×      Multiply by input       (Stack: [24, 12])
  Ḍ    Convert to decimal      (Stack: 252)
       Implicit print

JungHwan Min
sumber

Sebenarnya ṚḌ×akan menjadi versi yang lebih baik. Tentu saja ini masih akan berhasil, karena cara kerja pangkalan.

Erik the Outgolfer

@EriktheOutgolfer Saya awalnya menulis itu dulu, tetapi menggerakkannya ×untuk kesenangan;)

JungHwan Min

4

Ruby, 25 24 byte

->n{n*eval(n.digits*'')}

Cobalah secara Online! .

Integer#digits mengembalikan daftar digit terbalik, jadi pembalikan lebih lanjut tidak diperlukan.

Terima kasih kepada @ benj2240 untuk bermain golf satu byte!

Yytsi
sumber

Anda dapat menyimpan byte dengan eval

benj2240

@ benj2240 terima kasih! :)

Yytsi

Rute eval tidak benar-benar berfungsi, karena akan menyebabkan program gagal pada 900 dengan kesalahan Invalid octal digit (SyntaxError)alih-alih mengembalikan yang diharapkan 8100 ...

Value Ink

3

Perl 5 , 11 + 1 ( `-p`) = 12 byte

$_*=reverse

Cobalah online!

Xcali
sumber

Bendera baris perintah gratis sekarang!

wastl

3

ARBLE , 12 byte

Mengambil input sebagai int.

a*reverse(a)

Cobalah online!

ATaco
sumber

Itulah mengapa saya mengatakan input integer;), apakah int masih berfungsi?

K Split X

@KSplitX Oh, saya tidak menyadarinya. Saya pikir pembatasan itu agak tidak perlu, tetapi terserah Anda.

ATaco

@KSplitX Diperbaiki.

ATaco

Harus digunakan n * reverse(n)sehingga cocok dengan spesifikasi kata kata demi kata (Diberikan bilangan bulat n, cetak n * reversed(n))

Okx

3

Python 3, 35 28 byte

lambda m:m*int(str(m)[::-1])

Cobalah online!

^{Disimpan 7 byte dengan memperbaiki bug yang ditunjukkan oleh Dennis.}

Lirik
sumber

Nah ini jelas, Anda mengonversi ke string, [::-1]membalikkannya, lalu kami eval xD

K Split X

Ini tidak berfungsi untuk input 80 , seperti 08literal yang tidak valid (oktal).

Dennis

3

Disimpan 7 byte dengan memperbaiki bug. Jangan Anda menyukainya saat itu terjadi ...

ETHproduksi

3

Haskell , 27 23 byte

4 byte disimpan berkat Lynn dan Laikoni

(*)=<<read.reverse.show

Cobalah online!

Ad Hoc Garf Hunter
sumber

1

23 byte tanpa impor: Coba online!

Laikoni

Dengan Control.Monaditu juga 23 byte: ap(*)$read.reverse.show.

Laikoni

1

Tidak perlu Control.Monad. (*)=<<read.reverse.showbekerja dengan baik.

Lynn

@ Lynn, terima kasih! Saya merasa saya seharusnya melihat itu.

Ad Hoc Garf Hunter

3

Perl 6 , 10 byte

{$_*.flip}

Cobalah

Diperluas

{       # bare block lambda with implicit parameter $_
  $_
  *
  .flip # implicit method call on $_
}

Brad Gilbert b2gills
sumber

3

C # .NET, 55 byte

n=>{int i=n,j=0;for(;i>0;i/=10)j=j*10+i%10;return n*j;}

Penjelasan:

Coba di sini.

n=>{           // Method with integer as both parameter and return-type
  int i=n,     //  Integer `i` (starting at the input)
      j=0;     //  Integer `j` (starting at 0)
  for(;i>0;    //  Loop as long as `i` is not 0
      i/=10)   //    After every iteration: Remove the last digit of `i`
    j=j*10     //   Add a trailing zero to `j`,
      +i%10;   //   and then sum this new `j` with the last digit of `i`
               //  End of loop (implicit / single-line body)
  return n*j;  //  Return the input multiplied with `j`
}              // End of method

Kevin Cruijssen
sumber

2

Batch, 87 byte

@set s=%1
@set r=
:l
@set/ar=r*10+s%%10,s/=10
@if %s% gtr 0 goto l
@cmd/cset/a%1*r

Perlu mengambil rute aritmatika di sini karena pembalikan string gagal untuk beberapa angka seperti 80.

Neil
sumber

2

J, 7 byte

*|.&.":

Cobalah online!

Tidak bisa memikirkan cara yang lebih pendek, meskipun saya merasa ini cukup elegan.

Penjelasan

*|.&.":
   &.":  Convert to string, apply next function, then undo conversion
 |.      Reverse
*        Multiply by input

cole
sumber

2

C (gcc) , 49 byte

i,a;f(n){for(i=0,a=n;a>0;a/=10)i=i*10+a%10;n*=i;}

Cobalah online!

Biarawati Bocor
sumber

5

Sarankan penggantian a>0hanya dengana

ceilingcat

2

LISP, 91 64 byte

~~(defun R (N) (defvar M (write-to-string N)) (parse-integer (M terbalik))) (tulis (* x (R x)))~~

(defun R(N)(write(* N(parse-integer(reverse(write-to-string N))))))

Di mana x N adalah bilangan bulat yang ingin Anda kerjakan, tentu saja.

Saya cukup baru dalam pemrograman, tetapi saya telah menemukan bahwa mencoba masalah Golf Code ini merupakan latihan yang bagus. Apakah ada sesuatu yang saya lewatkan yang dapat membantu dengan ini?

EDIT: Berkat beberapa tips dari ceilingcat, saya dapat mencukur beberapa byte. Program lama disimpan dalam coretan untuk referensi.

Estetikus
sumber

Selamat datang di Golf Code! Anda dapat menghilangkan spasi putih dan mungkin mengabaikan tugas variabel. Juga, dengan konvensi, Anda mungkin dapat mengembalikan output saja(write ...)

ceilingcat

Anda dapat menyimpan byte menggunakan lambdabukan defun. Baca juga tips bermain golf di

lisp

2

bash, 52 48 byte

for((i=n=$1;r=r*10+i%10*n,i/=10;));{ :;};echo $r

Nahuel Fouilleul
sumber

Anda dapat mengganti do...donedengan kurung kurawal untuk menghemat beberapa byte: Cobalah online! . Ini dari tips untuk posting Bash .

Justin Mariner

terima kasih, saya senang mempelajarinya, saya belum pernah melihat sintaks ini, memperbarui posting saya

Nahuel Fouilleul

Bukankah itu shellshock?

Stan Strum

2

Batch , 150 125 121 byte (+ 5 byte? `cmd/q`)

set l=%1
set n=0
set r=
:L
call set t=%%l:~%n%,1%%%
set/an+=1
if [%t%] neq [] set r=%t%%r%&goto L
set/ar=%r%*%l%
echo %r%

Disimpan 25 byte berkat pengguna202729 !

Disimpan 4 byte berkat Matheus Avellar !

Ephellon Dantzler
sumber

97 byte

pengguna202729

Atau, 87 byte

user202729

Bukankah ini Batch, bukan Bash? TIO untuk bash tidak berfungsi untuk ini.

Justin Mariner

Ya, ya itu; maaf soal itu

Ephellon Dantzler

Anda dapat inline yang ifberada di 121 bytes: if [%t%] neq [] set r=%t%%r%&goto L. Namun, saya pikir Anda harus memasukkan 1 byte untuk /Qbendera yang dilewati cmdagar berjalan dengan implisit@echo off

Matheus Avellar

2

> <>, 41 39 Bytes

:&>:a%:}-\
/~\?)0:,a/
>l1-?\&*n;
\ +*a/

Bagaimana itu bekerja:

:&

Asumsikan input telah didorong ke stack ( https://codegolf.meta.stackexchange.com/a/8493/76025 ). Gandakan dan simpan salinan dalam register.

   >:a%:}-\
   \?)0:,a/

Ubah ini menjadi masing-masing digit, meninggalkannya di tumpukan.

/~
>l1-?\
\ +*a/

Nilai teratas akan selalu nol karena proses konversi angka ke digit; jatuhkan dari tumpukan. Sekarang, sementara panjangnya> 1, kalikan item pertama dengan sepuluh dan tambahkan ke item di bawahnya. Ini menghasilkan angka terbalik.

      &*n;

Lipat gandakan nomor aslinya dengan terbalik, cetak jawabannya, dan berhenti.

Bolce Bussiere
sumber

33 byte

Jo King

2

Ohm v2 , 2 byte

œΠ

Cobalah online!

Penjelasan:

œΠ   Main wire, arguments: n

œ    Pushes [n, n.reverse]
 Π   Multiplies that array together
     Implicit output

Nick Clifford
sumber

2

tetap di telepon selama 4 bulan : P

K3v1n

Anda harus ditahan untuk waktu yang lama agar tidak ada penjelasan

MilkyWay90

@ MilkyWay90 Kita semua pernah ditahan selama satu setengah tahun sebelumnya, kan?

Nick Clifford

@NickClifford Tidak semua dari kita memiliki

MilkyWay90

1

Mathematica, 19 byte

# IntegerReverse@#&

Mengambil input integer.

JungHwan Min
sumber

1

cQuents 0 , 8 bytes

#|1:A\rA

Cobalah online!

Penjelasan

#|1:      Output first term in sequence
    A\rA  Each term in the sequence equals:
           A * \reverse(A)

Stephen
sumber

1

Ly , 7 byte

nsSrJl*

Cobalah online!

Lirik
sumber

1

Casio-Basic (fx-CP400), 44 byte

ExpToStr n,a
StrInv a,a
Print n*strToExp(a)

Tidak ada bawaan untuk membalik bilangan bulat, tetapi ada satu untuk membalikkan string.

ExpToStr n,amengubah n menjadi string dan menyimpannya a, lalu StrInv a,amenimpa adengan versi yang dibalik itu sendiri. Baris terakhir berubah amenjadi angka, dan dicetak n*a.

43 byte untuk kode, +1 untuk dimasukkan nke dalam kotak parameter.

numbermaniac
sumber

1

Japt, 2 byte

Mengambil input sebagai string, menghasilkan integer.

*w

Cobalah

Shaggy
sumber

Wow, saya pikir itu harus setidaknya 4 byte ... Saya kira itu hanya 3 bahkan jika mengambil input sebagai integer*sw

ETHproduksi

@ ETHproductions: yeah, itulah yang awalnya saya miliki.

Shaggy

1

MATLAB / Oktaf , 33 31 byte

@(n)str2num(flip(int2str(n)))*n

Cobalah online!

Oktaf / MATLAB fungsi anonim. Ini adalah pendekatan yang cukup naif - mengonversi bilangan bulat menjadi string, membalikkan string, mengubah hasilnya kembali menjadi bilangan bulat dan mengalikannya dengan yang asli.

Simpan 2 byte dengan menggunakan flipbukan fliplr.

Tom Carpenter
sumber

1

Python 2 , 25 byte

lambda n:n*int(`n`[::-1])

Cobalah online!

Jonathan Frech
sumber

1

Utilitas Bash + GNU, 18

bc<<<$1*`rev<<<$1`

Cobalah online .

Trauma Digital
sumber

1

PHP, 23 +1 byte

<?=$argn*strrev($argn);

Simpan ke file dan jalankan sebagai pipa dengan -nF.

Titus
sumber

1

Lua, 42 byte

function f(n)print(n*(""..n):reverse())end

Cobalah online!

MCAdventure10
sumber

1

MATL , 5 byte

VPUG*

Cobalah online!

Penjelasan: Vmengkonversi ke string, Pmembalik, Umengubah kembali ke numerik, Gmenyalin input asli lagi, dan *mengalikannya bersama.

B. Mehta
sumber

1

Pesona Rise , 11 10 byte

i:0qr͍n*@

Cobalah online!

Mengambil input, menduplikat, memaksa satu salinan ke string, membalikkannya, memaksanya kembali ke nilai numerik, mengalikan, dan mengeluarkan hasilnya.

0qmelakukan paksaan ke string dengan menggabungkan nol ke ujung. Tidak ada ToString()operator eksplisit , jadi ini adalah metode terpendek dalam kasus khusus ini di mana 0 bertukar ke awal tidak mengubah nilai numerik yang dihasilkan. Berkat ASCII-only untuk -1 byte ini.

Draco tidak lagi percaya pada SE
sumber

10

ASCII

@ ASCII-only Cukup adil. Saya akhirnya mengutak-atik sebagian besar ini di tempat kerja dan tidak selalu mengunjungi kembali ketika saya mempostingnya di rumah.

Draco18 tidak lagi percaya

Diberikan input int n, cetak n * terbalik (n)

Papan peringkat

Jawaban:

05AB1E , 2 byte

JavaScript (SpiderMonkey) , 45 35 33 28 byte

Jelly , 3 byte

Penjelasan

Ruby, 25 24 byte

Perl 5 , 11 + 1 ( `-p`) = 12 byte

ARBLE , 12 byte

Python 3, 35 28 byte

Haskell , 27 23 byte

Perl 6 , 10 byte

Diperluas

C # .NET, 55 byte

Batch, 87 byte

J, 7 byte

Penjelasan

C (gcc) , 49 byte

LISP, 91 64 byte

bash, 52 48 byte

Batch , 150 125 121 byte (+ 5 byte? `cmd/q`)

> <>, 41 39 Bytes

Bagaimana itu bekerja:

Ohm v2 , 2 byte

Mathematica, 19 byte

cQuents 0 , 8 bytes

Penjelasan

Ly , 7 byte

Casio-Basic (fx-CP400), 44 byte

Japt, 2 byte

MATLAB / Oktaf , 33 31 byte

Python 2 , 25 byte

Utilitas Bash + GNU, 18

PHP, 23 +1 byte

Lua, 42 byte

MATL , 5 byte

Pesona Rise , 11 10 byte

Diberikan input int n, cetak n * terbalik (n)

Papan peringkat

Jawaban:

05AB1E , 2 byte

JavaScript (SpiderMonkey) , 45 35 33 28 byte

Jelly , 3 byte

Penjelasan

Ruby, 25 24 byte

Perl 5 , 11 + 1 ( -p) = 12 byte

ARBLE , 12 byte

Python 3, 35 28 byte

Haskell , 27 23 byte

Perl 6 , 10 byte

Diperluas

C # .NET, 55 byte

Batch, 87 byte

J, 7 byte

Penjelasan

C (gcc) , 49 byte

LISP, 91 64 byte

bash, 52 48 byte

Batch , 150 125 121 byte (+ 5 byte? cmd/q)

> <>, 41 39 Bytes

Bagaimana itu bekerja:

Ohm v2 , 2 byte

Mathematica, 19 byte

cQuents 0 , 8 bytes

Penjelasan

Ly , 7 byte

Casio-Basic (fx-CP400), 44 byte

Japt, 2 byte

MATLAB / Oktaf , 33 31 byte

Python 2 , 25 byte

Utilitas Bash + GNU, 18

PHP, 23 +1 byte

Lua, 42 byte

MATL , 5 byte

Pesona Rise , 11 10 byte

Perl 5 , 11 + 1 ( `-p`) = 12 byte

Batch , 150 125 121 byte (+ 5 byte? `cmd/q`)