Check out and contribute to CodePedia, the wiki for developers.

View \PROCED5.PAS

Getting Started with the Pascal tutorial, source

Submitted By: WEBMASTER
Rating: (Not rated) (Rate It)


(* Chapter 5 - Program 5 *)
program Procedure_Calling_A_Procedure;

procedure One;
begin
   Writeln('This is procedure one');
end;

procedure Two;
begin
   One;
   Writeln('This is procedure two');
end;

procedure Three;
begin
   Two;
   Writeln('This is procedure three');
end;

begin  (* main program *)
   One;
   Writeln;
   Two;
   Writeln;
   Three;
end. (* of main program *)

corner
© 1996-2008. All rights reserved. Reproduction in whole or in part, in any form or medium without express written permission is prohibited.
Violators of this policy may be subject to legal action. Please read our Terms Of Use and Privacy Statement for more information.
Publisher: Lars Hagelin.
bootstrapLabs Logo A bootstrapLabs project.