Twoim zadaniem jest stworzenie programu, który doda losowe liczby do poprzednich kwot w ostatecznym pokazie wyścigów liczbowych.

Każdy zawodnik (kolumna) zaczyna się od 0 i dodaje 1 lub 0 do poprzedniej sumy na każdym etapie wyścigu, aż wszyscy zawodnicy osiągną wynik wymagany do wygranej. Wartość 1 lub 0 należy wybierać losowo ( tutaj można znaleźć standardową definicję losowości ). Dane wyjściowe pokażą wynik wyścigu, przy czym każda kolumna reprezentuje jednego zawodnika, w tym formacie:

>> racers:5,score needed:2

0 0 0 0 0 # all racers start at 0
+ + + + + # add
1 0 0 0 1 # random 1 or 0
= = = = = # equals
1 0 0 0 1 # sum
+ + + + +
0 0 0 0 1
= = = = =
1 0 0 0 2 # winner!
+ + + +  
1 1 1 1  
= = = =  
2 1 1 1  
  + + +  
  1 1 1  
  = = =  
  2 2 2   # losers

Uwaga: tylko liczby, + i = muszą być uwzględnione w danych wyjściowych.

Wejście

Twój program zaakceptuje następujące dwa parametry jako dane wejściowe:

1. liczba kierowców (kolumn), która musi być większa niż dwóch
2. wynik wymagany do wygranej, który musi być większy niż jeden

To jest golf golfowy - wygrywa program z najmniejszą liczbą bajtów.

Edycja: nie można wyegzekwować maksymalnego wyniku wynoszącego 9 - ma to na celu zachowanie integralności kolumny. Ponadto w wynikach można pominąć spacje między kolumnami.

Galaretka, 37 36 33 bajtów

,‘X
0Ç<³$пµżIFµ“+=”ṁṖ⁸żF
ÇСḊz⁶G

3 bajty dzięki Dennisowi.

Wypróbuj online

Wyjaśnienie

,‘X                    Helper link. Argument: n. Radomly return n or n+1.

 ‘                     Increment n
,                      Pair. Yield [n, n+1]
  X                    Return a random item from the pair.

0Ç<³$пµżIFµ“+=”ṁṖ⁸żF   Monadic link. Argument: s. Generate one racer.

0                       Start with value 0.
  <³$пµ                While value is less than s:
 Ç                        Use helper link to increment current value.
                        Collect intermediate results in a list.
         I              Compute consecutive differences.
        ż               Zip intermediate results with their next increment value 0 or 1.
          Fµ            Flatten. Let's call the current list A.
                        Odd items of A are racer state and even items are random 0 or 1.
            “+=”        Yield "+=".
                 Ṗ      Yield A without its last element.
                ṁ       Mold i.e Repeat the characters of the string until it contains length(A)-1 characters.
                  ⁸ż    Zipwith. Pair the elements of A with the correponding characters
                    F   Flatten.

ÇСṫ2z” G               Main link. Arguments: s (score needed), r (#racers)

ÇС                     Call the link above r times.
                        Generate a list of r racers.
   Ḋ                    Remove first element of the list (its a garbage s value)
    z⁶                  Transpose with space as fill value.
      G                 Grid. Format the result.

Pyth , 38 34 bajtów

j.tm + j \ = jL \ + C, .u + NYJ.WnsHQ + ZO2Y0J + \ = QE
j.tmj \ = jL \ +. T, .u + NYJ.WnsHQ + ZO2Y0JE

Wypróbuj online!

TSQL, 367 345 341 bajtów

Grał w golfa

DECLARE @r int=20, -- racers
        @g char=2  -- goal

DECLARE @ varchar(99)=REPLICATE('0',@r)a:PRINT @
DECLARE @A varchar(99)='',@s varchar(99)='',@i int=0WHILE @i<@r
SELECT
@i+=1,@A+=char(43-x*11),@s+=IIF(x=1,' ',LEFT(y,1)),@=RIGHT(@,@r-1)+IIF(x=1,' ',REPLACE(LEFT(@,1)+y,@g+1,' '))FROM(SELECT
IIF(LEFT(@,1)IN('',@g),1,0)x,ROUND(RAND(),0)y)z
PRINT @A+'
'+@s+'
'+REPLACE(@A,'+','=')IF @>''goto a

Wypróbuj online

Nie golfowany:

DECLARE @r int=10, -- racers
        @g char=2  -- goal

DECLARE @ varchar(99)=REPLICATE('0',@r)
a:
PRINT @
DECLARE @A varchar(99)='',@s varchar(99)='',@i int=0

WHILE @i<@r
  SELECT
    @i+=1,
    @A+=char(43-x*11),
    @s+=IIF(x=1,' ',LEFT(y,1)),
    @=RIGHT(@,@r-1)+IIF(x=1,' ',REPLACE(LEFT(@,1)+y,@g+1,' '))
  FROM(SELECT IIF(LEFT(@,1)IN('',@g),1,0)x,ROUND(RAND(),0)y)z

PRINT @A+'
'+@s+'
'+REPLACE(@A,'+','=')

IF @>''GOTO a

Pamiętaj, że losowe ziarno na stronie testowej zawsze będzie takie samo, za każdym razem dając ten sam wynik, w zarządzaniu studiem da inne wyniki. Może użyć różnych wartości dla zawodników i celu, aby uzyskać inny obraz

Python 3, 237 bajtów

from random import*
def f(n,t):
 x='0'*n,;i=j=0;y=''
 while' '*n!=x[i]:
  if j==n:j=0;x+=y,;y='';print(x[i]);i+=1
  y+=' 'if x[i][j]in(' ',str(t))else eval(["'+'","str(randint(0,1))","'='","str(int(x[i-3][j])+int(x[i-1][j]))"][i%4]);j+=1

Funkcja, która pobiera dane wejściowe poprzez argument i wypisuje do STDOUT. Podejście to wykorzystuje fakt, że dane wyjściowe następują po cyklu czwartym, w postaci „+ wartość = wartość”, dla wszystkich zawodników. Korzystając z licznika modulo cztery, można indeksować listę zawierającą pożądaną wartość dla każdego kroku jako łańcucha, a wynik oceniać za pomocą funkcji evalu Pythona.

Jak to działa

from random import*                       Import Python's random module to access the
                                          randint function
def f(n,t):                               Function with input number of racers n and target
                                          number t
x='0'*n,;i=j=0;y=''                       Initialise return tuple storage x, state number
                                          i, racer number j and append string y for x
while' '*n!=x[i]:                         Loop through all j for some i. If the current
                                          state consists only of spaces, all racers have
                                          finished, so stop
y+=...eval([...][i%4])...                 Index into list, using i mod 4, to find the
                                          desired process for the cycle step, and append to
                                          y
(If first step of cycle)
...+...                                   Plus sign
(If second step of cycle)
...str(randint(0,1))...                   Random number from (0,1)
(If third step of cycle)
...=...                                   Equals sign
(If fourth step of cycle)
...str(int(x[i-3][j])+int(x[i-1][j]))...  Addition of random number to previous racer
                                          'score'
...' 'if x[i][j]in(' ',str(t))...         But append space if the racer has previously
                                          finished, or has reached the target
...j+=1                                   Increment j
if j==n:j=0;x+=y,;y='';print(x[i]);i+=1   If j=n, all j must have been looped through.
                                          Reset j, append new state y to x, reset y, print
                                          current state to STDOUT and increment i. When
                                          this first executes, x contains only the initial
                                          state, meaning that this is printed and the cycle
                                          starts with the second state.

Wypróbuj na Ideone

Python 2 , 191 bajtów

from random import*
def c(p,w,r=[],l=0):
 while p:
	p-=1;s='0'
	while`w`>s[-1]:s+="+%s="%randint(0,1);s+=`eval(s[-4:-1])`;l+=2
	r+=[s]
 for z in map("".join,zip(*(t+l*' 'for t in r))):print z

Wypróbuj online!

Python 3 , 200 bajtów

from random import*
def c(p,w,r=[],l=0):
 while p:
  p-=1;s='0'
  while str(w)>s[-1]:s+="+%s"%randint(0,1);s+="=%s"%eval(s[-3:]);l+=2
  r+=[s]
 for z in map("".join,zip(*(t+l*' 'for t in r))):print(z)

Wypróbuj online!

Python 2, 278 bajtów

import random
r=5
w=2
s=(0,)*r
while s.count(w)<len(s):
    print ''.join(map(lambda a:str(a),s))+"\n"+'+'*len(s)
    s = tuple(map(lambda x: x<w and x+random.randrange(2) or x,s))
    print ''.join(map(lambda a:str(a), s))+"\n"+'='*len(s)
    s = tuple([x for x in s if x!= w])

gdzie r jest nie. zawodników, a w jest wynikiem do wygrania

Wypróbuj tutaj!

Perl 5 , 150 bajtów

$,=$";say@n=(0)x(@e=('=')x(@p=('+')x<>));$t=<>;while(grep$_<$t,@n){@r=map{$_+=($g=0|rand 2);$g}@n;for$l(p,r,e,n){say map{$n[$_]>$t?$":$$l[$_]}0..$#n}}

Wypróbuj online!

Pierwszy wkład to liczba zawodników, drugi to wynik.