読み込んだ２つの整数値の 商・剰余 を表示

明解Ｃ言語 入門編 > 2. 演算と型 >

読み込んだ２つの整数値の 商・剰余 を表示

Perl

print "２つの整数を入力してください。\n";

print "整数１：";
chomp($vx = <STDIN>);

print "整数２：";
chomp($vy = <STDIN>);

print "ＡをＢで割ると", int($vx / $vy), "あまり", $vx % $vy, "です。\n";

実行結果

L:\>perl lesson_02_007.pl

２つの整数を入力してください。

整数１：57

整数２：21

ＡをＢで割ると2あまり15です。