AOJ
AOJ(会津オンラインジャッジ)には、 Perlで問題提出ができないということで、 ここに解答を書いていきます。Hello World[Problem 10000] print "Hello World\n"; XCubic[Problem 10001] print ((<STDIN>**3)."\n"); Rectangle[Problem 10002] <STDIN> =~ /(\d) *(\d)/g; my</stdin></stdin>…
AOJ(会津オンラインジャッジ)には、 Perlで問題提出ができないということで、 ここに解答を書いていきます。Hello World[Problem 10000] print "Hello World\n"; XCubic[Problem 10001] print ((<STDIN>**3)."\n"); Rectangle[Problem 10002] <STDIN> =~ /(\d) *(\d)/g; my</stdin></stdin>…