読み込んだ整数値までカウントアップ、０までカウントダウン (for文)

明解Ｃ言語 入門編 > 4. プログラムの流れの繰り返し >

読み込んだ整数値までカウントアップ、０までカウントダウン (for文)

Perl

print "正の整数を入力してください：";
chomp($no = <>);
for ($i = 0; $i <= $no; $i++)
{
    print "$i\n";
}

print "正の整数を入力してください：";
chomp($no = <>);
for (0..$no)
{
    print "$_\n";
}

print "正の整数を入力してください：";
chomp($no = <>);
foreach $i(0..$no)
{
    print "$i\n";
}

実行結果

L:\>perl lesson_04_028.pl

正の整数を入力してください：3

0

1

2

3

正の整数を入力してください：4

0

1

2

3

4

正の整数を入力してください：5

0

1

2

3

4

5