function teste integer integer begin result end

function teste(i, j: integer): integer;
begin
  
  result := i *j;
end;