Вызов

У вас есть одна строка входных байтов, выведите в ней последний байт.

правила

Ваше представление может быть программой или функцией, выводящей последний байт на входе, который

• является либо аргументом строки, стандартного ввода или командной строки, и
• не пусто.

Я пытался решить эту проблему с помощью мозгового удара, однако все языки могут участвовать. Это код-гольф .

Примеры

"?" -> "?"
"29845812674" -> "4"

Каталог

Фрагмент стека в нижней части этого поста создает каталог из ответов а) в виде списка кратчайшего решения для каждого языка и б) в качестве общей таблицы лидеров.

Чтобы убедиться, что ваш ответ обнаружен, начните его с заголовка, используя следующий шаблон уценки:

## Language Name, N bytes

где Nразмер вашего представления. Если вы улучшите свой счет, вы можете сохранить старые результаты в заголовке, вычеркнув их. Например:

## Ruby, <s>104</s> <s>101</s> 96 bytes

Если вы хотите включить в заголовок несколько чисел (например, потому что ваш счет равен сумме двух файлов или вы хотите перечислить штрафы за флаг интерпретатора отдельно), убедитесь, что фактический результат является последним числом в заголовке:

## Perl, 43 + 2 (-p flag) = 45 bytes

Вы также можете сделать имя языка ссылкой, которая затем будет отображаться во фрагменте:

## [><>](https://esolangs.org/wiki/Fish), 121 bytes

/* Configuration */

var QUESTION_ID = 181627; // Obtain this from the url
// It will be like https://XYZ.stackexchange.com/questions/QUESTION_ID/... on any question page
var ANSWER_FILTER = "!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe";
var COMMENT_FILTER = "!)Q2B_A2kjfAiU78X(md6BoYk";
var OVERRIDE_USER = 8478; // This should be the user ID of the challenge author.

/* App */

var answers = [], answers_hash, answer_ids, answer_page = 1, more_answers = true, comment_page;

function answersUrl(index) {
  return "https://api.stackexchange.com/2.2/questions/" +  QUESTION_ID + "/answers?page=" + index + "&pagesize=100&order=desc&sort=creation&site=codegolf&filter=" + ANSWER_FILTER;
}

function commentUrl(index, answers) {
  return "https://api.stackexchange.com/2.2/answers/" + answers.join(';') + "/comments?page=" + index + "&pagesize=100&order=desc&sort=creation&site=codegolf&filter=" + COMMENT_FILTER;
}

function getAnswers() {
  jQuery.ajax({
    url: answersUrl(answer_page++),
    method: "get",
    dataType: "jsonp",
    crossDomain: true,
    success: function (data) {
      answers.push.apply(answers, data.items);
      answers_hash = [];
      answer_ids = [];
      data.items.forEach(function(a) {
        a.comments = [];
        var id = +a.share_link.match(/\d+/);
        answer_ids.push(id);
        answers_hash[id] = a;
      });
      if (!data.has_more) more_answers = false;
      comment_page = 1;
      getComments();
    }
  });
}

function getComments() {
  jQuery.ajax({
    url: commentUrl(comment_page++, answer_ids),
    method: "get",
    dataType: "jsonp",
    crossDomain: true,
    success: function (data) {
      data.items.forEach(function(c) {
        if (c.owner.user_id === OVERRIDE_USER)
          answers_hash[c.post_id].comments.push(c);
      });
      if (data.has_more) getComments();
      else if (more_answers) getAnswers();
      else process();
    }
  });  
}

getAnswers();

var SCORE_REG = /<h\d>\s*([^\n,<]*(?:<(?:[^\n>]*>[^\n<]*<\/[^\n>]*>)[^\n,<]*)*),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/;

var OVERRIDE_REG = /^Override\s*header:\s*/i;

function getAuthorName(a) {
  return a.owner.display_name;
}

function process() {
  var valid = [];
  
  answers.forEach(function(a) {
    var body = a.body;
    a.comments.forEach(function(c) {
      if(OVERRIDE_REG.test(c.body))
        body = '<h1>' + c.body.replace(OVERRIDE_REG, '') + '</h1>';
    });
    
    var match = body.match(SCORE_REG);
    if (match)
      valid.push({
        user: getAuthorName(a),
        size: +match[2],
        language: match[1],
        link: a.share_link,
      });
    else console.log(body);
  });
  
  valid.sort(function (a, b) {
    var aB = a.size,
        bB = b.size;
    return aB - bB
  });

  var languages = {};
  var place = 1;
  var lastSize = null;
  var lastPlace = 1;
  valid.forEach(function (a) {
    if (a.size != lastSize)
      lastPlace = place;
    lastSize = a.size;
    ++place;
    
    var answer = jQuery("#answer-template").html();
    answer = answer.replace("{{PLACE}}", lastPlace + ".")
                   .replace("{{NAME}}", a.user)
                   .replace("{{LANGUAGE}}", a.language)
                   .replace("{{SIZE}}", a.size)
                   .replace("{{LINK}}", a.link);
    answer = jQuery(answer);
    jQuery("#answers").append(answer);

    var lang = a.language;
    lang = jQuery('<a>'+lang+'</a>').text();
    
    languages[lang] = languages[lang] || {lang: a.language, lang_raw: lang, user: a.user, size: a.size, link: a.link};
  });

  var langs = [];
  for (var lang in languages)
    if (languages.hasOwnProperty(lang))
      langs.push(languages[lang]);

  langs.sort(function (a, b) {
    if (a.lang_raw.toLowerCase() > b.lang_raw.toLowerCase()) return 1;
    if (a.lang_raw.toLowerCase() < b.lang_raw.toLowerCase()) return -1;
    return 0;
  });

  for (var i = 0; i < langs.length; ++i)
  {
    var language = jQuery("#language-template").html();
    var lang = langs[i];
    language = language.replace("{{LANGUAGE}}", lang.lang)
                       .replace("{{NAME}}", lang.user)
                       .replace("{{SIZE}}", lang.size)
                       .replace("{{LINK}}", lang.link);
    language = jQuery(language);
    jQuery("#languages").append(language);
  }

}

body {
  text-align: left !important;
  display: block !important;
}

#answer-list {
  padding: 10px;
  width: 290px;
  float: left;
}

#language-list {
  padding: 10px;
  width: 500px;
  float: left;
}

table thead {
  font-weight: bold;
}

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="https://cdn.sstatic.net/Sites/codegolf/all.css?v=ffb5d0584c5f">
<div id="language-list">
  <h2>Shortest Solution 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>
<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>
<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>

Атташе , 4 байта

Last

Попробуйте онлайн! (Если на входе может быть список символов, &/Sможет сработать.)

альтернативы

5 байтов: `@&-1

8 байт: &/S@List

10 байт: `@«_,-1»

10 байт: Fold!Right

10 байт: `@<~_,-1~>

10 байт: `^^&:Right

10 байт: {Right^^_}

11 байт: Get«_,-1»

11 байт: Get<~_,-1~>

12 байт: `@«_,#_-1»

12 байт: `@<~_,#_-1~>

13 байт: Get«_,#_-1»

13 байт: Get<~_,#_-1~>

машинный код x86-16, 2 байта

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

Входная строка в SI, длина в CXи выходной символ в AL:

F3 AC  REPZ LODSB      ; start at memory location pointer in SI, put next value in AL,
                       ; loop CX number of times. The last char will be in AL when done.

Или 4 байта как «строка Паскаля» (длина предшествует началу строки):

AC     LODSB           ; first byte is string length
91     XCHG AX, CX     ; move length to CX for loop 
F3 AC  REPZ LODSB      ; start at memory location pointer in SI, put next value in AL,
                       ; loop CX number of times. The last char will be in AL when done.

Или 5 байтов в виде «строки C» (с нулевым / нулевым завершением), введите в DI:

F2 AE     REPNZ SCASB     ; scan for value in AL (0), end when found and advance DI
8A 45 FE  MOV AL, [DI-2]  ; DI is now two bytes ahead of last, put value of DI-2 into AL

машинный код x86-16, IBM PC DOS, 12 11 10 байт

Или такая же полная программа, как исполняемый файл IBM PC DOS. Ввод из командной строки, вывод в консоль.

B3 80   MOV  BL, 80H            ; BX to DOS PSP at 80H 
8A 07   MOV  AL, BYTE PTR[BX]   ; get command line tail length 
D7      XLAT                    ; AL = [BX+AL] 
B4 0E   MOV  AH, 0EH            ; PC BIOS write to screen function  
CD 10   INT  10H                ; display  
C3      RET                     ; exit to DOS

Выход:

Brainf ***, 7 байт

,[>,]<.

MATL, 2 байта

0)

В MATL используется модульное индексирование на основе 1, поэтому это решение захватывает элемент в 0-ой позиции ввода, который совпадает с последним, поскольку выполняется 0переход к концу.

Попробуйте это в MATL Online

объяснение

    % Implicitly grab the input
0   % Push the literal 0 to the stack
)   % Use this zero to grab the character at the end of the string
    % Implicitly display the result

PHP , 13 байт

<?=$argn[-1];

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

Запуск с php -nFвводом STDIN. Пример:

$ echo 29845812674|php -nF lost.php

Javascript, 14 байт

a=>a.slice(-1)

Python 3 , 14 байт

lambda x:x[-1]

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

Bash + coreutils, 8 байт

tail -c1

Ввод от stdin, выход для stdout.

TI-BASIC (TI-84), 10 байтов

sub(Ans,length(Ans),1

Получает последний символ во входной строке.
Вход находится в Ans.
Выход находится Ansи автоматически распечатывается.

Haskell , 9 4 байта

last

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

Семя , 11 байт

5 370394306

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

В результате программа Befunge-98 ~2j@,была украдена заимствованы из Джо Кинга здесь , так что кредит им за это.

Java 8

Ввод из STDIN, 71 байт

v->{int i=0;for(;System.in.available()>0;i=System.in.read());return i;}

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

Аргумент функции, 25 байт

s->s.charAt(s.length()-1)

> <> , 2 байта

Использование аргументов командной строки

o;

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

> <> , 11 байт

Использование stdin

\~o;
/?(0:i

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

Cubix , 6 байтов

pA/@po

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

  p
A / @ p
  o

Смотреть это беги

• A Принимает все входные данные
• / Перенаправить вокруг куба
• pp довести низ стопки до вершины дважды
• o/@ выводить как символ, перенаправить и остановить

Befunge-93 , 12 15 байт

:1+_p1-,@>~#

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

Спасибо @Jo King за 3 байта.

Альтернативная 15-байтовая версия, которая менее беспорядочная:

~:1+#v!_
  @,$<

Взять строки в качестве входных данных в Befunge не так просто. Если бы существовала одна команда для ввода нескольких символов, это было бы так же просто, как прочитать строку, вытолкнуть / напечатать верхний символ и выйти.

Машина Тьюринга, но гораздо хуже , 391 байт

1 0 1 1 0 0 0
0 0 0 1 1 0 0
1 1 1 1 0 0 0
0 1 0 1 2 0 0
1 2 1 1 0 0 0
0 2 0 1 3 0 0
1 3 1 1 0 0 0
0 3 0 1 4 0 0
1 4 1 1 0 0 0
0 4 0 1 5 0 0
1 5 1 1 0 0 0
0 5 0 1 6 0 0
1 6 1 1 0 0 0
0 6 0 1 7 0 0
1 7 1 1 0 0 0
0 7 0 1 8 0 0
1 8 1 1 0 0 0
0 8 0 0 9 0 0
0 9 0 0 a 0 0
0 a 0 0 b 0 0
0 b 0 0 c 0 0
0 c 0 0 d 0 0
0 d 0 0 e 0 0
0 e 0 0 f 0 0
0 f 0 0 h 0 0
0 h 0 0 g 0 0
0 g 0 0 0 1 1
1 g 1 0 0 1 1

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

ОБЪЯСНЕНИЕ

Detect eight zero bits (which will occur at the end of the input, since TMBWW uses an infinite tape of bits.)
1 1 1 1 0 0 0
0 1 0 1 2 0 0
1 2 1 1 0 0 0
0 2 0 1 3 0 0
1 3 1 1 0 0 0
0 3 0 1 4 0 0
1 4 1 1 0 0 0
0 4 0 1 5 0 0
1 5 1 1 0 0 0
0 5 0 1 6 0 0
1 6 1 1 0 0 0
0 6 0 1 7 0 0
1 7 1 1 0 0 0
0 7 0 1 8 0 0
1 8 1 1 0 0 0
0 8 0 0 9 0 0

-------------

When eight 0 bits are detected, move back to the final byte of the input and print it out while halting the program.
0 9 0 0 a 0 0
0 a 0 0 b 0 0
0 b 0 0 c 0 0
0 c 0 0 d 0 0
0 d 0 0 e 0 0
0 e 0 0 f 0 0
0 f 0 0 h 0 0
0 h 0 0 g 0 0
0 g 0 0 0 1 1
1 g 1 0 0 1 1

Желе , 1 байт

Ṫ

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

Не самая сложная задача в желе ...

Обратите внимание, что это принимает входные данные в виде строки; если входные данные могут быть интерпретированы иначе (например, число, список), тогда аргумент необходимо будет заключить в кавычки (например, «123456» или «[123,197]»). В качестве альтернативы это можно рассматривать как ссылку, которая принимает байтовый массив и возвращает последний член этого массива в соответствии со стандартными правилами PPCG.

Спасибо @ MilkyWay90 и @ ბიმო за указание на это.

Excel, 10 байт

В значительной степени эквивалентно ответу VBA @ remoel:

=RIGHT(A1)

Каскад , 9 байт

?a|,
;.]^

Очень доволен этим, так как он всего на 3 байта длиннее моей программы для кошек

расширенный

   ?
  ^;.
 | |a
 ] |
a ,|

По сути, это просто циклически перемещает входные символы в aстек до тех пор, пока не будет достигнут EOF. Затем он выводит элемент вверху aстека, используя.a .

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

PowerShell, 11 байт

"$args"[-1]

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

SmileBASIC, 16 байтов

INPUT S$?POP(S$)

05AB1E , 1 байт

¤

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

θили `будет работать.

Веточка, 37 байт

При этом просто используется «извлечение 1 символа из конца и печать его».

{%macro a(a)%}{{a[-1:1]}}{%endmacro%}

Это было действительно легко сделать и проверить, но было весело!

Чтобы использовать его, вы должны поместить его в .twigфайл и импортировать его:

{% import 'a.twig' as a %}
{{ a.a("string") }} {# should display "g" #}

Вы можете проверить это на https://twigfiddle.com/aa19wd (включая тестовые случаи)

Баш, 13 байт

echo ${1: -1}

Строка передается в качестве аргумента.

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

Эмоция , 5 байт

😶👉😃😨👿

объяснение

😶 Push a copy of the first stack value.
👉 Push the length of the first stack value interpreted as a string.
😃 Push literal 1
😨 Push the difference of the second and first stack values.
👿 Push the character of the second stack value at the index of the top stack value.

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

VBA (Excel), 14 12 байт

используя Immediate Window и Cell A1 качестве входных данных

Спасибо @tsh

?[RIGHT(A1)] или же ?Right([A1],1)

Python 3, 11 18 34 байта

import sys;print(sys.argv[-1][-1])

Использование через запуск программы в виде скрипта Python в командной строке. Ввод предоставляется в качестве последнего аргумента программы.

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

IBM / Lotus Notes Formula, 11 байтов

@Right(i;1)

Формула вычисляемого поля, получающая данные из редактируемого поля i

Машинный код Тьюринга, 72 42 байта

Предполагается ввод без пустых ячеек (пробелов). Спасибо только ASCII за сохранение 30 байтов.

0 * * r 1
1 * * l 2
1 _ _ l halt
2 * _ r 0

Старая версия в 72 байта:

0 * * r 0
0 _ * l 1
1 * * l 2
2 * _ l 2
2 _ _ r 3
3 _ _ r 3
3 * * * halt

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

C # 8,0 , 8 байтов

Требуется .NET Core 3.0, который находится в бета-версии. В настоящее время происходит сбой CLR из-за ошибки, но как только ошибка устранена, она будет работать, как ожидается, и соответствовать требованиям вызова.

s=>s[^1]

C # 8.0 , работает без сбоев во время записи, 22 байта

s=>s.ToCharArray()[^1]

C # 8.0 , полная программа, 78 байт

using C=System.Console;class A{static void Main(){C.Write(C.ReadLine()[^1]);}}