examples/pascal/default.pas


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

unit output;

interface

function Square(const num: Integer): Integer;

implementation

// Type your code here, or load an example.

function Square(const num: Integer): Integer;
begin
    Square := num * num;
end;

end.