program t09; var x : integer ; begin if x > 0 then x := 1 else x := 2 end.