Listing: 1 MODULE QBadAsn; 2 VAR x : INTEGER; ExitCode : INTEGER; 3 BEGIN 4 x := 3.14; ***** ^ incompatible assignment 5 ExitCode := 0 6 END QBadAsn. 1 error