読み込んだ2つの整数値は等しいか (等価演算子)
明解C言語 入門編 > 3. プログラムの流れと分岐 >
読み込んだ2つの整数値は等しいか (等価演算子)
Perl
print "2つ整数を入力してください。\n"; print "整数1:"; chomp($x1 = <STDIN>); print "整数2:"; chomp($x2 = <STDIN>); if ($x1 == $x2) { print "それらの値は同じです。\n"; } else { print "それらの値は違います。\n"; } unless ($x1 == $x2) { print "それらの値は違います。\n"; } else { print "それらの値は同じです。\n"; }
実行結果
L:\>perl lesson_03_017.pl
2つ整数を入力してください。
整数1:-5
整数2:-5
それらの値は同じです。
それらの値は同じです。L:\>perl lesson_03_017.pl
2つ整数を入力してください。
整数1:40
整数2:45
それらの値は違います。
それらの値は違います。