RosettaCodeData/Task/Function-definition/Pascal/function-definition.pascal

5 lines
66 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
function multiply(a,b: real): real;
begin
multiply := a*b;
end;