{ A simple test of input, output, and expressions. } var x: integer; begin read(x); if (x <> 0) then write('Not zero') else write('Zero'); end { That's it! }