結果

問題 No.400 鏡
ユーザー togaerrortogaerror
提出日時 2016-09-07 23:51:32
言語 Raku
(rakudo v2024.02)
結果
AC  
実行時間 440 ms / 2,000 ms
コード長 245 bytes
コンパイル時間 517 ms
コンパイル使用メモリ 133,300 KB
実行使用メモリ 134,612 KB
最終ジャッジ日時 2023-08-16 03:48:50
合計ジャッジ時間 6,651 ms
ジャッジサーバーID
(参考情報)
judge13 / judge15
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 385 ms
134,548 KB
testcase_01 AC 388 ms
134,152 KB
testcase_02 AC 389 ms
134,344 KB
testcase_03 AC 378 ms
134,384 KB
testcase_04 AC 382 ms
134,404 KB
testcase_05 AC 376 ms
134,312 KB
testcase_06 AC 440 ms
134,216 KB
testcase_07 AC 376 ms
134,612 KB
testcase_08 AC 382 ms
134,492 KB
testcase_09 AC 380 ms
132,320 KB
testcase_10 AC 381 ms
132,532 KB
testcase_11 AC 382 ms
134,584 KB
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #

use v6;
my @s = get().chomp.split('');
@s = @s.splice(1, @s.elems - 2);
@s = @s.reverse;
loop (my $i = 0; $i < @s.elems; $i++) {
       	if (@s[$i] eq "<") {
       		print ">";
       	} else {
       		print "<";
       	}
}
print "\n";

exit;
0