Subversion Repositories svnkaklik

unit MojeUnit;

interface
     function mojefunkce (x,y: integer) : integer

implementation

function mojefunkce(x,y :integer) :integer
begin
   mojefunkce := x+y;
end;

end.