Как создать модуль в Turbo Pascal

[Nikoshka]

Подскажите, как сам файл выглядит? Т.е. какой синтаксис? :roll:

[vunder]

Код: Выделить всё

Unit MyUnit;

interface

function MyFunction(x: Real): Integer;
procedure MyProcedure (x: Real; var k: Integer);

implementation

function MyFunction(x: Real): Integer;
begin
  MyFunction := Round(x*x);
end;

procedure MyProcedure (x: Real; var k: Integer);
begin
  k := Trunc(x*x);
end;

end.

[BBB]

vunder, еще может иметься инициализационная часть, т.е. "после" implementation:

Код: Выделить всё

Unit MyUnit; 

interface 

...........................

implementation 

...........................

begin 
 { выполнить некоторые действия }
end.

[vunder]

BBB, не думаю тому, кто будет спрашивать про описание модуля нужна сексия инициализации