読み込んだ月の季節を表示 (論理演算子)

明解C言語 入門編 > 3. プログラムの流れと分岐 >

読み込んだ月の季節を表示 (論理演算子)

Perl
print "何月ですか:";
chomp($month = <STDIN>);

if (3 <= $month && $month <= 5)
{
    printf "春です。\n";
}
elsif (6 <= $month && $month <= 8)
{
    printf "夏です。\n";
}
elsif (9 <= $month && $month <= 11)
{
    printf "秋です。\n";
}
elsif($month == 1 || $month == 2 || $month == 12)
{
    printf "冬です。\n";
}
else
{
    printf "そんな月はありませんよ!!\n";
}

実行結果

L:\>perl lesson_03_022.pl
何月ですか:5
春です。

L:\>perl lesson_03_022.pl
何月ですか:8
夏です。