5人の点数を読み込んで合計点と平均点を表示

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

5人の点数を読み込んで合計点と平均点を表示

C


#include <stdio.h>
int main(int argc, char* argv[])
{
int score1;
int score2;
int score3;
int score4;
int score5;
int sum = 0;

puts("点数を入力してください。");

printf("1番:");
scanf("%d", &score1);

printf("2番:");
scanf("%d", &score2);

printf("3番:");
scanf("%d", &score3);

printf("4番:");
scanf("%d", &score4);

printf("5番:");
scanf("%d", &score5);

sum += score1;
sum += score2;
sum += score3;
sum += score4;
sum += score5;

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

return 0;
}

実行結果


R:\>lesson029\project1.exe
点数を入力してください。
1番:95
2番:83
3番:85
4番:63
5番:89
合計点415
平均点83.000000

Delphi


program Project1;

{$APPTYPE CONSOLE}

uses
SysUtils;
var
score1, score2, score3, score4, score5: Integer;
sum: Integer = 0;
begin
writeln('点数を入力してください。');

write('1番:');
read(score1);

write('2番:');
read(score2);

write('3番:');
read(score3);

write('4番:');
read(score4);

write('5番:');
read(score5);

sum := sum + score1;
sum := sum + score2;
sum := sum + score3;
sum := sum + score4;
sum := sum + score5;

writeln(format('合計点%d', [sum]));
writeln(format('平均点%.6f', [sum / 5.0]));
end.

実行結果


S:\>lesson029\project1.exe
点数を入力してください。
1番:95
2番:83
3番:85
4番:63
5番:89
合計点415
平均点83.000000

Perl
print "点数を入力してください。\n";
print "1番:";
chomp($score1 = <>);

print "2番:";
chomp($score2 = <>);

print "3番:";
chomp($score3 = <>);

print "4番:";
chomp($score4 = <>);

print "5番:";
chomp($score5 = <>);

$sum = 0;
$sum += $score1;
$sum += $score2;
$sum += $score3;
$sum += $score4;
$sum += $score5;

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

実行結果

L:\>perl lesson_05_029.pl
点数を入力してください。
1番:95
2番:83
3番:85
4番:63
5番:89
合計点415
平均点83.000000

Ruby
puts "点数を入力してください。"
print "1番:"
score1 = STDIN.gets.chomp.to_i

print "2番:"
score2 = STDIN.gets.chomp.to_i

print "3番:"
score3 = STDIN.gets.chomp.to_i

print "4番:"
score4 = STDIN.gets.chomp.to_i

print "5番:"
score5 = STDIN.gets.chomp.to_i

sum = 0
sum += score1
sum += score2
sum += score3
sum += score4
sum += score5

print "合計点#{sum}\n"
printf("平均点%f\n", sum / 5)

実行結果

L:\>ruby l:\lesson_05_029.rb
点数を入力してください。
1番:95
2番:83
3番:85
4番:63
5番:89
合計点415
平均点83.000000