Как долго должна работать моя микроволновая печь?

33

Я голоден. Давайте что-нибудь в микроволновке. Учитывая числовой ввод от 1 до 4 цифр, выведите количество секунд, в течение которых микроволновая печь должна работать.

Детали

Хитрость заключается в том, чтобы выяснить, вводит ли пользователь секунды или комбинацию секунд и минут. Единицы и десятки мест должны быть интерпретированы как секунды, а сотни и тысячи мест должны быть минутами. Например, значение 1234должно интерпретироваться как 12 минут 34 секунды и 9876должно составлять 98 минут 76 секунд. Печатание 130и 90оба должны привести к времени приготовления 90 секунд.

Вот несколько других входов и выходов:

  • 1 = 1
  • 11 = 11
  • 111 = 71
  • 1111 = 671
  • 9 = 9
  • 99 = 99
  • 999 = 639
  • 9999 = 6039

правила

Это код-гольф , поэтому выигрывает самая короткая программа в байтах. Стандартные лазейки не допускаются. Победившая запись должна возвращать правильный ответ, если задано любое целое число от 1 до 9999.

code-golf  number 
— Андрей Бреза
источник
@WheatWizard, я рад отредактировать вопрос. У вас есть предложение, что я должен сказать в разделе «Детали»? Может быть, я мог бы сделать это предложение более понятным: «Единицы и десятки мест следует интерпретировать как секунды, а сотни и тысячи мест должны быть минутами».
— Андрей Бреза
@WheatWizard Я только добавил больше деталей, дайте мне знать, если вы думаете, что я должен добавить больше.
— Андрей Бреза
Это работает с входом 9876?
— Андрей Бреза
1
Странно, я собирался поставить в песочницу этот точный вызов, ха-ха
— FlipTack
Для чего будет выход 190?
— OldBunny2800

Ответы:

7

C, C ++, Java, C #, D: 36 байт

D: 35 байт

C: 28 байт

Впервые у меня есть такой короткий ответ!

int r(int i){return i/100*60+i%100;}

У D может быть специальная оптимизация из-за системы шаблонов игры в гольф:

T r(T)(T i){return i/100*60+i%100;}

C имеет специальную оптимизацию с неявным int:

r(i){return i/100*60+i%100;}

Код для тестирования

В C (должны включать stdio.h):

int main() {
    int testArr[] = {1,11,111,1111,9,99,999,9999};
    for(int i=0;i<8; ++i) {
        printf("%d = %d\n",testArr[i],r(testArr[i]));
    }
    return 0;
}

TIO Link

В C ++ (должны включать iostream):

int main() {
    std::initializer_list<int> testList{
        1,11,111,1111,9,99,999,9999
    };

    for (auto x : testList) {
        std::cout << r(x) << '\n';
    }
}

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

В Java :

public class MainApp {

    int r(int i){return i/100*60+i%100;}

    public static void main(String[]a) {
        MainApp m = new MainApp();
        int testArr[] = new int[]{
                1,11,111,1111,9,99,999,9999
        };

        for (int v : testArr) {
            System.out.println(v + " = " + m.r(v));
        }
    }
}

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

В C #

class Program {
    int r(int i){return i/100*60+i%100;}
    static void Main(string[] args) {
        var p = new Program();
        int[] testArr = new int[8]
        {
            1,11,111,1111,9,99,999,9999
        };
        foreach(int a in testArr) {
            Console.WriteLine(a + " = " + p.r(a));
        }
    }
}

В D (приходится импортировать std.stdio) (точно, я понятия не имею, как использовать массивы в D):

void main() {
    int[] arr = [1,11,111,1111,9,9,999,9999];
    for(int i = 0; i < arr.length; i++)
        writeln(arr[i]," = ",r(arr[i]));
}

TIO Link

— HatsuPointerKun
источник
Тестовый код D будет нижним колонтитулом этого TIO : tio.run/… , и я вижу, что вы изучили систему шаблонов :). (Есть foreachв D, я просто забыл, как его использовать, к сожалению)
— Zacharý
C может быть заполнен до 28 байт с использованием C89 implicit-int.
— pizzapants184
Вы должны опубликовать все это как отдельные ответы.
— MD XF
6

постоянный ток , 10 байт

?9A~r60*+p

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

Пояснение: в постоянном токе при нажатии чт. в стеке идет сверху

?         # read and push the input number on the stack
9A        # push 100: 9 * 10^1 + A[10] * 10^0 :D
~         # divide 2nd nr. by the top nr., push quotient, then remainder
r60*      # swap top 2 nr., then multiply the top by 60
+p        # add top 2 nr., then print result
— seshoumara
источник
5

Bash bc + sed, 30 28 байт

-2 байта благодаря @seshoumara .

bc<<<0`sed 's/..\?$/*60+&/'`

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

Принимает ввод от стандартного ввода. Пошел к более творческому подходу: вставляет *60+перед последними 1 или 2 цифрами и добавляет 0к началу, чтобы учесть вводы только с 1 или 2 цифрами. Результат затем передается bc.

— Джастин Маринер
источник
1
Если вы удалите -rи используете \?, вы можете потерять 2 байта.
— Сешумара
3

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

t;f(){scanf("%d",&t);printf("%d",t%100+t/100*60);}

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

— gastropner
источник
2
— Steadybox
25 байтов f(i,x){x=i/100*60+i%100;}
— Джакомо Гарабелло
21 байт f(i,x){x=i-i/100*40;}
— Кевин Круйссен
2

JavaScript, 21 байт

a=>(a/100^0)*60+a%100

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

Сохраните 4 байта, используя трюк ovs - a- (a / 100 ^ 0) * 40
— IanF1
1
@ IanF1. Спасибо, но я думаю, что это будет буквально воровать их идею.
Да, ты прав. Слишком восторженный, извини.
— IanF1
3
@ThePirateBay Вы действительно не соответствуете своему имени тогда;)
— kamoroso94
2

J , 12 байт

-40*&<.%&100

Это решение Python 2 от ovs, выраженное в J. Оно состоит из хука и разветвления:

┌─┬───────────────────────┐
│-│┌──┬────────┬─────────┐│
│ ││40│┌─┬─┬──┐│┌─┬─┬───┐││
│ ││  ││*│&│<.│││%│&│100│││
│ ││  │└─┴─┴──┘│└─┴─┴───┘││
│ │└──┴────────┴─────────┘│
└─┴───────────────────────┘

       %&100  - divides the number by 100
   *&<.       - finds the floor of the left argument and multiplies it to the left arg.
 40           - 
-             - subtracts the result of the above fork from the input

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

— Гален Иванов
источник
1
Количество байтов, что и 60#.0 100#:].
— FrownyFrog
@FrownyFrog - ваше решение выглядит красивее, ура!
— Гален Иванов
2

Лабиринт , 19 байт

?:_100%}#00/_60*{+!

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

объяснение

?      Read input.
:      Duplicate.
_100%  Mod 100.
}      Move off to auxiliary stack.
#00/   Divide by 100, using the stack depth to get a 1, instead of _1.
_60*   Multiply by 60.
{+     Retrieve the earlier result and add it.
!      Print.

Затем IP попадает в тупик и начинает двигаться назад. Когда он достигает, /он пытается делить на ноль, что завершает программу.

— Мартин Эндер
источник
2

Желе , 5 байт

Как монадическая ссылка (спасибо за хедз-ап, Кэрд!):

b³ḅ60

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

... или как полная программа:

bȷ2ḅ60

Это можно легко перенести на 05AB1E, поэтому:

05AB1E , 5 байтов

тв60β

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

Просто преобразует входное целое число в основание 100, а затем преобразует результат из основания 60 в целое число. Следовательно, это эквивалентно Input% 100 + 60 * putInput / 100⌋

— Мистер Xcoder
источник
— caird coinheringaahing
@cairdcoinheringaahing Я думаю , что вы имели в виду это , но спасибо за головы-вверх так или иначе
— г -
2

Excel VBA, 29 байт

Функция анонимного непосредственного окна VBE, которая берет входные данные из диапазона [A1]и выводит в непосредственное окно VBE.

?[A1]Mod 1E2+60*[Int(A1/100)]
— Тейлор Скотт
источник
2

PARI / GP , 16 байт

Непосредственная:

n->n\100*60+n%100

К сожалению, этот хороший метод просто слишком длинный для использования:

n->[60,1]*divrem(n,100)
— Чарльз
источник
2

Напористый , 10 9 байт

Кевин переиграл меня на моем родном языке ... (используя подход из ответа Овса )

2dH/40*-#

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

10 байт

sjvj60*^+#

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

s             \ Split input into digits
 jvj          \ Join the first two and the last two
    60*       \ Multiply the first by 60
       ^+     \ Add the values
         #    \ Print

11 байт

Для еще одного байта мы можем использовать Input % 100 + 60 * ⌊Input / 100⌋подход:

H2d%}/60*+#

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

— FlipTack
источник
1
9 байт путем создания порта Python 2 ответа @ovs' : 2dH/40*-#. Никогда не программировал в Pushy раньше, но это похоже на довольно крутой язык. :)
— Кевин Круйссен
1
@KevinCruijssen это довольно общий язык, основанный на стеке, я думаю, единственное, что он приносит на стол, это двойной стек ... но спасибо, и спасибо за гольф :)
— FlipTack
1

05AB1E , 9 байтов

т÷60*¹т%+

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

Объяснение:

т÷60*¹т%+

т         // Push number 100
 ÷        // Integer division with the input
  60      // Push number 60
    *     // Multiply with the previous result
     ¹    // Push input
      т   // Push 100 again
       %  // Modulo
        + // Add the first and the second result

Возможно, есть какой-то трюк с базовыми преобразованиями, который может быть достигнут в 05AB1E, но я не смог его найти.

1

Сетчатка , 11 байт

.{100}
60$*

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

Ввод и вывод в одинарный . Для удобства набор тестов преобразуется из и в десятичное число.

Выполнение базового преобразования такого типа длиной до двух цифр удивительно просто в унарном формате. Мы просто сопоставляем пробеги 100 1с и заменяем их на 60 1с. Все, что осталось, будет соответствовать последним двум цифрам в десятичном представлении и останется неизменным.

— Мартин Эндер
источник
1

Алиса , 19 байт

/o
\i@/.'d%~'d:'<*+

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

объяснение

Жаль, что я удалил divmod из языка, я думаю ...

/o
\i@/...

Это обычная структура для линейных программ с десятичным вводом / выводом, работающих исключительно в кардинальном (арифметическом) режиме.

.     Duplicate input.
'd%   Mod 100.
~     Swap with other copy.
'd:   Divide by 100.
'<*   Multiply by 60.
+     Add.
— Мартин Эндер
источник
1

Млечный Путь , 10 байт

':Z/v40*-!

использование: ./mw code.mwg -i 9999

Объяснение:

code       explanation                          stack

'          push input to stack                  [input]
 :         duplicate ToS                        [input, input]
  Z        push 100                             [input, input, 100]
   /v      integer division (divide and floor)  [input, ⌊input/100⌋]
     40    push 40                              [input, ⌊input/100⌋, 40]
       *   multiply                             [input, ⌊input/100⌋*40]
        -  subtract                             [input - ⌊input/100⌋*40]
         ! print
— овс
источник
1

R , 21 байт

x=scan();x-x%/%100*40

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

— отметка
источник
1
Я создал свое собственное решение в R, и оно было гораздо менее элегантным, чем это.
— Андрей Бреза
Вы можете сократить, scanтак как большинство ответов просто предполагают, что переменная уже определена.
— Андрей Бреза
Правила настолько противоречивы в отношении этого. Одной из наиболее сложных проблем является наличие функции или сканирования для получения значения.
— Марк
0

05AB1E , 7 байтов

т‰ć60*+

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

объяснение

         command                              current stack
т‰ć60*+  full program. push input implicitly  [1234]
т        push 100                             [1234] [100]
 ‰       push divmod                          [12, 34]
  ć      push head extracted (n[1:], n[0])    [34] [12]
   60*   multiply by 60                       [34] [720]
      +  add and display implicitly           [754]
— Cinari
источник
Используя наш сайт, вы подтверждаете, что прочитали и поняли нашу Политику в отношении файлов cookie и Политику конфиденциальности.
Licensed under cc by-sa 3.0 with attribution required.