perlプログラム初心者です。お教えてください。 配列の値を一つずつ$aに代入して計算して一つずつ答えprintしたいです。

補足

すみません。同時に二つの配列からスカラーに各一つずつ代入する場合どうしたらいいでしょうか?

プログラミング | C言語関連17閲覧xmlns="http://www.w3.org/2000/svg">25

ベストアンサー

0

ThanksImg質問者からのお礼コメント

そのとおりですね。初心者なもので失礼しました。 勉強になりました。ありがとうございました。

お礼日時:3/1 0:40

その他の回答(1件)

0

>配列の値を一つずつ$aに代入して計算して一つずつ答えprint こうします @x = (1,2,3,4,5,6); map{$n += $_, print"$n\n"}@x; pwNA5S - Online Perl Interpreter & Debugging Tool - Ideone.com https://ideone.com/pwNA5S また、変数名で$aと$bという安直過ぎる名前は使わない方が良いです

>同時に二つの配列からスカラーに各一つずつ代入 こうします #!/usr/bin/perl use List::MoreUtils qw(zip); @x = (1,2,3,4,5,6); @y = (11, 12, 13, 14, 15, 16); $r = {zip @x, @y}; map{$n += $_*$r->{$_}, print"$n += $_*$r->{$_}\n"}sort keys %$r; 3yGP4C - Online Perl Interpreter & Debugging Tool - Ideone.com https://ideone.com/3yGP4C