4 lines
74 B
Text
4 lines
74 B
Text
long real procedure multiply( long real value a, b );
|
|
begin
|
|
a * b
|
|
end
|