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

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

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

Delphi

program Project1;
{$APPTYPE CONSOLE}
uses

    SysUtils;

var

    vx, vy: Integer;

begin

    writeln('２つの整数を入力してください。');
    write('整数１：');

    read(vx);
    write('整数２：');

    read(vy);
    write(format('vx + vy = %d'#13#10, [vx + vy]));

    write(format('vx - vy = %d'#13#10, [vx - vy]));

    write(format('vx * vy = %d'#13#10, [vx * vy]));

    write(format('vx / vy = %d'#13#10, [vx div vy]));

    write(format('vx %% vy = %d'#13#10, [vx mod vy]));

end.

実行結果

S:\>lesson006\project1.exe

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

整数１：57

整数２：21

vx + vy = 78

vx - vy = 36

vx * vy = 1197

vx / vy = 2

vx % vy = 15