以下の練習問題を解け.授業中に動作確認を行う.
#!/usr/bin/perl -w my @a; chomp($a[0] = <STDIN>); chomp($a[1] = <STDIN>); chomp($a[2] = <STDIN>); chomp($a[3] = <STDIN>); chomp($a[4] = <STDIN>); (ここに出力部分を書き加える)
[入力例] 5 2 8 3 6 [出力例] 5 2 8 3 6
#!/usr/bin/perl -w my $i; my @a; for ($i = 0 ; $i < 5 ; $i++){ chomp($a[$i] = <STDIN>); } (ここに出力部分を書き加える)