Rivoreo Source Code Repositories
src.rivoreo.one
/
compiler-explorer
/
1c07501e9749f140990f4025170f1e307675b3bc
/
.
/
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
.