โปรแกรมรหัสที่สั้นที่สุดที่จะคำนวณค่าเฉลี่ยของ BPM (Beats ต่อนาที) โดยใช้จุดข้อมูล 8 จุดที่ผ่านไป นี่คือโพสต์แรกของฉันและฉันไม่ได้เห็นคำถามคล้ายกับนี้ เนื่องจากฉันเป็นแฟนเกมจังหวะมันคงจะดีถ้ามีเครื่องมือขนาดเล็กที่ใช้ในการคำนวณ BPM โดยใช้แป้นพิมพ์ของคุณเองและจังหวะของคุณเอง (ถ้าคุณมี ... )

ท้าทาย

• อินพุตทั้งหมดต้องเป็นเอกพจน์ (เช่นกดปุ่ม "Enter" เป็น "อินพุต" เท่านั้น)
• โปรแกรมของคุณจะต้องมีอย่างน้อย 9 อินพุต (เพื่อสร้างจุดข้อมูล 8 เวลาที่ผ่านไป)
• โปรแกรมของคุณควรส่งออก BPM ของการกดปุ่มที่ปัดเศษเป็นทศนิยม 2 ตำแหน่ง (เช่น 178.35)
• เวลาเริ่มต้นที่อินพุตแรก ไม่เริ่มต้นโปรแกรม

นี่คือรหัสกอล์ฟดังนั้นคำตอบที่สั้นที่สุดชนะ

ตัวอย่างอินพุตและเอาต์พุต

จัดเตรียมอินพุตและเอาต์พุตตัวอย่างอย่างน้อยหนึ่งรายการ ตรวจสอบให้แน่ใจว่าตรงกับคำอธิบายของคุณในสิ่งที่ป้อนควรมีลักษณะ

การป้อนข้อมูล:

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

เอาท์พุท:

> 60

ผู้ชนะปัจจุบันคือKarlKastorที่ 22 Bytes โดยใช้ Pyth

แม้ว่าผู้ชนะจะใช้ Pyth คำตอบของ Matlab ก็เป็นคำตอบที่น่าทึ่ง

Pyth , 22 ไบต์

 wJ.d0 mw8.Rc480-.d0J2

(ใช่มีพื้นที่ชั้นนำ)

อินพุตคือกด 'Enter'

หากอนุญาตให้ส่งออกเพิ่มเติมฉันสามารถลบช่องว่างและรับคะแนน 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 ครั้ง (ใช้ได้กับ Octave ด้วย)

ที่นี่คุณเห็นมันในการดำเนินการซ้าย MATLAB ขวาคู่:

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ขอบคุณPowelles , 82 ไบต์ขอบคุณJustin Mariner

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 ไบต์ขอบคุณ Michael ที่ชี้ให้เห็นว่าฉันลืมแก้ไขการนำเข้าของฉัน

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 ปัจจุบัน:

รูปภาพมีข้อความดีบั๊กที่ไม่ปรากฏในรหัส golfed

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 ไบต์ขอบคุณKamil Drakari

_=>{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 ไบต์ขอบคุณ Felipe Nardi Batista

vba, 57

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

กด Enter หรือคลิกที่ตกลงในกล่องข้อความ

Python 3 , 74 ไบต์

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

ลองออนไลน์!

สิ่งนี้จะทำให้คุณมีตัวเลขที่โง่ใน TIO เพราะมันจะทำงานอินพุตทั้งหมดในครั้งเดียว แต่มันจะทำงาน timeit()ส่งกลับเวลาการดำเนินการตามคำสั่งในไม่กี่วินาทีไม่รวมพารามิเตอร์การตั้งค่า 'input()' TIO ที่มีการหน่วงเวลา 1 วินาทีต่ออินพุตสำหรับการตรวจสอบความถูกต้องinput()

Java 8, 180 135 ไบต์

-45 ไบต์ขอบคุณ @SocialPhoenix แนะนำให้ใช้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 w / รหัสทดสอบโดยรอบ

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))

ใช้งานได้เมื่อใช้การป้อนเท่านั้นเนื่องจากจะสิ้นสุดการสแกนทันที ใช้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