結果

問題 No.3022 縛りFizzBuzz (Easy)
ユーザー tails
提出日時 2017-03-31 22:31:17
言語 Perl
(5.16.3)
結果
AC  
実行時間 4 ms
コード長 91 Byte
コンパイル時間 355 ms
使用メモリ 2,076 KB
最終ジャッジ日時 2019-02-10 20:43:58

テストケース

テストケース表示
入力 結果 実行時間
使用メモリ
1.txt AC 3 ms
2,076 KB
2.txt AC 3 ms
2,076 KB
3.txt AC 3 ms
2,076 KB
4.txt AC 4 ms
2,076 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