Виклик

Дано масив цілих чисел, отриманий від stdin, аргументів функції, аргументів програми або якогось іншого методу:

Виведіть у масиві лише мінімальні та максимальні числа за допомогою зворотного значення, stdout чи інших методів підгонки.

Приклад сеансу

> minmax( {0, 15, 2, 3, 7, 18, -2, 9, 6, -5, 3, 8, 9, -14} )
-14 18

Довідкова реалізація

// C++14

void minmax(std::vector<int> v) {
    int min = v[0]; int max = v[0];
    for(auto it : v) {
        if (*it < min)
            min = *it;
        if (*it > max)
            max = *it;
    }
    std::cout << min << ' ' << max << std::endl;
}

Правила

• Ви не можете використовувати вбудовану функцію для обчислення значень.
• Стандартні лазівки заборонені.
• Заохочуються творчі реалізації.
• Це кодовий гольф , виграє найкоротший відповідь, але він не буде обраний.

Роз'яснення

• Якщо масив містить 1 елемент, вам потрібно вивести його двічі.
• Якщо мінімальне та максимальне значення однакові, потрібно вивести їх обидва.

Желе , 3 байти

Ṣ.ị

Спробуйте в Інтернеті!

Сортуйте масив, а потім бере 0,5-й елемент.

Jelly використовує 1-індексацію, а засоби індексації з плаваючими точками беруть підлогу та свою стелю.

Отже 0,5-й елемент дасть вам 0-й елемент і 1-й елемент.

0-й елемент - останній елемент.

Пітон, 61 49 37 36 34 31 байт

lambda s:s.sort()or[s[0],s[-1]]

-12 байт завдяки RootTwo

Ще -12 байт завдяки чепнеру

-2 байти завдяки johnLate

-3 байти завдяки johnLate

Brain-Flak 220 218 байт

(({}))([]){({}[()]<(([])<{({}[()]<([([({}<(({})<>)<>>)<><({}<>)>]{}<(())>)](<>)){({}())<>}{}({}<><{}{}>){{}<>(<({}<({}<>)<>>)<>({}<>)>)}{}({}<>)<>>)}{}<>{}>[()]){({}[()]<({}<>)<>>)}{}<>>)}{}({}<((())){{}{}([][()])}{}>)

Спробуйте в Інтернеті!

Пояснення

Спочатку вона подвоює найвищу величину (у списку перелічено лише один довгий)

(({}))

Потім використовується мій алгоритм сортування міхура:

([]){({}[()]<(([])<{({}[()]<([([({}<(({})<>)<>>)<><({}<>)>]{}<(())>)](<>)){({}())<>}{}({}<><{}{}>){{}<>(<({}<({}<>)<>>)<>({}<>)>)}{}({}<>)<>>)}{}<>{}>[()]){({}[()]<({}<>)<>>)}{}<>>)}{}

Потім він набирає верхнє значення стека (тобто хв)

({}<...>)

Потім вона спливає, поки висота стека не дорівнює одному:

((())){{}{}([][()])}{}

JavaScript (ES6), 34 байти

a=>[a.sort((x,y)=>x-y)[0],a.pop()]

sortсортує на місці, тому я можу просто звернутися до індексу [0] за найнижчим значенням і popнайвищим значенням масиву, однак він робить сортування рядків за замовчуванням, тому мені доведеться пройти компаратор.

Математика, 18 байт

Sort[#][[{1,-1}]]&

Сортує масив та витягує перше та останнє значення.

R, 31 байт

l=sort(scan());l[c(1,sum(l|1))]

Не такий оригінал, але ей!

Код машини ARM, 26 байт

Шестнадцятковий дамп (маленький ендіан):

6810 4601 f852 cb04 4560 bfc8 4660 4561 bfb8 4661 3b01 d8f5 4770

Це функція, що не має системного виклику чи бібліотеки. Кодування - Thumb-2, змінна (2 або 4 байти) кодування для 32-бітової ARM. Як можна уявити, тут немає простого способу просто сортувати та вибрати перший та останній елементи. Загалом, тут насправді нічого фантазійного не відбувається, це майже так само, як і референтна реалізація.

Невикольована збірка (синтаксис GNU):

.syntax unified
.text
.global minmax
.thumb_func
minmax:
    @Input: @r0 and r1 are dummy parameters (they don't do anything)
    @r2 - Pointer to list of integers (int*)
    @r3 - Number of integers to sort (size_t)
    @Output:
    @Minimum of the list in r0 (int)
    @Maximum in r1 (int)
    ldr r0,[r2] @min=r2[0]
    mov r1,r0 @max=min
    loop:
        @ip is intra-procedure call register, a.k.a. r12
        ldr ip,[r2],#4 @ip=*r2++
        cmp r0,ip
        it gt @if (r0>ip)
        movgt r0,ip @r0=ip
        cmp r1,ip
        it lt @if (r1<ip)
        movlt r1,ip @r1=ip
        subs r3,r3,#1
        bhi loop @while (--r3>0)
    bx lr @Return

Випробувано на Raspberry Pi 3; ось сценарій тестування (C99, введення через argv):

#include <stdio.h>
#include <stdlib.h>
#include <stdint.h>
//First 2 arguments are dummies.
uint64_t minmax(int,int,int* array,size_t size);

int main(int argc,char** argv) {
    int i;
    int array[argc-1];
    for (i=1;i<argc;i++) {
        array[i-1]=atoi(argv[i]);
    }
    uint64_t result = minmax(0,0,array,argc-1);
    printf("Minimum is %d, maximum is %d.\n",(unsigned)result,(unsigned)(result>>32));
}

Haskell, 27 байт

f x=(`foldl1`x)<$>[min,max]

В Haskell minі maxнаведіть мінімум і максимум два аргументи, а не список. Я не міг сказати, чи заборонено це (здається, що замість цього тільки minimumі maximumбуло б заборонено), тому, будь ласка, повідомте мене, якщо вони є, і я негайно видалю цю відповідь.

Октава, 20 байт

@(n)sort(n)([1,end])

Це сортує вхідний вектор і виводить перше і останнє значення.

Власне, 5 байт

S;F@N

Спробуйте в Інтернеті!

Пояснення:

S;F@N
S      sort
 ;     dupe
  F    first element
   @N  and last element

05AB1E , 6 4 байти

{Âø¬

Пояснення

{     # sort list
 Â    # bifurcate
  ø   # zip
   ¬  # head

Спробуйте в Інтернеті

MATL , 4 байти

S5L)

Спробуйте в Інтернеті!

Пояснення

S    % Implicitly input the array. Sort
5L   % Push [1 0]. When used as a (modular, 1-based) index, this means "first and last"
)    % Apply as an indexing vector into the sorted array. Implicitly display

Пітон, 29 байт

lambda s:s[s.sort():1]+s[-1:]

Перевірте це на Ideone .

C, 83 81 79 байт

m,M;f(a,s)int*a;{for(m=M=*a;s--;++a)*a<m?m=*a:*a>M?M=*a:0;pr‌​intf("%i %i",m,M);}

Брахілог , 9 байт

oOtT,Oh:T

Спробуйте в Інтернеті!

V , 12 байт

:sor
ò2Gjkd

Спробуйте в Інтернеті!

Подяка DJMcMayhem за це.

CJam, 10 9 байт

q~$_(p;W>

Спробуйте в Інтернеті.

Мені не дуже добре в CJam.

q~          e# eval input
  $         e# sort
   _        e# duplicate
    (       e# pop first
     p      e# print
      ;     e# remove array
       W>   e# get last element

Python 2, 34 байти

x=sorted(input());print x[0],x[-1]

PHP, 44 байти

function a($a){sort($a);echo $a[0].end($a);}

Обробка, 59 52 байти

void m(int[]x){x=sort(x);print(x[0],x[x.length-1]);}

Обробка насправді не дозволяє мені читати зі stdin, який я зміг знайти, і я не знаю, чи підтримує її внутрішній компілятор Java лямбди (і це було так давно, як мені довелося писати серйозну Java, яку я не не пам'ятаю, як).

Perl 6 13 байт

*.sort[0,*-1]

Тест:

my &min-max = *.sort[0,*-1];

say min-max 1;
# (1 1)
say min-max (0, 15, 2, 3, 7, 18, -2, 9, 6, -5, 3, 8, 9, -14)
# (-14 18)

C #, 60 байт

n=>{System.Array.Sort(n);return new[]{n[0],n[n.Length-1]};};

Наївний метод у 93 байти:

n=>{var r=new[]{n[0],n[0]};foreach(int i in n){if(i<r[0])r[0]=i;if(i>r[1])r[1]=i;}return r;};

POSIX Awk, 44 байти

awk '{for(;NF-1;NF--)if($1>$NF)$1=$NF}1' RS=

Октава , 35 байт

@(x)[x(all(t=x<=x')) x(sum(t)==1)]

Це анонімна функція. Спробуйте це у ideone .

Код уникає використання сортування. А саме, він робить все попарно "менше або рівне" порівняння між елементами введення. Мінімум - це елемент, для якого всі порівняння вірні. Максимум - це те, для чого справедливо лише одне порівняння.

Пітон, 35 34 байти

lambda s:sorted(s+s[:1])[::len(s)]

Альтернативна версія:

lambda s:sorted(s+s)[::len(s)*2-1]

Стара версія, 35 байт.

lambda s:sorted(s+[s[0]])[::len(s)]

Досить просто: візьміть вхідний список, додайте перший елемент, відсортуйте його, потім візьміть перший та (довжину) елемент отриманого списку. Оскільки довжина вводу після додавання елемента дорівнює + 1, це закінчується прийняттям першого та останнього елемента зазначеного списку, які є мінімальними та максимальними елементами.

zsh, 22 байт

(){echo $1 $_} ${(n)@}

визначає функцію лямбда, яка друкує свій перший arg ( $1) та останній аргумент до попередньої команди ($_ ), і передає його $@після сортування, щоб попередня команда стала викликанням цієї лямбда

zsh, 21 байт

це добре працює лише в тому випадку, якщо є більше одного аргументу :(

<<<"${${(n)@}/ * / }"

сортує $@, робить його рядком і замінює все, від першого простору до останнього, одним пробілом, а потім передає його як вхід кішці з<<<

використання:

$ ./minmax 23 342 21 10
10 342

Скала, 55 байт

val s=args.map(_.toInt).sorted
print(s.head+" "+s.last)

Для виконання:

$ scala minmax.scala 1 2 3 4 5 6 7 8 9

Bash + coreutils, 30 байт

tr \  \\n|sort -n|sed '$p;1!d'

Сценарій sed друкує, після впорядкування введення, перше і останнє цілі числа.

постійного струму, 110 байт

?ddsMsmzdsAsa[z1-:az0<S]dsSx[>R]s?[la;asM]sR[lM]sQ[lQxla1-dsa;al?xla0<N]dsNxlAsa[<R]s?[la;asm]sR[lm]sQlNxlmlMf

Допоможіть мені dc! Ти моя єдина надія!

Дякуємо @seshoumara за те, що знайшов цю помилку!

Я поясню пояснення пізніше. Ось це трохи розбито:

?dd sM sm
zd sA sa
[z 1- :a z0<S]dsSx
 [>R]s?
 [la;asM]sR
 [lM]sQ
[lQx la 1- dsa ;a l?x la0<N]dsNx
lA sa
 [<R]s?
 [la;a sm]sR
 [lm]sQ
lNx
lm lM f

Java, 115 байт

String f(int[]i){int t=i[0],a=t,b=t;for(int c=0;c<i.length;c++){a=i[c]<a?i[c]:a;b=i[c]>b?i[c]:b;}return""+a+" "+b;}

Безголівки:

String f(int[] i) {
    int t=i[0], a=t, b=t; // assigns a and b to i[0]
    for (int c=0; c < i.length; c++) { // loop through the array
        a=(i[c]<a) ? i[c] : a;
        b=(i[c]>b) ? i[c] : b; // assignment with ternary operator
    }
    return ""+a+" "+b; // returns a string
}

Моє перше коли-небудь рішення «гольф».