17

Chi non ama assolutamente le permutazioni, giusto? Lo so, sono fantastici - molto divertenti!

Bene, perché non prendere questo divertimento e renderlo più divertente ?

Ecco la sfida:

Dato un input nella forma esatta:, da nPrdove nviene preso il pool ed rè il numero di selezioni da quel pool ( ne rsono numeri interi), output / restituisce il numero esatto di permutazioni. Per quelli di voi che sono un po 'arrugginiti con la terminologia: permutazione, def. 2a .

Tuttavia, è qui che entra in gioco la sfida (non è troppo facile):

Non è possibile utilizzare alcuna libreria, framework o metodo integrato per la funzione di permutazione. Non è possibile utilizzare un metodo fattoriale, un metodo di permutazione o qualcosa del genere; devi scrivere tutto da solo.

Se sono necessari ulteriori chiarimenti, per favore, non esitate a dirmelo nei commenti e agirò prontamente di conseguenza.

Ecco un esempio di I / O:

La funzione di esempio è permute(String) -> int

Ingresso:

permute("3P2")

Produzione:

Questo è code-golf, quindi vince il codice più corto!

code-golf math permutations

— Daniel
fonte

2

Aww. Ho pensato che questa sfida sarebbe stata per i gruppi di permutazione . Roba forte. Anche questo è interessante e strettamente correlato ai gruppi di permutazione. Adoro la sfida.

— Justin

Quando dici nessun metodo incorporato o libreria, intendi per permutazioni o per qualcosa? Posso usare il built-in splitper dividere l'ingresso in P? Che dire di una funzione che converte una stringa in un numero?

— xnor

3

Le risposte possono supporre che 0 <= r <= n?

— Peter Taylor,

1

@Dopapp Vuoi dire che r non è maggiore di n ?

— Dennis,

1

@RetoKoradi - Suppongo che nel tentativo di non forzare la maggior parte dei poster a rifare le loro risposte, non ti è permesso usare metodi / funzioni fattoriali o di permutazione.

— Daniel,

4

CJam, 15 14 byte

r~\;~\),>UXt:*

Provalo online nell'interprete CJam .

Come funziona

r              e# Read a token ("nPr") from STDIN.
 ~             e# Evaluate. This pushes the numbers n, Pi and r on the stack.
  \;           e# Discard Pi.
    ~          e# Take the bitwise NOT of r. Pushes -(r+1).
     \)        e# Increment n.    
       ,       e# Turn n+1 into [0 ... n].
        >      e# Keep only the last r+1 elements.
         UXt   e# Replace the first element with 1.
               e# This avoid dealing with the egde case nP0 separately.
            :* e# Compute their product.

— Dennis
fonte

4

Perl, 27 byte

#!perl -pl61
$\*=$`-$%++for/P/..$'}{

Contando lo shebang come 4, l'input viene preso dallo stdin.

Esempio di utilizzo

$ echo 3P2 | perl npr.pl
6

$ echo 7P4 | perl npr.pl
840

— Primo
fonte

Che tipo di opzione è l61?

— feersum

@feersum è impostato $\su 1(carattere 49, ottale 61).

— primo

3

Haskell, 71 66 byte

p s|(u,_:x)<-span(/='P')s,(n,k)<-(read u,read x)=product[n-k+1..n]

Roba piuttosto semplice: dividere in 'P' quindi prendere il prodotto tra (n-k + 1) e n.

Grazie a nimi per la loro idea di usare protezioni di motivi piuttosto che una whereclausola, si è rasato 5 byte.

— arjanen
fonte

2

Minkolang 0,11 , 13 25 19 byte

Grazie a Sp3000 per avermi suggerito questo!

1nnd3&1N.[d1-]x$*N.

Provalo qui.

Spiegazione

1        Push 1
n        Take integer from input (say, n)
n        Take integer from input (say, k); ignores non-numeric characters in the way
d3&1N.   Output 1 if k is 0
[   ]    Loop k times
 d1-     Duplicate top of stack and subtract 1
x        Dump top of stack
$*       Multiply all of it together
N.       Output as integer

Questo utilizza lo stesso algoritmo di Alex: n P k= n(n-1)(n-2)...(n-k+1).

— El'endia Starman
fonte

2

Julia, 63 58 48 byte

s->((n,r)=map(parse,split(s,"P"));prod(n-r+1:n))

Ciò crea una funzione senza nome che accetta una stringa e restituisce un numero intero. Per chiamarlo, dagli un nome, ad es f=s->....

Ungolfed:

function f(s::AbstractString)
    # Get the pool and number of selections as integers
    n, r = map(parse, split(s, "P"))

    # Return the product of each number between n-r+1 and n
    return prod(n-r+1:n)
end

Questo utilizza il fatto che il numero di permutazioni è n ( n -1) ( n -2) ... ( n - k +1).

Risparmiato 10 byte grazie a Glen O!

— Alex A.
fonte

Non è necessario Int, quindi puoi semplicemente usarlo map(parse,...).

— Glen O

@GlenO La mia mente è stata spazzata via. Non mi ero reso conto che Intera necessario in quella situazione. Grazie mille!

— Alex A.

2

Utilità Bash + Linux, 33

jot -s\* ${1#*P} $[${1/P/-}+1]|bc

jotproduce la sequenza di rnumeri interi che iniziano con n-r+1, e li separa con *. Questa espressione viene convogliata bcper la valutazione aritmetica.

— Trauma digitale
fonte

1

MATLAB, 54 byte

[n,r]=strread(input(''),'%dP%d');disp(prod((n-r+1):n))

Ho cercato di renderlo più piccolo, ma una delle cose in cui MATLAB è davvero pessima è ottenere input. Ci vogliono 32 caratteri solo per ottenere i due numeri dalla stringa di input!

Codice abbastanza autoesplicativo. Ottieni l'input nel modulo in %dP%dcui% d è un numero intero. Dividilo in ne r. Quindi visualizzare il prodotto di ogni numero intero nell'intervallo n-r+1a n. È interessante notare che funziona anche per xP0dare la risposta corretta di 1. Questo perché in MATLAB la prod()funzione restituisce 1 se si tenta di eseguire il prodotto di un array vuoto. Ogni volta che rè zero, l'intervallo sarà un array vuoto, quindi il bingo otteniamo 1.

Funziona perfettamente anche con Octave . Puoi provarlo online qui .

— Tom Carpenter
fonte

1

Javascript, 59 57 byte

s=>(f=(n,k)=>k?(n- --k)*f(n,k):1,f.apply(f,s.split('P')))

— Naouak
fonte

1

Java (594 - byte)

import java.util.*;import java.lang.*;public class Perm {private String a;private static int[] nr=new int[2];private static int sum=1;Scanner in=new Scanner(System.in);public String input(){a=in.nextLine();return a;}public void converter(String a){this.a=a;String b=a.substring(0,1);String c=a.substring(2);nr[0]=Integer.parseInt(b);nr[1]=Integer.parseInt(c);}public int param(){for(int counter=0; counter < nr[1]; counter++){sum=sum*nr[0]--;}return sum;}public static void main(String args[]){Perm a;a=new Perm();String k=a.input();a.converter(k);int ans=a.param();System.out.println(ans);}}

— Kamalnrf
fonte

1

J, 23 byte

^!._1/@(".;._1)@('P'&,)

Una funzione anonima. Esempio:

   f =. ^!._1/@(".;._1)@('P'&,)
   f '10P4'
5040

Spiegazione:

       (  ;._1)@('P'&,)   Split over 'P', and on each slice,
        ".                read a number.
      @                   Then,
^!._1/                    fold (/) with the built-in "stope function" (^!.k) for k=1.

La funzione stope che ho usato potrebbe rasentare il conteggio come incorporato ... Si basa in qualche modo tra la generalità dell'operatore di moltiplicazione e la specificità dell'operatore fattoriale.

— Lynn
fonte

1

APL, 23

{{×/⍵↑⍳-⍺}/-⍎¨⍵⊂⍨⍵≠'P'}

Prende la stringa come argomento. Spiegazione:

              ⍵⊂⍨⍵≠'P'  ⍝ Split by 'P'.
           -⍎¨          ⍝ Convert to numbers and negate making a vector (−n −r)
 {       }/             ⍝ Reduce it by a defined function, which
      ⍳-⍺               ⍝ makes a vector of numbers from 1 to n (⍺)
    ⍵↑                  ⍝ takes r last elements (⍵←−r)
  ×/                    ⍝ and multiplies them together.

— user46915
fonte

Quale APL è questo? Ottengo un errore con la mia copia di Dyalog.

— lirtosiast,

1

@ThomasKwa Usa ⎕ML←3in Dyalog.

— user46915

1

Python 2, 66

def f(s):a,b=map(int,s.split('P'));P=1;exec"P*=a;a-=1;"*b;print P

Abbastanza diretto. Elabora il numero immesso come a,b. Mantiene un prodotto in esecuzione come P, che viene moltiplicato per i primi btermini di a, a-1, a-2, ....

— XNOR
fonte

2

Non vedo come non sia input()stato possibile generare un errore.

— feersum

@feersum L'ho provato e in effetti genera un errore di sintassi.

— Alex A.

Stavo prendendo input con virgolette come "3P2", che penso sia generalmente consentito, ma qui la sfida dice "un input nella forma esatta", quindi lo cambio in una funzione che accetta una stringa.

— xnor

1

TI-BASIC, 52 byte

Ans→Str1
expr(sub(Ans,1,⁻1+inString(Ans,"P→P        ;n
1
If expr(Str1                               ;If n^2*r ≠ 0
prod(randIntNoRep(P,P+1-expr(Str1)/P²
Ans

TI-BASIC ha una funzione "prodotto di un elenco", quindi aggirare la limitazione sui builtin non è troppo difficile. Tuttavia, TI-BASIC non supporta elenchi vuoti, quindi è necessario

Per estrarre i due numeri, estraggo il primo numero come sottostringa. Questo è costoso ; occupa l'intera seconda riga. Per evitare di dover ripetere l'operazione per il secondo numero, ho impostato la variabile P su quel numero e ho valutato l'intera stringa usando expr(, quindi diviso per P².

Infine, prendo una permutazione casuale dell'elenco tra i due numeri (avendo cura di aggiungerne uno al secondo numero) e prendo il prodotto.

— lirtosiast
fonte

1

Ouroboros , 47 45 byte

Alcuni di questi sono piuttosto brutti - immagino che potrebbe essere ulteriormente giocato a golf.

Sr.r-1(
)s.!+S1+.@@.@\<!@@*Ys.!+*S.!!4*.(sn1(

Ogni riga di codice in Ouroboros rappresenta un serpente che si mangia la coda.

Snake 1

Spassa allo stack condiviso. r.rlegge un numero, lo duplica e ne legge un altro. (I caratteri non numerici come Pvengono saltati.) Sottrae -i due. Se l'input era 7P2, ora abbiamo 7, 5nello stack condiviso. Infine, 1(mangia il personaggio finale del serpente. Poiché questo è il personaggio su cui si trova il puntatore dell'istruzione, il serpente muore.

Snake 2

)snon fa nulla la prima volta. .!+duplica la parte superiore dello stack di snake 2, controlla se è zero e in tal caso aggiunge 1. Alla prima iterazione, lo stack è vuoto e trattato come se contenesse zeri infiniti, quindi questo spinge 1; nelle iterazioni successive, lo stack contiene un valore diverso da zero e questo non ha alcun effetto.

Successivamente, Spassa allo stack condiviso, dove abbiamo il numero ne un contatore per il calcolo del prodotto. 1+incrementa il contatore. .@@.@\<!duplica entrambi i numeri e preme 1 se nè ancora maggiore o uguale al contatore, 0 altrimenti. @@*Yquindi moltiplica il segnalino per questa quantità e ne estrae una copia nella pila di Snake 2.

s.!+ritorna allo stack di snake 2 e usa lo stesso codice di prima per convertire il numero superiore in 1 se fosse 0 e mantenerlo lo stesso altrimenti. Quindi *moltiplica il risultato per il prodotto parziale che si trovava su questa pila.

Ora torniamo allo stack condiviso ( S), dupliciamo il contatore-o-zero ( .) e lo neghiamo due volte ( !!) per trasformare un contatore diverso da zero in un 1. 4*.(moltiplica questo per 4, duplica e mangia quel numero di caratteri dal fine del serpente.

Se non abbiamo raggiunto la condizione di arresto, abbiamo un 4 in pila. I quattro caratteri dopo il (segno vengono mangiati e il controllo passa all'inizio del codice. Qui )rigurgita quattro personaggi, sritorna allo stack di Snake 2 e l'esecuzione continua.
Se il contatore è passato n, abbiamo uno 0 in pila e non viene mangiato nulla. snpassa allo stack di snake 2 e genera il valore più alto come numero; poi 1(mangia l'ultimo personaggio e muore.

Il risultato è che il prodotto (r+1)*(r+2)*...*nviene calcolato e prodotto.

Provalo

Mostra snippet di codice

// Define Stack class
function Stack() {
  this.stack = [];
  this.length = 0;
}
Stack.prototype.push = function(item) {
  this.stack.push(item);
  this.length++;
}
Stack.prototype.pop = function() {
  var result = 0;
  if (this.length > 0) {
    result = this.stack.pop();
    this.length--;
  }
  return result;
}
Stack.prototype.top = function() {
  var result = 0;
  if (this.length > 0) {
    result = this.stack[this.length - 1];
  }
  return result;
}
Stack.prototype.toString = function() {
  return "" + this.stack;
}

// Define Snake class
function Snake(code) {
  this.code = code;
  this.length = this.code.length;
  this.ip = 0;
  this.ownStack = new Stack();
  this.currStack = this.ownStack;
  this.alive = true;
  this.wait = 0;
  this.partialString = this.partialNumber = null;
}
Snake.prototype.step = function() {
  if (!this.alive) {
    return null;
  }
  if (this.wait > 0) {
    this.wait--;
    return null;
  }
  var instruction = this.code.charAt(this.ip);
  var output = null;
  console.log("Executing instruction " + instruction);
  if (this.partialString !== null) {
    // We're in the middle of a double-quoted string
    if (instruction == '"') {
      // Close the string and push its character codes in reverse order
      for (var i = this.partialString.length - 1; i >= 0; i--) {
        this.currStack.push(this.partialString.charCodeAt(i));
      }
      this.partialString = null;
    } else {
      this.partialString += instruction;
    }
  } else if (instruction == '"') {
    this.partialString = "";
  } else if ("0" <= instruction && instruction <= "9") {
    if (this.partialNumber !== null) {
      this.partialNumber = this.partialNumber + instruction;  // NB: concatenation!
    } else {
      this.partialNumber = instruction;
    }
    next = this.code.charAt((this.ip + 1) % this.length);
    if (next < "0" || "9" < next) {
      // Next instruction is non-numeric, so end number and push it
      this.currStack.push(+this.partialNumber);
      this.partialNumber = null;
    }
  } else if ("a" <= instruction && instruction <= "f") {
    // a-f push numbers 10 through 15
    var value = instruction.charCodeAt(0) - 87;
    this.currStack.push(value);
  } else if (instruction == "$") {
    // Toggle the current stack
    if (this.currStack === this.ownStack) {
      this.currStack = this.program.sharedStack;
    } else {
      this.currStack = this.ownStack;
    }
  } else if (instruction == "s") {
    this.currStack = this.ownStack;
  } else if (instruction == "S") {
    this.currStack = this.program.sharedStack;
  } else if (instruction == "l") {
    this.currStack.push(this.ownStack.length);
  } else if (instruction == "L") {
    this.currStack.push(this.program.sharedStack.length);
  } else if (instruction == ".") {
    var item = this.currStack.pop();
    this.currStack.push(item);
    this.currStack.push(item);
  } else if (instruction == "m") {
    var item = this.ownStack.pop();
    this.program.sharedStack.push(item);
  } else if (instruction == "M") {
    var item = this.program.sharedStack.pop();
    this.ownStack.push(item);
  } else if (instruction == "y") {
    var item = this.ownStack.top();
    this.program.sharedStack.push(item);
  } else if (instruction == "Y") {
    var item = this.program.sharedStack.top();
    this.ownStack.push(item);
  } else if (instruction == "\\") {
    var top = this.currStack.pop();
    var next = this.currStack.pop()
    this.currStack.push(top);
    this.currStack.push(next);
  } else if (instruction == "@") {
    var c = this.currStack.pop();
    var b = this.currStack.pop();
    var a = this.currStack.pop();
    this.currStack.push(c);
    this.currStack.push(a);
    this.currStack.push(b);
  } else if (instruction == ";") {
    this.currStack.pop();
  } else if (instruction == "+") {
    var b = this.currStack.pop();
    var a = this.currStack.pop();
    this.currStack.push(a + b);
  } else if (instruction == "-") {
    var b = this.currStack.pop();
    var a = this.currStack.pop();
    this.currStack.push(a - b);
  } else if (instruction == "*") {
    var b = this.currStack.pop();
    var a = this.currStack.pop();
    this.currStack.push(a * b);
  } else if (instruction == "/") {
    var b = this.currStack.pop();
    var a = this.currStack.pop();
    this.currStack.push(a / b);
  } else if (instruction == "%") {
    var b = this.currStack.pop();
    var a = this.currStack.pop();
    this.currStack.push(a % b);
  } else if (instruction == "_") {
    this.currStack.push(-this.currStack.pop());
  } else if (instruction == "I") {
    var value = this.currStack.pop();
    if (value < 0) {
      this.currStack.push(Math.ceil(value));
    } else {
      this.currStack.push(Math.floor(value));
    }
  } else if (instruction == ">") {
    var b = this.currStack.pop();
    var a = this.currStack.pop();
    this.currStack.push(+(a > b));
  } else if (instruction == "<") {
    var b = this.currStack.pop();
    var a = this.currStack.pop();
    this.currStack.push(+(a < b));
  } else if (instruction == "=") {
    var b = this.currStack.pop();
    var a = this.currStack.pop();
    this.currStack.push(+(a == b));
  } else if (instruction == "!") {
    this.currStack.push(+ !this.currStack.pop());
  } else if (instruction == "?") {
    this.currStack.push(Math.random());
  } else if (instruction == "n") {
    output = "" + this.currStack.pop();
  } else if (instruction == "o") {
    output = String.fromCharCode(this.currStack.pop());
  } else if (instruction == "r") {
    var input = this.program.io.getNumber();
    this.currStack.push(input);
  } else if (instruction == "i") {
    var input = this.program.io.getChar();
    this.currStack.push(input);
  } else if (instruction == "(") {
    this.length -= Math.floor(this.currStack.pop());
    this.length = Math.max(this.length, 0);
  } else if (instruction == ")") {
    this.length += Math.floor(this.currStack.pop());
    this.length = Math.min(this.length, this.code.length);
  } else if (instruction == "w") {
    this.wait = this.currStack.pop();
  }
  // Any unrecognized character is a no-op
  if (this.ip >= this.length) {
    // We've swallowed the IP, so this snake dies
    this.alive = false;
    this.program.snakesLiving--;
  } else {
    // Increment IP and loop if appropriate
    this.ip = (this.ip + 1) % this.length;
  }
  return output;
}
Snake.prototype.getHighlightedCode = function() {
  var result = "";
  for (var i = 0; i < this.code.length; i++) {
    if (i == this.length) {
      result += '<span class="swallowedCode">';
    }
    if (i == this.ip) {
      if (this.wait > 0) {
        result += '<span class="nextActiveToken">';
      } else {
        result += '<span class="activeToken">';
      }
      result += escapeEntities(this.code.charAt(i)) + '</span>';
    } else {
      result += escapeEntities(this.code.charAt(i));
    }
  }
  if (this.length < this.code.length) {
    result += '</span>';
  }
  return result;
}

// Define Program class
function Program(source, speed, io) {
  this.sharedStack = new Stack();
  this.snakes = source.split(/\r?\n/).map(function(snakeCode) {
    var snake = new Snake(snakeCode);
    snake.program = this;
    snake.sharedStack = this.sharedStack;
    return snake;
  }.bind(this));
  this.snakesLiving = this.snakes.length;
  this.io = io;
  this.speed = speed || 10;
  this.halting = false;
}
Program.prototype.run = function() {
  this.step();
  if (this.snakesLiving) {
    this.timeout = window.setTimeout(this.run.bind(this), 1000 / this.speed);
  }
}
Program.prototype.step = function() {
   for (var s = 0; s < this.snakes.length; s++) {
    var output = this.snakes[s].step();
    if (output) {
      this.io.print(output);
    }
  }
  this.io.displaySource(this.snakes.map(function (snake) {
      return snake.getHighlightedCode();
    }).join("<br>"));
 }
Program.prototype.halt = function() {
  window.clearTimeout(this.timeout);
}

var ioFunctions = {
  print: function (item) {
    var stdout = document.getElementById('stdout');
    stdout.value += "" + item;
  },
  getChar: function () {
    if (inputData) {
      var inputChar = inputData[0];
      inputData = inputData.slice(1);
      result = inputChar.charCodeAt(0);
    } else {
      result = -1;
    }
    var stdinDisplay = document.getElementById('stdin-display');
    stdinDisplay.innerHTML = escapeEntities(inputData);
    return result;
  },
  getNumber: function () {
    while (inputData && (inputData[0] < "0" || "9" < inputData[0])) {
      inputData = inputData.slice(1);
    }
    if (inputData) {
      var inputNumber = inputData.match(/\d+/)[0];
      inputData = inputData.slice(inputNumber.length);
      result = +inputNumber;
    } else {
      result = -1;
    }
    var stdinDisplay = document.getElementById('stdin-display');
    stdinDisplay.innerHTML = escapeEntities(inputData);
    return result;
  },
  displaySource: function (formattedCode) {
    var sourceDisplay = document.getElementById('source-display');
    sourceDisplay.innerHTML = formattedCode;
  }
};
var program = null;
var inputData = null;
function showEditor() {
  var source = document.getElementById('source'),
    sourceDisplayWrapper = document.getElementById('source-display-wrapper'),
    stdin = document.getElementById('stdin'),
    stdinDisplayWrapper = document.getElementById('stdin-display-wrapper');
  
  source.style.display = "block";
  stdin.style.display = "block";
  sourceDisplayWrapper.style.display = "none";
  stdinDisplayWrapper.style.display = "none";
  
  source.focus();
}
function hideEditor() {
  var source = document.getElementById('source'),
    sourceDisplay = document.getElementById('source-display'),
    sourceDisplayWrapper = document.getElementById('source-display-wrapper'),
    stdin = document.getElementById('stdin'),
    stdinDisplay = document.getElementById('stdin-display'),
    stdinDisplayWrapper = document.getElementById('stdin-display-wrapper');
  
  source.style.display = "none";
  stdin.style.display = "none";
  sourceDisplayWrapper.style.display = "block";
  stdinDisplayWrapper.style.display = "block";
  
  var sourceHeight = getComputedStyle(source).height,
    stdinHeight = getComputedStyle(stdin).height;
  sourceDisplayWrapper.style.minHeight = sourceHeight;
  sourceDisplayWrapper.style.maxHeight = sourceHeight;
  stdinDisplayWrapper.style.minHeight = stdinHeight;
  stdinDisplayWrapper.style.maxHeight = stdinHeight;
  sourceDisplay.textContent = source.value;
  stdinDisplay.textContent = stdin.value;
}
function escapeEntities(input) {
  return input.replace(/&/g, '&amp;').replace(/</g, '&lt;').replace(/>/g, '&gt;');
}
function resetProgram() {
  var stdout = document.getElementById('stdout');
  stdout.value = null;
  if (program !== null) {
    program.halt();
  }
  program = null;
  inputData = null;
  showEditor();
}
function initProgram() {
  var source = document.getElementById('source'),
    stepsPerSecond = document.getElementById('steps-per-second'),
    stdin = document.getElementById('stdin');
  program = new Program(source.value, +stepsPerSecond.innerHTML, ioFunctions);
  hideEditor();
  inputData = stdin.value;
}
function runBtnClick() {
  if (program === null || program.snakesLiving == 0) {
    resetProgram();
    initProgram();
  } else {
    program.halt();
    var stepsPerSecond = document.getElementById('steps-per-second');
    program.speed = +stepsPerSecond.innerHTML;
  }
  program.run();
}
function stepBtnClick() {
  if (program === null) {
    initProgram();
  } else {
    program.halt();
  }
  program.step();
}
function sourceDisplayClick() {
  resetProgram();
}
function stdinDisplayClick() {
    resetProgram();
}

.container {
    width: 100%;
}
.so-box {
    font-family:'Helvetica Neue', Arial, sans-serif;
    font-weight: bold;
    color: #fff;
    text-align: center;
    padding: .3em .7em;
    font-size: 1em;
    line-height: 1.1;
    border: 1px solid #c47b07;
    -webkit-box-shadow: 0 2px 2px rgba(0, 0, 0, 0.3), 0 2px 0 rgba(255, 255, 255, 0.15) inset;
    text-shadow: 0 0 2px rgba(0, 0, 0, 0.5);
    background: #f88912;
    box-shadow: 0 2px 2px rgba(0, 0, 0, 0.3), 0 2px 0 rgba(255, 255, 255, 0.15) inset;
}
.control {
    display: inline-block;
    border-radius: 6px;
    float: left;
    margin-right: 25px;
    cursor: pointer;
}
.option {
    padding: 10px 20px;
    margin-right: 25px;
    float: left;
}
h1 {
    text-align: center;
    font-family: Georgia, 'Times New Roman', serif;
}
a {
    text-decoration: none;
}
input, textarea {
    box-sizing: border-box;
}
textarea {
    display: block;
    white-space: pre;
    overflow: auto;
    height: 50px;
    width: 100%;
    max-width: 100%;
    min-height: 25px;
}
span[contenteditable] {
    padding: 2px 6px;
    background: #cc7801;
    color: #fff;
}
#stdout-container, #stdin-container {
    height: auto;
    padding: 6px 0;
}
#reset {
    float: right;
}
#source-display-wrapper , #stdin-display-wrapper{
    display: none;
    width: 100%;
    height: 100%;
    overflow: auto;
    border: 1px solid black;
    box-sizing: border-box;
}
#source-display , #stdin-display{
    font-family: monospace;
    white-space: pre;
    padding: 2px;
}
.activeToken {
    background: #f93;
}
.nextActiveToken {
    background: #bbb;
}
.swallowedCode{
    color: #999;
}
.clearfix:after {
    content:".";
    display: block;
    height: 0;
    clear: both;
    visibility: hidden;
}
.clearfix {
    display: inline-block;
}
* html .clearfix {
    height: 1%;
}
.clearfix {
    display: block;
}

<!--
Designed and written 2015 by D. Loscutoff
Much of the HTML and CSS was taken from this Befunge interpreter by Ingo Bürk: http://codegolf.stackexchange.com/a/40331/16766
-->
<div class="container">
<textarea id="source" placeholder="Enter your program here" wrap="off">Sr.r-s1(
)s.!+S1+.@@.@\<!@@*Ys.!+*S.!!4*.(sn1(</textarea>
<div id="source-display-wrapper" onclick="sourceDisplayClick()"><div id="source-display"></div></div></div><div id="stdin-container" class="container">
<textarea id="stdin" placeholder="Input" wrap="off">3P2</textarea>
<div id="stdin-display-wrapper" onclick="stdinDisplayClick()"><div id="stdin-display"></div></div></div><div id="controls-container" class="container clearfix"><input type="button" id="run" class="control so-box" value="Run" onclick="runBtnClick()" /><input type="button" id="pause" class="control so-box" value="Pause" onclick="program.halt()" /><input type="button" id="step" class="control so-box" value="Step" onclick="stepBtnClick()" /><input type="button" id="reset" class="control so-box" value="Reset" onclick="resetProgram()" /></div><div id="stdout-container" class="container"><textarea id="stdout" placeholder="Output" wrap="off" readonly></textarea></div><div id="options-container" class="container"><div class="option so-box">Steps per Second:
<span id="steps-per-second" contenteditable>20</span></div></div>

Espandi frammento

— DLosc
fonte

Divertimento con permutazioni