四則演算の剰余

注意事項

このサイト内で公開していることがらについて

使用や利用によるいかなる損失に対しても責任を負いませんのでご了承ください。

著作物に関する著作権について

原則としてすべて運営者(EponaLab)にあります。

ソースコード

• ソースコード

program ArithMod(input, output);

procedure main;
var a, b : integer;
begin
    writeln('2つの数の商と剰余を計算します。');

    write('a = ');
    readln(a);

    write('b = ');
    readln(b);
    
    writeln(a, ' / ', b, ' = ', a div b, ' ... ', a mod b);
end;

begin
    main
end.
                

実行結果

$ ./CalcArithMod
2つの数の和を計算します。
a = 52
b = 23
52 / 23 = 2 ... 6