配列 @in=(10,20,30,40) がある、各項目を $n 倍するプログラムを作っていますが、
$n 倍出来ません。
以下、プログラムです。
#!/usr/bin/perl
@in=(10,20,30,40) ;
print"@inを";
print"何倍しますか?:";
chomp($n=<>);
foreach $ni_tall (@in) {
$n *= $ni_tall;
}
$ave = $n * @in;
print "結果: $ave\n";
print "結果: $ni_tall\n";
print "結果: $n\n";
print "結果: @in\n";
___実行結果___
10,20,30,40を何倍しますか?:7
結果:6720000
結果:
結果: 1680000
結果: 10 20 30 40
となってしまいます。
例えば、
:2
結果:20,40,60,80
としたいのですが、
分かりません。
分かる方いましたら、教えて頂けると助かります。
よろしくお願いします。
No.2
- 回答日時:
こんばんは
10行目
$n *= $ni_tall;
を
$ni_tall *= $n;
にかえてみましょうか
No.4ベストアンサー
- 回答日時:
> print "@inを";
ダブルクォートでくくると配列の値が展開されるので、
シングルクォートでくくるか、エスケープしましょう。
$ni_tallは、foreachブロック内でのみ有効な変数になります。
foreachブロック終了と同時に、なくなります(printしても何も表示されません)。
> $n *= $ni_tall;
これは、変数$nに数値を代入することになります。
略さず書くと、 $n = $n * $ni_tall;
最終的に、$n = 7*10*20*40の値(1680000)が入ります。
> $ave = $n * @in;
これは、$ave = 1680000 × 4(配列の個数)となります。
Perlは色々な書き方がありますので、以下のようにも書けます。
ご参考までにどうぞ。
my @in = qw(10 20 30 40);
print '@inを何倍しますか?:';
chomp(my $n=<>);
map { $_ *= $n } @in;
print "結果:", join(',', @in);
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(プログラミング・Web制作) pythonのmap、結果の利用は1度だけ? 5 2022/06/11 12:33
- その他(プログラミング・Web制作) パイソンのプログラムで continue と passの違い 3 2022/03/25 07:38
- その他(プログラミング・Web制作) pythonのWebスクレイピングでfind_allだとurlがNoneに 4 2022/04/17 18:21
- その他(プログラミング・Web制作) listへのappendが出来ない件 1 2022/12/06 21:44
- その他(プログラミング・Web制作) python 3.10で 同じlistに同じ構文で同じデータ代入した結果が異なる現象発生 7 2022/06/18 11:08
- その他(プログラミング・Web制作) pythonのプログラムについての質問です。 1 2023/05/26 10:31
- その他(プログラミング・Web制作) どうしてもエラーが解決できません。 1 2022/07/23 04:32
- その他(プログラミング・Web制作) pythonリストの特定の値を表示htmlで表示できない 2 2022/05/14 05:48
- その他(プログラミング・Web制作) pandasでまとめてインデックスを削除するにはどうすればいいですか? たとえば、以下のプログラムで 1 2022/07/31 23:09
- Excel(エクセル) PHPプログラムをエクセルに張り付けると検索ボックスがでてくる! 3 2022/05/08 07:10
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Pythonでターミナルに文字を出...
-
パイソンのクラスについて
-
int(input("○○"))の使い方
-
小数点付きの余分な桁を消すには
-
コーディングについて
-
PythonでUTF8の文字列をリスト...
-
$(ドル)の記号を表示したいの...
-
チェックボックスのCGIへの値の...
-
favicon.ico
-
I2C接続のLCDディスプレイを使う
-
Perlの例文でif($a==1&&$b==5&&...
-
Adafruit LIS3DH 3軸加速度セン...
-
perl言語について
-
m//gとm//gcの違い
-
16進の10進変換について
-
CLispのloop内の挙動について
-
Application.ScreenUpdating = ...
-
パイソンのクラスについて
-
どちのほうがすきですか?
-
パイソンのクラスのブログラム
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
16進の10進変換について
-
Pythonでターミナルに文字を出...
-
シェルスクリプトで、空白(ス...
-
【至急!!!】python言語で本を見...
-
pythonで演算子を変数に代入す...
-
c言語 16進数の2進数への変換
-
パイソンのクラスについて
-
I2C接続のLCDディスプレイを使う
-
関数「exists」と「defined」の...
-
pythonの*
-
変数の中は文字列か数値か調べ...
-
数値かどうかの判定方法
-
python print文のエラー
-
int(input("○○"))の使い方
-
Perlの例文でif($a==1&&$b==5&&...
-
awkの正規表現での最左最短マッ...
-
Use of uninitialized value ---
-
CGIでimgタグでalignを使うとエ...
-
swift 文字コードから文字に変...
-
javaのパッケージ構成で各パッ...
おすすめ情報