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/base32/a/101/index.html | 126 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 126 insertions(+) create mode 100644 archive/q/base32/a/101/index.html (limited to 'archive/q/base32/a/101') diff --git a/archive/q/base32/a/101/index.html b/archive/q/base32/a/101/index.html new file mode 100644 index 0000000..8fd907e --- /dev/null +++ b/archive/q/base32/a/101/index.html @@ -0,0 +1,126 @@ + + + + + 問題 #2 - 回答 #101 | Albatross.PHP + + + + + +
+ +
+
+

問題 #2 - 回答 #101

+ + +

Base32

+

+ RFC 4648 で定義された Base32 エンコーディングを実装してください。 +標準入力から与えられる各行に対し、Base32 エンコードをおこなった文字列を標準出力へ改行区切りで出力してください。 +なお、アルファベットの出力には大文字を用いてください。 +

+

回答 #101

+

+ hanhan1978 が 2024-03-09 01:16:53 に投稿 +

+

コード

+

+ 378 byte +

+
$T=str_split('ABCDEFGHIJKLMNOPQRSTUVWXYZ234567');
+while($l=fgets(STDIN)){
+$l=rtrim($l);
+$z='';
+for($i = 0; $i < strlen($l); $i++){
+  $z .= str_pad(base_convert(strval(ord($l[$i])), 10, 2), 8, '0', 0);
+}
+$b3 = '';
+foreach(str_split($z,5) as $b){
+  $b3 .=$T[base_convert(str_pad($b, 5, '0'), 2, 10)];
+}
+echo $b3 .=str_repeat('=',[8=>6,16=>4,24=>3,32=>1][strlen($z)%40]??0),"\n";
+}
+

実行結果

+
+
+
+ ステータス: OK +
+
+

テストケース 1

+
+ ステータス: OK +
+

標準出力

+
NBXWOZI=
+OBUXS3Y=
+MZ2WOYI=
+
+
+

標準エラー出力

+

+
+

テストケース 2

+
+ ステータス: OK +
+

標準出力

+
4OAYNY4BRPRYFCXDQGX6HAMS
+4OA2VY4BRTRYFCPDQGDOHAMX
+4OBI7Y4BTHRYFCPDQKBOHANB
+
+
+

標準エラー出力

+

+
+

テストケース 3

+
+ ステータス: OK +
+

標準出力

+
GEZDGNBVGY3Q====
+GEZA====
+GEZDGNBVGY3TQOJQ
+GEZDGNBVGY3TQ===
+GEZDG===
+GEZDGNBV
+GEZDGNBVGY3TQOI=
+GEZDGNA=
+GE======
+GEZDGNBVGY======
+
+
+

標準エラー出力

+

+
+

テストケース 4

+
+ ステータス: OK +
+

標準出力

+
MEQGEIDD
+EAQOHAMC4OAYIIHDQGDCBY4BRAQOHAMK
+
+
+

標準エラー出力

+

+
+
+ +
+ + + -- cgit v1.2.3-70-g09d2