w_bad_str.mod 69 B

12345
  1. MODULE WBadStr;
  2. VAR x : INTEGER;
  3. BEGIN
  4. WriteString(x)
  5. END WBadStr.