Запрограммируйте самый короткий код, который будет вычислять среднее значение ударов в минуту (ударов в минуту), используя 8 временных точек данных. Это мой первый пост, и я не видел подобного вопроса. Так как я фанат ритм-игр, было бы неплохо иметь небольшой удобный инструмент для расчета BPM, используя вашу собственную клавиатуру и ваше собственное чувство ритма (если оно у вас есть ...)

Вызов

• Все входные данные должны быть единичными. (т.е. только нажимая «ввод» как «ввод»)
• Ваша программа должна принимать не менее 9 входов. (Для создания 8 точек данных прошло время.)
• Ваша программа должна выводить удары в минуту нажатий клавиш, округленные до 2 десятичных знаков. (т.е. 178,35)
• Сроки начинается с первого ввода. Не запуск программы

Это код-гольф , поэтому выигрывает самый короткий ответ.

Пример ввода и вывода

Предоставьте хотя бы один пример ввода и вывода. Убедитесь, что они соответствуют вашему собственному описанию того, как должен выглядеть ввод.

Входные данные:

> [Enter-Key]
# User waits 1 second
...  7 more inputs
> [Enter-Key] 

Выход:

> 60

Текущий победитель - KarlKastor на 22 байта, использующий Pyth

Хотя победитель использовал Pyth, ответ Matlab был заметным ответом.

Pyth , 22 байта

 wJ.d0 mw8.Rc480-.d0J2

(да, там ведущий пробел)

Ввод осуществляется нажатием кнопки ввода.

Если разрешен дополнительный вывод, я могу удалить пробелы и получить оценку 20 байт.

объяснение

 wJ.d0 mw8.Rc480-.d0J2
 w                      # take the first input
                        # (space) throw the result away
  J.d0                  # store the current system time in J
       mw8              # take 8 inputs and throw the result away
                 -.d0J  # difference of current time and J
             c480       # divide 480 by this
           .R         2 # round to 2 decimal places 

MATLAB / Octave, 58 56 55 байт

Спасибо @LuisMendo за -1 байт!

input('');tic;for k=1:7;input('');end;fix(48e3/toc)/100

Вы должны нажать Enter 9 раз. (Также работает в Октаве.)

Здесь вы видите это в действии, слева MATLAB, справа Octave:

JavaScript (ES6), 77 74 байта

(i=8,n=Date.now,t)=>onclick=_=>(t=t||n(),i--||alert((48e6/(n()-t)|0)/100))

Создает onclickсобытие на глобальном windowобъекте. Отправить удары, нажав в любом месте окна.

Тестовый фрагмент

let f=
(i=8,n=Date.now,t)=>onclick=_=>(t=t||n(),i--||alert((48e6/(n()-t)|0)/100))

f()
document.write("Running... click anywhere here")

*{user-select:none}

Python 3, 93 92 81 байт

Сохранено 11 байтов благодаря Фелипе .

import time
a,*l,b=[input()or time.time()for i in' '*9]
print(round(480/(b-a),2))

Bash + общие утилиты Linux, 58

script -tt -c'sed -n 9q'
sed '1c2k0
s/ 2/+/;$a480r/p' t|dc

Javascript, 100 , 84 благодаря Пауэлл , 82 байта благодаря Джастину Маринеру

z=>{(a=alert)();i=0;s=(n=Date.now)();while(i++<8)a();a((48e4/(n()-s)).toFixed(2))}

(z=>{(a=alert)();i=0;s=(n=Date.now)();while(i++<8)a();a((48e4/(n()-s)).toFixed(2))})();

Java 1,5+, 345 339 361 337 байт

-34 байта спасибо Майклу за указание, что я забыл исправить мой импорт

import java.awt.event.*;class B{public static void main(String[]a){new java.awt.Frame(){{addKeyListener(new KeyAdapter(){long x=System.currentTimeMillis();int b=0;public void keyPressed(KeyEvent e){if(e.getKeyChar()==' '&&b++==9){System.out.println(Math.round(6000000.0*b/(System.currentTimeMillis()-x))/100.0);}}});setVisible(1>0);}};}}

Слушает пользователя, когда он нажимает пробел. Затем, когда пользователь нажал его 9 раз, печатает обратно текущий BPM:

Изображение содержит сообщения отладки, которых нет в коде для игры в гольф.

Ungolfed:

import java.awt.event.*;

class B {
    public static void main(String[] a) {
        new java.awt.Frame() {
            {
                addKeyListener(new KeyAdapter() {
                    long x = System.currentTimeMillis();
                    int b = 0;

                    public void keyPressed(KeyEvent e) {
                        if (e.getKeyChar() == ' ' && b++ == 9) {
                            System.out
                                    .println(Math.round(6000000.0 * b
                                            / (System.currentTimeMillis() - x)) / 100.0);
                        }
                    }
                });
                setVisible(1 > 0);
            }
        };
    }
}

В некотором роде весело, чтобы попытаться получить рекорд ...

KEY PRESS0 AT 250ms.
KEY PRESS1 AT 343ms.
KEY PRESS2 AT 468ms.
KEY PRESS3 AT 563ms.
KEY PRESS4 AT 672ms.
KEY PRESS5 AT 781ms.
KEY PRESS6 AT 880ms.
KEY PRESS7 AT 989ms.
485

C # (.NET Core), 193 206 189 186 155 143 137 байт

-47 байт благодаря TheLethalCoder
-4 байт благодаря Nazar554
-16 байт благодаря Luc
-2 байт благодаря Камилу Дракари

_=>{var x=new long[9];for(int i=0;i<9;){Console.ReadKey();x[i++]=DateTime.Now.Ticks;}return Math.Round(48e8/(x[8]-x[0]),2);}

Также добавлено к количеству байтов:

using System;

Вся программа:

namespace System
{
    class A
    {
        static void Main()
        {
            Func<int, double> f = _ =>
            {
                var x = new long[9];
                for (int i = 0; i < 9; )
                {
                    Console.ReadKey();
                    x[i++] = DateTime.Now.Ticks;
                }
                return Math.Round(48e8 / (x[8] - x[0]), 2);
            };
            Console.WriteLine(f(0));
        }
    }
}

C ++, 150 байт

#include<iostream>
#include<ctime>
#define G getchar()
void f(){G;auto s=clock();G;G;G;G;G;G;G;G;std::cout<<round(6000/(double(clock()-s)/8000))/100;}

Python + curses, 122 байта

import curses as C,time as T
s=C.initscr()
C.cbreak()
t=0
exec's.getch();t=t or T.time()'*9
print'%.2f'%(540/(T.time()-t))

Требуется cursesмодуль для загрузки.

-9 байт благодаря Фелипе Нарди Батисте

vba, 57

msgbox"":x=timer:for i=1to 8:msgbox"":next:?480/(timer-x)

нажмите ввод или нажмите ОК в окне сообщения.

Python 3 , 74 байта

from timeit import*;print('%.2f'%(480/timeit('input()',input(),number=8)))

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

Это даст вам глупые числа в TIO, поскольку он запускает все входы одновременно, но работает. timeit()возвращает время выполнения оператора 'input()'в секундах, исключая параметр настройки input(). TIO с задержкой 1 с на вход для проверки.

Java 8, 180 135 байт

-45 байт благодаря @SocraticPhoenix, предлагающему использовать System.inнапрямую.

x->{System.in.read();long t=System.nanoTime(),i=0;for(;i++<8;System.in.read());System.out.printf("%.2f",4.8e11/(System.nanoTime()-t));}

Анонимная лямбда-функция с неиспользуемым аргументом, которая должна быть назначена методу функционального интерфейса, который выдает Exception(пример ниже). Читает из консоли; удары посылаются нажатием enter.

Ungolfed с окружающим тестовым кодом

public class A {
    interface F{void f(Object x) throws Exception;}

    public static void main(String[]a) throws Exception {
        F f =

        x->{
            System.in.read();
            long t=System.nanoTime(),i=0;
            for(;i++<8;System.in.read());
            System.out.printf("%.2f",4.8e11/(System.nanoTime()-t));
        }

        ;
        f.f(null);
    }
}

C #, 117 байт

Уже есть ответ на C # (.NET Core), на котором он основывается. Добавлена ​​интерполированная строка (которой, по-видимому, не хватает .NET Core) для вывода и сокращенная часть байтов с использованием длинного массива вместо DateTime.

_=>{var d=new long[9];for(var i=0;i<9;){Console.ReadKey();d[i++]=DateTime.Now.Ticks;}return$"{48e8/(d[8]-d[0]):n2}";}

Гуманная версия

class Program
{
    static void Main()
    {
        Func<int, string> f = _ =>
        {
            var d = new long[9];
            for (var i = 0; i < 9;)
            {
                Console.ReadKey();   // Switch these two to "automate" key presses.
                //Thread.Sleep(100); 

                d[i++] = DateTime.Now.Ticks;
            }
            return $"{48e8 / (d[8] - d[0]):n2}";
        };

        var result = f(1);
        Console.WriteLine();
        Console.WriteLine(result);
        Console.ReadKey(true);
    }
}

R, 79 84 байта

scan();s=Sys.time;x=s();replicate(8,scan());cat(round(60/as.numeric((s()-x)/8),d=2))

Работает только при использовании Enter, так как это немедленно завершит сканирование. Явно использует printв качестве digitsаргумента обработку округления.

> scan();s=Sys.time;x=s();replicate(8,scan());cat(round(60/as.numeric((s()-x)/8),d=2))
1: 
Read 0 items
numeric(0)
1: 
Read 0 items
1: 
Read 0 items
1: 
Read 0 items
1: 
Read 0 items
1: 
Read 0 items
1: 
Read 0 items
1: 
Read 0 items
1: 
Read 0 items
[[1]]
numeric(0)

[[2]]
numeric(0)

[[3]]
numeric(0)

[[4]]
numeric(0)

[[5]]
numeric(0)

[[6]]
numeric(0)

[[7]]
numeric(0)

[[8]]
numeric(0)

[1] 439.47

Рубин, 58 байт

gets;t=Time.now;8.times{gets};p (480/(Time.now-t)).round 2