結果

問題 No.3022 縛りFizzBuzz (Easy)
ユーザー tails
提出日時 2017-03-31 22:31:17
言語 Perl
(5.16.3)
結果
AC  
実行時間 4 ms
コード長 91 Byte
コンパイル時間 680 ms
使用メモリ 6,872 KB
最終ジャッジ日時 2018-12-04 13:28:28

テストケース

テストケース表示
入力 結果 実行時間
使用メモリ
1.txt AC 4 ms
6,872 KB
2.txt AC 2 ms
6,868 KB
3.txt AC 4 ms
6,868 KB
4.txt AC 4 ms
6,868 KB
テストケース一括ダウンロード
コンパイルメッセージ
Unquoted string "a" may clash with future reserved word at Main.pl line 1.
Unquoted string "a" may clash with future reserved word at Main.pl line 2.
Unquoted string "a" may clash with future reserved word at Main.pl line 2.
Unquoted string "a" may clash with future reserved word at Main.pl line 2.
Unquoted string "a" may clash with future reserved word at Main.pl line 3.
Unquoted string "a" may clash with future reserved word at Main.pl line 3.
Unquoted string "a" may clash with future reserved word at Main.pl line 3.
Unquoted string "a" may clash with future reserved word at Main.pl line 3.
Unquoted string "a" may clash with future reserved word at Main.pl line 3.
Operator or semicolon missing before &Fizz at Main.pl line 4.
Ambiguous use of & resolved as operator & at Main.pl line 4.
Operator or semicolon missing before &Buzz at Main.pl line 4.
Ambiguous use of & resolved as operator & at Main.pl line 4.
Main.pl syntax OK

ソースコード

diff #
@a=(a);
@b=(a,a,a);
@c=(a,a,a,a,a);
print+(!($_%@b)&&Fizz).(!($_%@c)&&Buzz)||$_,$/for@a..<>
0