17

Quem não ama absolutamente permutações, certo? Eu sei, eles são incríveis - muito divertidos!

Bem, por que não aproveitar essa diversão e torná-la mais divertida ?

Aqui está o desafio:

Dada uma entrada na forma exata:, nPronde né o conjunto retirado e ro número de seleções desse conjunto ( ne rsão inteiros), gera / retorna o número exato de permutações. Para aqueles que estão um pouco enferrujados com a terminologia: Permutação, def. 2a .

No entanto, é aqui que o desafio entra em jogo (o que não é muito fácil):

Você não pode usar nenhuma biblioteca, estrutura ou método interno para sua função de permutação. Você não pode usar um método fatorial, um método de permutação ou qualquer coisa do tipo; você deve escrever tudo sozinho.

Se mais esclarecimentos forem necessários, não hesite em me informar nos comentários e eu agirei prontamente.

Aqui está um exemplo de E / S:

A função de amostra é permute(String) -> int

Entrada:

permute("3P2")

Resultado:

Isso é código-golfe, então o código mais curto vence!

code-golf math permutations

— Daniel
fonte

2

Aww. Eu pensei que esse desafio seria em grupos de permutação . Coisas legais. Isso também é legal e está intimamente relacionado aos grupos de permutação. Ame o desafio.

— 7267 Justin

Quando você diz que não tem métodos internos ou de biblioteca, quer dizer permutações ou qualquer coisa? Posso usar o built-in splitpara dividir a entrada no P? Que tal uma função que converte uma string em um número?

— Xnor

3

As respostas de maio assumem isso 0 <= r <= n?

— Peter Taylor

11

@Dopapp Você quer dizer que r não é maior que n ?

— Dennis

11

@RetoKoradi - Suponho que, em um esforço para não forçar a maioria dos pôsteres a refazer suas respostas, você não tenha permissão para usar métodos / funções de fatorial ou de permutação.

— Daniel

4

CJam, 15 14 bytes

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

Experimente online no intérprete CJam .

Como funciona

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 bytes

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

Contando o shebang como 4, a entrada é obtida de stdin.

Uso da amostra

$ echo 3P2 | perl npr.pl
6

$ echo 7P4 | perl npr.pl
840

— primo
fonte

Que tipo de opção é l61?

— precisa saber é

@feersum define $\para 1(char 49, octal 61).

— Primo

3

Haskell, 71 66 bytes

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

Coisas bem simples: divida no 'P' e depois leve o produto entre (n-k + 1) e n.

Graças a nimi por sua idéia de usar protetores de padrões em vez de uma wherecláusula, ele cortou 5 bytes.

— arjanen
fonte

2

Minkolang 0.11 , 13 25 19 bytes

Obrigado ao Sp3000 por sugerir isso!

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

Experimente aqui.

Explicação

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

Isso usa o mesmo algoritmo que o de Alex: n P k= n(n-1)(n-2)...(n-k+1).

— El'endia Starman
fonte

2

Julia, 63 58 48 bytes

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

Isso cria uma função sem nome que aceita uma sequência e retorna um número inteiro. Para chamá-lo, dê um nome, por exemplo 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

Isso usa o fato de que o número de permutações é n ( n -1) ( n -2) ... ( n - k +1).

Economizou 10 bytes graças a Glen O!

— Alex A.
fonte

Não há necessidade Int, então você pode apenas usar map(parse,...).

— Glen O

@GlenO Minha mente está explodida. Eu não percebi que Intera necessário nessa situação. Muito obrigado!

— Alex A.

2

Utilitários Bash + Linux, 33

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

jotproduz a sequência de rnúmeros inteiros começando em n-r+1e os separa com *. Essa expressão é canalizada bcpara avaliação aritmética.

— Trauma Digital
fonte

1

MATLAB, 54 bytes

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

Tentou diminuí-lo, mas uma das coisas nas quais o MATLAB é realmente ruim é obter entradas. São necessários 32 caracteres apenas para obter os dois números da string de entrada!

Código bastante auto-explicativo. Obtenha a entrada no formato em %dP%dque% d é um número inteiro. Divida isso em ne r. Em seguida, exiba o produto de cada número inteiro no intervalo n-r+1até n. Curiosamente, isso funciona mesmo para xP0fornecer a resposta correta de 1. Isso ocorre porque no MATLAB a prod()função retorna 1 se você tentar fazer o produto de uma matriz vazia. Sempre que rfor zero, o intervalo será um array vazio; portanto, o bingo recebe 1.

Isso também funciona perfeitamente com o Octave também. Você pode experimentá-lo online aqui .

— Tom Carpenter
fonte

1

Javascript, 59 57 bytes

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

— Naouak
fonte

1

Java (594 - bytes)

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 bytes

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

Uma função anônima. Exemplo:

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

Explicação:

       (  ;._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.

A função stope que usei pode ser contada como um built-in ... Ela fica em algum lugar entre a generalidade do operador de multiplicação e a especificidade do operador fatorial.

— Lynn
fonte

1

APL, 23

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

Pega a string como argumento. Explicação:

              ⍵⊂⍨⍵≠'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

Qual APL é esse? Eu recebo um erro com minha cópia do Dyalog.

— lirtosiast

11

@ThomasKwa Use ⎕ML←3no 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

Bem direto. Processa a entrada do número como a,b. Mantém um produto em execução como P, multiplicado pelos primeiros btermos de a, a-1, a-2, ....

— xnor
fonte

2

Não vejo como input()não resultou em erro.

— precisa saber é

@feersum Eu tentei e realmente lança um erro de sintaxe.

— Alex A.

Eu estava usando entradas com aspas como "3P2", o que eu acho que geralmente é permitido, mas aqui o desafio diz "uma entrada na forma exata", então eu a altero para uma função que usa uma string.

— Xnor

1

TI-BASIC, 52 bytes

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

O TI-BASIC possui uma função "produto de uma lista", portanto, contornar a restrição de componentes internos não é muito difícil. No entanto, o TI-BASIC não suporta listas vazias - portanto, precisamos

Para extrair os dois números, extraio o primeiro número como uma substring. Isso é caro ; ocupa toda a segunda linha. Para não precisar fazer isso novamente para o segundo número, defino a variável P para esse número e avalio a cadeia inteira usando expr(, depois divido por P².

Finalmente, tomo uma permutação aleatória da lista entre os dois números (tomando o cuidado de adicionar um ao segundo número) e pego o produto.

— lirtosiast
fonte

1

Ouroboros , 47 45 bytes

Parte disso é muito feia - eu imagino que poderia ser ainda mais jogado.

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

Cada linha de código em Ouroboros representa uma cobra comendo seu rabo.

Cobra 1

Smuda para a pilha compartilhada. r.rlê um número, duplica e lê outro. (Caracteres não numéricos como Psão ignorados.) -Subtrai os dois. Se a entrada foi 7P2, agora temos 7, 5na pilha compartilhada. Finalmente, 1(come o caráter final da cobra. Como esse é o personagem em que o ponteiro de instrução está, a cobra morre.

Cobra 2

)snão faz nada na primeira vez. .!+duplica a parte superior da pilha do snake 2, verifica se é zero e, se sim, adiciona 1. Na primeira iteração, a pilha está vazia e tratada como se contivesse zeros infinitos 1; nas iterações posteriores, a pilha contém um valor diferente de zero e isso não tem efeito.

Em seguida, Salterna para a pilha compartilhada, onde temos o número ne um contador para calcular o produto. 1+incrementa o contador. .@@.@\<!duplica os números e empurra 1 se nainda for maior ou igual ao contador, 0 caso contrário. @@*Ydepois multiplica o contador por essa quantidade e puxa uma cópia para a pilha da cobra 2.

s.!+volta para a pilha do snake 2 e usa o mesmo código anterior para converter o número superior em 1 se fosse 0 e mantê-lo da mesma forma. Em seguida, *multiplica o resultado pelo produto parcial que estava na pilha.

Agora voltamos à pilha compartilhada ( S), duplicamos o contador-ou-zero ( .) e o negamos duas vezes ( !!) para transformar um contador diferente de zero em um 1. 4*.(multiplica isso por 4, duplica e consome muitos caracteres do fim da cobra.

Se não alcançamos a condição de parada, temos um 4 na pilha. Os quatro caracteres após o (são comidos e os loops de controle ficam no início do código. Aqui )regurgita quatro caracteres, svolta para a pilha de snake 2 e a execução continua.
Se o contador passou n, temos um 0 na pilha e nada é comido. snmuda para a pilha da cobra 2 e gera o valor superior como um número; então 1(come o último caractere e morre.

O resultado é que o produto (r+1)*(r+2)*...*né calculado e produzido.

Experimente

Mostrar snippet de código

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

Expandir snippet

— DLosc
fonte

Diversão com permutações