home > 写経編 > 柴田望洋『明解C言語 入門編』 > 5. 配列 >

ForNext

Only Do What Only You Can Do

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

VBScript

JScript

Perl

更新日 : 2010.10.18
$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

PHP

更新日 : 2010.11.03
<?php
$fp = fopen("php://stdin", "r");

$sum = 0;

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

for ($i = 0; $i < 5; $i++)
{
    printf("%d番:", $i + 1);
    $score[$i] = rtrim(fgets($fp), "\n\r");
    $sum += $score[$i];
}

fclose($fp);

printf("合計点%d\n", $sum);
printf("平均点%f\n", $sum / 5);
?>
L:\>php lesson_05_034.php
点数を入力してください。
1番:17
2番:38
3番:52
4番:41
5番:63
合計点211
平均点42.200000

Python

更新日 : 2010.11.17
# coding: Shift_JIS

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

score = range(0, 5, 1)
sum   = 0

for i in range(0, 5, 1):
    print "%d番:" % (i + 1), 
    score[i] = int(raw_input())
    sum     += score[i]

print "合計点%d" % sum
print "平均点%f" % (float(sum) / 5)
N:\>python lesson_05_034.py
点数を入力してください。
1番: 17
2番: 38
3番: 52
4番: 41
5番: 63
合計点211
平均点42.200000

Ruby

更新日 : 2010.11.01
score = []
sum = 0

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

for i in 0..4
    printf("%d番:", i + 1)
    score[i] = STDIN.gets.chomp.to_i
    sum += score[i]
end

printf("合計点%d\n", sum)
printf("平均点%f\n", sum.to_f / 5)
L:\>ruby  l:\lesson_05_034.rb
点数を入力してください。
1番:17
2番:38
3番:52
4番:41
5番:63
合計点211
平均点42.200000

PowerShell

Scala

F#

C

更新日 : 2010.10.08
#include <stdio.h>
int main(int argc, char* argv[])
{
    int i;
    int score[5];
    int sum = 0;

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

    for (i = 0; i < 5; i++)
    {
        printf("%d番:", i + 1);
        scanf("%d", &score[i]);
        sum += score[i];
    }

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

    return 0;
}
R:\>lesson034\project1.exe
点数を入力してください。
1番:17
2番:38
3番:52
4番:41
5番:63
合計点211
平均点42.200000

C++

C++Builder

VC++

C#

Java

更新日 : 2010.11.05
import java.util.Scanner;

class Lesson034 {
    public static void main(String[] args) {
        int[] score = new int[5];

        System.out.println("点数を入力してください。");
        Scanner stdIn = new Scanner(System.in);

        int sum = 0;
        for (int i = 0; i < 5; i++)
        {
            System.out.printf("%d番:", i + 1);
            score[i] = stdIn.nextInt();
            sum += score[i];
        }

        System.out.printf("合計点%d\n", sum);
        System.out.printf("平均点%f\n", (double)sum / 5);
    }
}
L:\>java Lesson034
点数を入力してください。
1番:17
2番:38
3番:52
4番:41
5番:63
合計点211
平均点42.200000

Objective-C

D

VB

VB.NET

Delphi

更新日 : 2010.09.24
program Project1;

{$APPTYPE CONSOLE}

uses
    SysUtils;
var
    i: Integer;
    score: array[1..5] of Integer;
    sum: Integer = 0;
begin
    writeln('点数を入力してください。');

    for i := 1 to 5 do
    begin
        write(format('%d番:', [i]));
        read(score[i]);
        sum := sum + score[i];
    end;

    writeln(format('合計点%d', [sum]));
    writeln(format('平均点%.6f', [sum / 5.0]));
end.
S:\>lesson034\project1.exe
点数を入力してください。
1番:17
2番:38
3番:52
4番:41
5番:63
合計点211
平均点42.200000

Ada

PL/SQL

T-SQL

関数型

inserted by FC2 system