function multiply(a, b: real): real;
begin
	multiply := a * b
end;