9

Учитывая целое число n, распечататьn * reversed(n)

reversed(n)это число, которое вы получаете, когда вы reverseцифры 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

Самый короткий код выигрывает!

Leaderboard

Показать фрагмент кода

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>

Expand snippet

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 К Сплит Х
источник

3

Что обратного 100?

17

001, но в любом случае, это хорошо, если у вас есть дополнительные нули впереди

K Split X

4

Почему понизить? Поскольку этот вызов слишком тривиален (по сравнению с некоторыми другими вызовами, это не так!) Или потому что он плохо отформатирован / неясен?

user202729

2

@ user202729 Я понизил голос, потому что не видел и не ожидал большого разнообразия или глубины ответов. Этот вопрос скучный, я пробовал. Одна из причин, по которой он скучен, заключается в том, что он тривиален, что, я думаю, является совершенно справедливым поводом для самостоятельного ответа на вопрос.

Ad Hoc

10

05AB1E , 2 байта

R*

Попробуйте онлайн!

В 05AB1E целые числа и строки обрабатываются как эквивалентные типы, поэтому reversal ( R) преобразуется в строку и инвертирует, тогда как умножение ( *) обрабатывает реверс и ввод как целые числа.

Мистер Xcoder
источник

4

Â*действует тоже: D.

Волшебная Урна Осьминога

4

JavaScript (SpiderMonkey) , 45 35 33 28 байт

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

Попробуйте онлайн!

Сохранено 2 байта благодаря Денису
Сохранено 8 байт благодаря kamoroso94
Сохранено 2 байта благодаря ATaco
Сохранено 5 байтов благодаря Shaggy

Эпхелон Данцлер
источник

Добро пожаловать в PPCG! Вам не нужно считать f=; анонимные функции разрешены по умолчанию.

Деннис

Выключите (n+"").split("")для [...(n+"")]сохранения нескольких байтов. Вам не нужен унарный плюс, а круглые скобки вокруг перевернутой строки посторонние. В целом, это экономит 10 байт.

kamoroso94

Вы можете заменить .join("")на, .join``чтобы сохранить 2 байта.

ATaco

Сохраните 5 байтов, используя входные данные в виде строки: tio.run/##BcFRCoAgDADQu/ilQYP6t4tEoNgMzTZxIXR6ey/…

Shaggy

4

Желе , 3 байта

×ṚḌ

Я новичок в желе, поэтому, пожалуйста, дайте мне знать, если есть способ сделать это в 1 или 2 байта!

Попробуйте онлайн!

объяснение

×ṚḌ    (Input: 12)

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

Юнг Хван Мин
источник

На самом деле ṚḌ×была бы лучшая версия. Конечно, это все равно будет работать из-за того, как работают базы.

Эрик Outgolfer

@EriktheOutgolfer Первоначально я написал это сначала, но переместил ×для причудливости;)

JungHwan Мин

4

Рубин, 25 24 байта

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

Попробуйте онлайн! ,

Integer#digits возвращает список перевернутых цифр, поэтому дальнейшая перестановка не требуется.

Спасибо @ benj2240 за игру в гольф!

Yytsi
источник

Вы можете сохранить байт с помощью eval

benj2240

@ benj2240 спасибо! :)

Yytsi

Eval route на самом деле не работает, так как это приведет к сбою программы на 900 с ошибкой Invalid octal digit (SyntaxError)вместо возврата ожидаемых 8100 ...

Value Ink

3

Perl 5 , 11 + 1 ( `-p`) = 12 байт

$_*=reverse

Попробуйте онлайн!

Xcali
источник

Флаги командной строки теперь бесплатны!

Wastl

3

ARBLE , 12 байт

Принимает ввод как int.

a*reverse(a)

Попробуйте онлайн!

Ataco
источник

Вот почему я сказал целочисленный ввод;), int все еще работает?

K Split X

@KSplitX О, я этого не заметил. Я думаю, что это ограничение немного излишне, но решать вам.

ATaco

@KSplitX Исправлено.

ATaco

Следует использовать n * reverse(n)так, чтобы оно nn * reversed(n)

совпадало

3

Python 3, 35 28 байт

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

Попробуйте онлайн!

^{Сохранено 7 байт, исправив ошибку, указанную Деннисом.}

LyricLy
источник

Нах его ясно, вы конвертируете в строку, [::-1]переворачиваете ее, затем мы оцениваем xD

K Split X

Это не работает для ввода 80 , так как 08является недопустимым (восьмеричным) литералом.

Деннис

3

Сохраняя 7 байт, исправляя ошибку, разве вам не нравится, когда это происходит ...

ETHproductions

3

Haskell , 27 23 байта

4 байта сохранены благодаря Линн и Лайкони

(*)=<<read.reverse.show

Попробуйте онлайн!

Специальный охотник за гарфами
источник

1

23 байта без импорта: попробуйте онлайн!

Лайкони

С Control.Monadтакже 23 байта: ap(*)$read.reverse.show.

Лайкони

1

Нет необходимости Control.Monad. (*)=<<read.reverse.showработает отлично.

Линн

@ Линн Спасибо! Я чувствую, что должен был это увидеть.

Специальный охотник на Гарф

3

Perl 6 , 10 байт

{$_*.flip}

Попробуй это

расширенный

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

Брэд Гилберт b2gills
источник

3

C # .NET, 55 байт

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

Объяснение:

Попробуй это здесь.

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

Кевин Круйссен
источник

2

Пакет, 87 байт

@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

Здесь нужно выбрать арифметический маршрут, так как смена строк не выполняется для некоторых чисел, например 80.

Нил
источник

2

J 7 байт

*|.&.":

Попробуйте онлайн!

Не могу придумать более короткий путь, хотя я чувствую, что это довольно элегантно.

объяснение

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

капуста
источник

2

C (gcc) , 49 байтов

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

Попробуйте онлайн!

Дрянная Монахиня
источник

5

Предложите замену a>0на justa

ceilingcat

2

LISP, 91 64 байта

~~(defun R (N) (defvar M (запись в строку N)) (parse-integer (обратный M))) (запись (* x (R x)))~~

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

Где x N - ваше целое число, с которым вы хотите работать, конечно.

Я довольно новичок в программировании, но я обнаружил, что пробовать эти проблемы с Code Golf было хорошей практикой. Есть что-то, что я пропускаю, что могло бы помочь с этим?

РЕДАКТИРОВАТЬ: Благодаря некоторым советам от потолка, я смог сбрить несколько байтов. Старая программа сохранена в зачеркнутом виде для справки.

Эстет
источник

Добро пожаловать в Code Golf! Вы можете устранить некоторые пробелы и, возможно, отказаться от назначения переменной. Кроме того, по соглашению вы можете просто вернуть результат вместо(write ...)

floorcat

Вы можете сохранить байт, используя lambdaвместо defun. Также читайте советы по игре в гольф на lisp

ceilingcat

2

Баш, 52 48 байт

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

Науэль Фуйе
источник

Вы можете заменить do...doneфигурные скобки, чтобы сохранить несколько байтов: попробуйте онлайн! , Это из подсказок к посту Bash .

Джастин Маринер

спасибо, я рад узнать это, я никогда не видел этот синтаксис, обновляя свой пост

Науэль Фуйе

Разве это не ракушка?

Стэн Струм

2

Пакетный , 150 125 121 байт (+ 5 байт? `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%

Сохранено 25 байт благодаря пользователю 202729 !

Благодаря Matheus Avellar сэкономлено 4 байта !

Эпхелон Данцлер
источник

97 байт

user202729

Или 87 байтов

user202729

Разве это не партия, а не Баш? TIO для Bash не работает для этого.

Джастин Маринер

Да да это; извините за это

Ephellon Dantzler

Вы можете встраивать , что ifбыть на 121 байт: if [%t%] neq [] set r=%t%%r%&goto L. Тем не менее, я думаю, что вы должны включить 1 байт для /Qпередаваемого флага, cmdчтобы он @echo off

Матеус

2

> <>, 41 39 байт

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

Как это работает:

:&

Предположим, что ввод был перенесен в стек ( https://codegolf.meta.stackexchange.com/a/8493/76025 ). Дублируйте его и сохраните копию в реестре.

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

Преобразует это в отдельные цифры, оставляя их в стеке.

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

Верхнее значение всегда будет нулевым из-за процесса преобразования цифр в цифры; бросьте это из стека. Теперь, когда длина> 1, умножьте первый элемент на десять и добавьте его к элементу под ним. Это приводит к изменению числа.

      &*n;

Умножьте исходное число на обратную, распечатайте ответ и остановитесь.

Bolce Bussiere
источник

33 байта

Джо Кинг

2

Ом v2 , 2 байта

œΠ

Попробуйте онлайн!

Объяснение:

œΠ   Main wire, arguments: n

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

Ник Клиффорд
источник

2

остается на телефоне в течение 4 месяцев : P

K3v1n

Вы должны быть отложены на долгое время, чтобы не было никаких объяснений

MilkyWay90

@ MilkyWay90 Мы все застряли полтора года назад, верно?

Ник Клиффорд

@NickClifford Не у всех нас есть

MilkyWay90

1

Mathematica, 19 байт

# IntegerReverse@#&

Принимает целочисленный ввод.

Юнг Хван Мин
источник

1

cQuents 0 , 8 байтов

#|1:A\rA

Попробуйте онлайн!

объяснение

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

Стивен
источник

1

Ly , 7 байт

nsSrJl*

Попробуйте онлайн!

LyricLy
источник

1

Casio-Basic (fx-CP400), 44 байта

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

Там нет встроенного для обращения целого числа, но есть один для обращения строки.

ExpToStr n,aпревращает n в строку и сохраняет ее a, затем StrInv a,aперезаписывает aее обратной версией. Последняя строка превращается aв число и печатает n*a.

43 байта для кода, +1 для ввода nв поле параметров.

numbermaniac
источник

1

Japt, 2 байта

Принимает ввод в виде строки, выводит целое число.

*w

Попробуй это

мохнатый
источник

Ух ты, я думал, что это должно быть как минимум 4 байта ... Я предполагаю, что это только 3 байта, даже если принимать входные данные как целое число*sw

ETHproductions

@ETHproductions: да, это то, что у меня было изначально.

Лохматый

1

MATLAB / Octave , 33 31 байт

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

Попробуйте онлайн!

Octave / MATLAB анонимная функция. Это довольно наивный подход - конвертирует целое число в строку, переворачивает строку, конвертирует результат обратно в целое число и умножает его на оригинал.

Сохраните 2 байта, используя flipвместо fliplr.

Том Карпентер
источник

1

Python 2 , 25 байт

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

Попробуйте онлайн!

Джонатан Фрех
источник

1

Утилиты Bash + GNU, 18

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

Попробуйте онлайн .

Цифровая травма
источник

1

PHP, 23 + 1 байт

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

Сохранить в файл и запустить как канал с -nF.

Titus
источник

1

Луа, 42 байта

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

Попробуйте онлайн!

MCAdventure10
источник

1

MATL , 5 байтов

VPUG*

Попробуйте онлайн!

Объяснение: Vпреобразует в строку, Pпереворачивает, Uпреобразует обратно в числовое значение, Gснова копирует исходный ввод и *умножает их вместе.

Б. Мехта
источник

1

Рунические чары , 11 10 байт

i:0qr͍n*@

Попробуйте онлайн!

Делает ввод, дублирует его, приводит одну копию к строке, переворачивает ее, возвращает ее к числовому значению, умножает и выводит результат.

0qвыполняет приведение к строке, конкатенируя ноль на конце. Там нет явного ToString()оператора, так что это самый короткий метод в данном конкретном случае, где 0, поменяемый местами с началом, не изменяет результирующее числовое значение. Спасибо ASCII-только за это -1 байт.

Draco18s больше не доверяет SE
источник

10

только ASCII

@ Только ASCII Справедливо. Я в конечном итоге возиться с большинством из них на работе и не всегда возвращаюсь, когда я отправляю их дома.

Draco18s больше не доверяет SE

Для заданного ввода int n выведите n * reversed (n)

Leaderboard

Ответы:

05AB1E , 2 байта

JavaScript (SpiderMonkey) , 45 35 33 28 байт

Желе , 3 байта

объяснение

Рубин, 25 24 байта

Perl 5 , 11 + 1 ( `-p`) = 12 байт

ARBLE , 12 байт

Python 3, 35 28 байт

Haskell , 27 23 байта

Perl 6 , 10 байт

расширенный

C # .NET, 55 байт

Пакет, 87 байт

J 7 байт

объяснение

C (gcc) , 49 байтов

LISP, 91 64 байта

Баш, 52 48 байт

Пакетный , 150 125 121 байт (+ 5 байт? `cmd/q`)

> <>, 41 39 байт

Как это работает:

Ом v2 , 2 байта

Mathematica, 19 байт

cQuents 0 , 8 байтов

объяснение

Ly , 7 байт

Casio-Basic (fx-CP400), 44 байта

Japt, 2 байта

MATLAB / Octave , 33 31 байт

Python 2 , 25 байт

Утилиты Bash + GNU, 18

PHP, 23 + 1 байт

Луа, 42 байта

MATL , 5 байтов

Рунические чары , 11 10 байт

Для заданного ввода int n выведите n * reversed (n)

Leaderboard

Ответы:

05AB1E , 2 байта

JavaScript (SpiderMonkey) , 45 35 33 28 байт

Желе , 3 байта

объяснение

Рубин, 25 24 байта

Perl 5 , 11 + 1 ( -p) = 12 байт

ARBLE , 12 байт

Python 3, 35 28 байт

Haskell , 27 23 байта

Perl 6 , 10 байт

расширенный

C # .NET, 55 байт

Пакет, 87 байт

J 7 байт

объяснение

C (gcc) , 49 байтов

LISP, 91 64 байта

Баш, 52 48 байт

Пакетный , 150 125 121 байт (+ 5 байт? cmd/q)

> <>, 41 39 байт

Как это работает:

Ом v2 , 2 байта

Mathematica, 19 байт

cQuents 0 , 8 байтов

объяснение

Ly , 7 байт

Casio-Basic (fx-CP400), 44 байта

Japt, 2 байта

MATLAB / Octave , 33 31 байт

Python 2 , 25 байт

Утилиты Bash + GNU, 18

PHP, 23 + 1 байт

Луа, 42 байта

MATL , 5 байтов

Рунические чары , 11 10 байт

Perl 5 , 11 + 1 ( `-p`) = 12 байт

Пакетный , 150 125 121 байт (+ 5 байт? `cmd/q`)