mirror of
https://git.sr.ht/~rabbits/macintosh_cookbook
synced 2024-12-27 10:29:25 +00:00
13 lines
148 B
ObjectPascal
13 lines
148 B
ObjectPascal
program ExampleFunction;
|
|
|
|
function Add (a, b: integer): Integer;
|
|
begin
|
|
Add := a + b;
|
|
end;
|
|
|
|
begin
|
|
|
|
ShowText;
|
|
Writeln('5+6=', Add(5, 6));
|
|
|
|
end. |