問題 #3 - 回答 #51

Brainf*ck

Brainf*ck を実装してください。標準入力から Brainf*ck のソースコードが渡されます。Brainf*ck の仕様のうち、入力命令である「,」は未実装で構いません。 一部明確に挙動が定められていない部分については、以下の仕様とします。 メモリの各セルは 8 bit の符号なし整数です。今回の入力でオーバーフローは発生しません。 メモリのアドレスは非負整数です。今回の入力で負のアドレスへポインタを動かすことはありません。 Brainf*ck に存在する命令以外の文字を受け取った場合は無視してください。 今回の入力に不正なプログラムは含まれません。すなわち、「[」と「]」は必ず釣り合っています。

回答 #51

hanhan1978 が 2024-03-08 16:14:59 に投稿

コード

867 byte

$s = stream_get_contents(STDIN);
$pc = 0;
$m = [];
$p = 0;

while ($pc < strlen($s)) {
  switch ($s[$pc]) {
  case '>':
    $p++;
    break;
  case '<':
    $p--;
    break;
  case '+':
    $m[$p] = isset($m[$p]) ? ++$m[$p] : 0;
    break;
  case '-':
    if (!isset($m[$p])) {
      $m[$p] = 0;
    }
    $m[$p]--;
    break;
  case '.':
    echo chr($m[$p]);
    break;
  case '[':
    if (!isset($m[$p]) || $m[$p] === 0) {
      $d = 1;
      while ($d > 0) {
        $pc++;
        if ($s[$pc] === '[') {
          $d++;
        } elseif ($s[$pc] === ']') {
          $d--;
        }
      }
    }
    break;
  case ']':
    if (isset($m[$p]) && $m[$p] !== 0) {
      $d = 1;
      while ($d > 0) {
        $pc--;
        if ($s[$pc] === ']') {
          $d++;
        } elseif ($s[$pc] === '[') {
          $d--;
        }
      }
    }
    break;
  }
  $pc++;
}

実行結果

Time Limit Exceeded: 10000 msec

OGOdqJ`hfh1/13

�t��u��t��u��u��u�͜��t�