結果

問題 No.405 ローマ数字の腕時計
ユーザー togaerror
提出日時 2016-09-08 01:22:57
言語 Raku
(rakudo v2024.12)
結果
AC  
実行時間 418 ms / 2,000 ms
コード長 293 bytes
コンパイル時間 2,664 ms
コンパイル使用メモリ 140,948 KB
実行使用メモリ 148,496 KB
最終ジャッジ日時 2024-07-06 19:05:42
合計ジャッジ時間 14,952 ms
ジャッジサーバーID
(参考情報)
judge4 / judge5
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
other AC * 27
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #

use v6;
my ($s, $t) = get().chomp.split(' ');
my @arr = ("I", "II", "III", "IIII", "V", "VI", "VII", "VIII", "IX", "X", "XI", "XII");

loop (my $i = 0; $i < 12; $i++) {
       	if (@arr[$i] eq $s) {
       		$i += $t;
       		$i %= 12;
       		say @arr[$i];
       		last;
       	}
}

exit;
0