配列の各要素に先頭から順に １，２，３，４，５ を代入して表示 (for文)

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

配列の各要素に先頭から順に １，２，３，４，５ を代入して表示 (for文)

C

#include <stdio.h>

int main(int argc, char* argv[])

{

    int i;

    int score[5];
    for (i = 0; i < 5; i++)

        score[i] = i + 1;
    for (i = 0; i < 5; i++)

        printf("点数%d = %d\n", i + 1, score[i]);
    return 0;

}

実行結果

R:\>lesson031\project1.exe

点数1 = 1

点数2 = 2

点数3 = 3

点数4 = 4

点数5 = 5

Delphi

program Project1;
{$APPTYPE CONSOLE}
uses

    SysUtils;

var

    i: Integer;

    score: array[1..5] of Integer;

begin

    for i := 1 to 5 do

        score[i] := i;
    for i := 1 to 5 do

        writeln(format('点数%d = %d', [i, score[i]]));

end.

実行結果

S:\>lesson031\project1.exe

点数1 = 1

点数2 = 2

点数3 = 3

点数4 = 4

点数5 = 5

Perl

for (0..4)
{
    $score[$_] = $_ + 1;
}

for (0..4)
{
    printf("点数%d = %d\n", $_ + 1, $score[$_]);
}

実行結果

L:\>perl lesson_05_031.pl

点数1 = 1

点数2 = 2

点数3 = 3

点数4 = 4

点数5 = 5

Ruby

score = []

for i in 0..4
    score[i] = i + 1
end

for i in 0..4
    printf("点数%d = %d\n", i + 1, score[i])
end

実行結果

L:\>ruby  l:\lesson_05_031.rb

点数1 = 1

点数2 = 2

点数3 = 3

点数4 = 4

点数5 = 5