Question

How to calculate the remainder in Pascal

Answer 1

program CalculateRemainder;

var
  a, b, r: integer;
begin
  a := 18;
  b := 5;

  r := a mod b;  

  writeln('Remainder = ', r);
end.



(*
run:

Remainder = 3

*)

 

70+ SQL courses for beginners and professionals

Answer 2

program CaculateRemainder;

begin
  writeln(-18 mod 5); 
  writeln(18 mod -5); 
end.




(*
run:

-3
3

*)

 

70+ SQL courses for beginners and professionals