Arithmetic/Integer: Difference between revisions

No edit summary
Line 766:
"remainder: ", $a % $b, "\n";
?></lang>
 
=={{header|PL/I}}==
<lang PL/I>
get list (a, b);
put skip list (a+b);
put skip list (a-b);
put skip list (a*b);
put skip list (trunc(a/b));
put skip list (mod(a, b));
put skip list (rem(a, b));
</lang>
 
=={{header|Pop11}}==
Anonymous user