哪位高手来示范下最简单的函数声明调用格式

谁来示范下最简单的函数声明调用格式
program   Project2;

{$APPTYPE   CONSOLE}

uses
    SysUtils,
    Unit1   in   'F:\delphi\Borland\Delphi7\Projects\Unit1.pas '   {Form1};
type
    PROCedure   u_();


begin
        u_();
end.


      procedure   u_();
        writeln( 'z ');
    ENDP;
//u_()要在哪里声明和以及声明的放置

[解决办法]
TYPE不需要

program Project2;

uses
Forms,
Dialogs,
Unit1 in 'Unit1.pas ' {Form1};

{$R *.res}

procedure H;
begin
ShowMessage( '1 ');
end;

begin
H;

Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.