nex********

2021/2/28 16:20

22回答

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

perlプログラム初心者です。お教えてください。 配列の値を一つずつ＄aに代入して計算して一つずつ答えprintしたいです。 どんなに書いたらいいでしょうか？

補足

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

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

ベストアンサー

0

tre********

2021/2/28 17:13

https://www.javadrive.jp/perl/for/index5.html

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

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

お礼日時：3/1 0:40

その他の回答（1件）

0

prwss

2021/2/28 17:13

>配列の値を一つずつ＄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という安直過ぎる名前は使わない方が良いです

prwss

2021/2/28 20:17

>同時に二つの配列からスカラーに各一つずつ代入 こうします #!/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