tb0426.pp 90 B

123456789101112
  1. { %VERSION=1.1 }
  2. uses ub0426;
  3. Begin
  4. myroutine;
  5. myroutine2;
  6. myroutine3;
  7. z:=0;
  8. end.