Đầu vào

Bạn được cung cấp một bản đồ 2D với các quả bóng và mặt đất trong đó. Nó trông như thế này:

  1         5          2
                 3
     4


__________________________

Mỗi số là một quả bóng, và _là mặt đất. Ký _tự gạch dưới không được phép trong bất kỳ dòng nào khác ngoài dòng trên mặt đất. Chỉ có không gian, dòng mới và chữ số 0-9được phép trên mặt đất. Bạn không thể cho rằng dòng cuối cùng là mặt đất - các dòng trống dưới mặt đất được cho phép. Bạn cũng có thể thêm khoảng trắng, để điền vào các dòng trống, nếu điều đó giúp bạn.

Các quả bóng có thể có số từ 0đến 9, có thể được đặt trên nhau, nhưng không phải dưới mặt đất. Số bóng sẽ là duy nhất.

Giả sử rằng mỗi ký tự là một mét .

Nhận bản đồ từ pastebin!
Kiểm tra trường hợp 1 - nên đầu ra một cái gì đó giống như này
trường hợp kiểm tra 2 - nên tạo ra kết quả tương tự như bản đồ đầu tiên

Thử thách

Thử thách của bạn là đọc một bản đồ như thế từ một tệp hoặc từ stdin- bạn được phép sử dụng cat balls.txt | ./yourexecutable- và tốc độ đầu ra của mỗi quả bóng khi nó chạm đất.

Đây là công thức cho vận tốc:

Giả sử đó hlà sự khác biệt về số dòng giữa số dòng của mặt đất và số dòng của quả bóng và gbằng nhau 10m/s^2.

Đầu ra

Bạn nên xuất từng số bóng và vận tốc m/sở mặt đất. Ví dụ N - Vm/s, Nsố bóng ở đâu và Vlà vận tốc của nó. Bạn cũng có thể xuất ra một mảng nếu bạn muốn.

Chúc mừng mã hóa! :)

MATL , 31 30 27 25 byte

95\16\5B#fG&X>1)b- 20*X^h

Đầu vào là một mảng char 2D với ;dấu phân cách hàng:

['  1         5          2  ';'                 3        ';'     4                    ';'                          ';'                          ';'__________________________']

Hãy thử trực tuyến! Hoặc bao gồm một chữ cái đầu ttrong mã để hiển thị bản đồ cho rõ ràng hơn.

Dưới đây là các trường hợp thử nghiệm khác: thứ nhất , thứ hai .

Giải trình

95\      % Take input implicitly. Modulo 95: convert to numbers and map '_' into 0
16\      % Modulo 16: map space into 0 and digit chars into corresponding numbers
5B#f     % Find row indices and values of nonzero entries
G        % Push input again
&X>      % Index of maximum of each column. This finds character '_'
1)       % Get first value (they are all equal)
b        % Bubble row indices of numbers up in the stack
-        % Subtract to get distance from each number to the ground
20*X^    % Multiply by 20, take sqrt. This gives the velocity values
h        % Horizontally concat numbers and velocities. Display implicitly

C, 125 122 121 byte

b[99]={};main(l,c){for(;(c=getchar())<95u;)b[c]=(l+=c==10);for(c=47;++c<58;)b[c]&&printf("%c,%f\n",c,sqrt((l-b[c])*20));}

Biên dịch và chạy với gcc -w golf.c -lm && cat balls.txt | ./a.out.

C - 194 (-5) 150 137 byte

Với một chút thời gian và suy nghĩ, tôi đã đánh bại 44 byte
Nhờ orlp vì đã giúp tôi tiết kiệm được 13 byte

Tôi sẽ bắt đầu với mã C của mình:

b[256]={},n,i=47;main(l,c){for(;~(c=getchar());n=c==95?l:n)b[c]=(l+=c==10);for(;++i<58;)b[i]&&printf("%d %f\n",i-48,sqrt((n-b[i])*20));}

Và phiên bản có thể đọc được của con người:

//Throws many warnings, but lack of libraries is tolerated

/*
    c - current character
    l - line number (starts at 1)
    n - ground level
    i - iterator
    b - balls array
*/

b[256] = {}, n, i = 47; //That actually works, as long as you are using ASCII

main( l, c )
{
    for ( ;~( c = getchar( ) ); n = c == 95 ? l : n ) //Read stdin and search for ground
        b[c] = ( l += c == 10 ); //Increment lines counter on newlines, and save line numbers

    for ( ; ++i < 58; ) //Iterate through balls
        b[i] && printf( "%d %f\n", i - 48, sqrt( ( n - b[i] ) * 20 ) ); //Print out data    
}

Biên dịch và chạy như thế: gcc -o balls ballsgolf.c -lm && cat 1.txt | ./balls

Đầu ra

1 10.000000
2 10.000000
3 8.944272
4 7.745967
5 10.000000

Pyth, 27 26 25 24 byte

smf-hT "_". e, b @ * 20-xd \ _k2dC smf 
@ hT`M; .e, b @ * 20-xd \ _k2dC smf 
@ T`M; .e, b @ * 20-xd \ _k2dC
sm @ # `M; .e, b @ * 20-xd \ _k2dC

Hãy thử trực tuyến!

Matlab, 100 96 89 90 byte

s=input('');X=find(s==95);for i=0:9
[x y]=find(s==48+i);if(x)[i sqrt(20*(X(1)-x))]
end
end

Nhiều byte được lưu nhờ Luis Mendo

Định dạng đầu vào:

['  1         9          2  ';'                 3        ';'     4                    ';'                          ';'                          ';'__________________________']

Giải trình:

X=find(s==95)         -- finds '_', we'll need X(1) to determine max height
for i=0:9             -- loops through balls' numbers
[x y]=find(s==48+i)   -- finds the ball
if(x)                 -- if it is present
[i sqrt(20*(X(1)-x))] -- output its number and velocity

Python 3, 84 byte

Phiên bản 6, 84 byte: (Cảm ơn Leaky Nun!)

lambda a:[(c,(~-(len(a)-i)*20)**.5)for i,s in enumerate(a)for c in s if c.isdigit()]

Phiên bản 5, 91 byte:

lambda a:[c+":"+str((~-(len(a)-i)*20)**.5)for i,s in enumerate(a)for c in s if c.isdigit()]

Phiên bản 4, 92 byte:

lambda i:[c+":"+str((~-(len(i)-n)*20)**.5)for n in range(len(i))for c in i[n]if c.isdigit()]

Phiên bản 3, 99 byte:

def r(i):x=len(i);print([c+":"+str((~-(x-n)*20)**.5)for n in range(x)for c in i[n] if c.isdigit()])

Phiên bản 2, 102 byte:

def r(i):
 n=len(i)
 for l in i:
  for c in l:
   if c.isdigit():print(c+":"+str((~-n*20)**.5))
  n-=1

Các phiên bản trên lấy một chuỗi các chuỗi làm đầu vào.

Phiên bản 1, 140 byte:

with open(input(),"r")as i:
 n=sum(1for l in i);i.seek(0)
 for l in i:
  for c in l:
   if c.isdigit():print(c+":"+str((~-n*20)**.5))
  n-=1

Cái này lấy thư mục của tập tin làm đầu vào từ người dùng.

Python 3, 84 byte

lambda x:[[i,(20*x[x.find(i):x.find('_')].count('\n'))**.5]for i in x if i.isdigit()]

Hàm ẩn danh chấp nhận đầu vào bằng đối số dưới dạng chuỗi nhiều dòng với tất cả các dòng trống chứa đầy khoảng trắng và trả về một mảng trong đó mỗi phần tử có dạng [số bóng, tốc độ].

Làm thế nào nó hoạt động

lambda x                      Function with input x
...for i in x if i.isdigit()  Loop through all characters i in x for which i is a digit,
                              and hence one of the balls
x[x.find(i):x.find('_')]      Slice x to give the substring between the ball and the ground
....count('\n')               Count the number of newlines in the substring to give the
                              height of the ball
(20*...)**.5                  Calculate the speed of the ball as it hits the ground
[i,...]                       Package the ball number and speed into a list
:[...]                        Return all ball-speed pairs as a list with elements [ball
                              number, speed]

Hãy thử nó trên Ideone

JavaScript (ES6) 93

Chỉnh sửa 2 byte đã lưu thx @Jacajack

Một hàm với một chuỗi nhiều dòng làm tham số đầu vào. Đầu ra không được sắp xếp (vì điều này không được yêu cầu)

a=>[...a].reverse().map(c=>c>'Z'?b=i:c<' '?++i:c>' '&&console.log(c,Math.sqrt((i-b)*20)),i=0)

Kiểm tra

F=
a=>[...a].reverse().map(c=>c>'Z'?b=i:c<' '?++i:c>' '&&console.log(c,Math.sqrt((i-b)*20)),i=0)

function test()
{
  F(I.value);
}

test()

#I { height: 12em; width: 30em}

<textarea id=I>
    
 
  1         5          2
                 3
     4


__________________________




</textarea>
<button onclick="test()"></button>