Least common multiple: Difference between revisions
m
Fix pascal version to run in delphi
(add Standard ML) |
MaiconSoft (talk | contribs) m (Fix pascal version to run in delphi) |
||
Line 1,840:
=={{header|Pascal}}==
<lang pascal>Program LeastCommonMultiple(output);
{$IFDEF FPC}
{$MODE DELPHI}
{$ENDIF}
function lcm(a, b: longint): longint;
begin
|