Subversion Repositories svnkaklik

Rev

Go to most recent revision | Blame | Last modification | View Log | Download 

unit MojeUnit;

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

implementation

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

end.