views/example.pas

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.