mirror of
https://git.sr.ht/~rabbits/macintosh_cookbook
synced 2024-12-28 01:29:49 +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.
|