結果

問題 No.316 もっと刺激的なFizzBuzzをください
ユーザー %20
提出日時 2017-03-04 23:55:30
言語 Raku
(rakudo v2024.12)
結果
RE  
実行時間 -
コード長 159 bytes
コンパイル時間 507 ms
コンパイル使用メモリ 140,244 KB
実行使用メモリ 147,896 KB
最終ジャッジ日時 2024-11-24 13:37:45
合計ジャッジ時間 16,617 ms
ジャッジサーバーID
(参考情報)
judge1 / judge2
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample RE * 4
other RE * 33
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #

my ($N,$a,$b,$c)=get,split(' ',get);
say +$N div+$a+ +$N div+$b+ +$N div+$c
	-+$N div($a lcm$b)-+$N div($b lcm$c)-+$N div($c lcm$a)
	+ +$N div($a lcm$b lcm$c)
0