結果

問題 No.400 鏡
ユーザー togaerror
提出日時 2016-09-07 23:51:32
言語 Raku
(rakudo v2024.12)
結果
AC  
実行時間 421 ms / 2,000 ms
コード長 245 bytes
コンパイル時間 487 ms
コンパイル使用メモリ 146,464 KB
実行使用メモリ 136,724 KB
最終ジャッジ日時 2024-11-24 13:28:38
合計ジャッジ時間 6,409 ms
ジャッジサーバーID
(参考情報)
judge5 / judge2
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 4
other AC * 8
権限があれば一括ダウンロードができます
コンパイルメッセージ
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