Rivoreo Source Code Repositories
src.rivoreo.one
/
compiler-explorer
/
740e88d7679d53bf5fbad9f7ddbf8fba830710d0
/
.
/
views
/
example.pas
blob: eddb3978a77ca7045e70db9b5e6d482fa67bec6b [
file
] [
log
] [
blame
] [
raw
]
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
.