配列の要素に値を読み込む

明解Ｃ言語 入門編 > 5. 配列 >

配列の要素に値を読み込む

Perl

$sum = 0;

print "点数を入力してください。\n";

for (0..4)
{
    printf("%d番：", $_ + 1);
    chomp($score[$_] = <>);
    $sum += $score[$_];
}

printf("合計点%d\n", $sum);
printf("平均点%f\n", $sum / 5);

実行結果

L:\>perl lesson_05_034.pl

点数を入力してください。

1番：17

2番：38

3番：52

4番：41

5番：63

合計点211

平均点42.200000