EssaiVT521.mod~ 158 B

1234567891011
  1. MODULE EssaiVT521;
  2. From STextIO IMPORT WriteChar, WriteStr;
  3. VAR Chaine : String;
  4. BEGIN
  5. Chaine := CHR(27) + "E";
  6. WriteString(Chaine);
  7. END EssaiVT521.