PROGRAM Test;

USES Tbug809a;

BEGIN
  Schreib('Test');
END.