From fbd4f2129ce8fe106391302896dd86e05b2f331b Mon Sep 17 00:00:00 2001 From: nsfisis Date: Fri, 5 Dec 2025 04:08:22 +0900 Subject: add files --- archive/q/brainf-ck/a/48/index.html | 142 ++++++++++++++++++++++++++++++++++++ 1 file changed, 142 insertions(+) create mode 100644 archive/q/brainf-ck/a/48/index.html (limited to 'archive/q/brainf-ck/a/48/index.html') diff --git a/archive/q/brainf-ck/a/48/index.html b/archive/q/brainf-ck/a/48/index.html new file mode 100644 index 0000000..b80ce0d --- /dev/null +++ b/archive/q/brainf-ck/a/48/index.html @@ -0,0 +1,142 @@ + + + + + 問題 #3 - 回答 #48 | Albatross.PHP + + + + + +
+ +
+
+

問題 #3 - 回答 #48

+ + +

Brainf*ck

+

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

+

回答 #48

+

+ hanhan1978 が 2024-03-08 16:04:11 に投稿 +

+

コード

+

+ 883 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 '+':
+    if (!isset($m[$p])) {
+      $m[$p] = 0;
+    }
+    $m[$p]++;
+    break;
+  case '-':
+    if ($m[$p]??1) {
+      $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++;
+}
+

実行結果

+
+
+
+ ステータス: 失敗 +
+
+

テストケース 1

+
+ ステータス: 時間制限超過 +
+

標準出力

+
+

標準エラー出力

+
Time Limit Exceeded: 10000 msec
+

テストケース 2

+
+ ステータス: OK +
+

標準出力

+
PHPerKaigi 2024
+
+

標準エラー出力

+

+
+

テストケース 3

+
+ ステータス: 時間制限超過 +
+

標準出力

+
+

標準エラー出力

+
Time Limit Exceeded: 10000 msec
+
+ +
+ + + -- cgit v1.2.3-70-g09d2