7.1. Provjera vrijednosti za uslov x>-2?
a) x = 2, y = 3 b) x = 3, y = 2 c) x = 2, y = 2
d) x = -2, y = -3 e) x = -3, y = 2 f) x = -1, y = -1

 Listing programa:

PROGRAM P07111010;
USES
  WinCrt;
VAR
  x, y: INTEGER;
begin
  Writeln('Uslov 2');
  Write('Dva broja');
  Readln(x, y);
  IF x > -2 THEN 
    BEGIN
      x := x - 1;
	  y := x - 2;
	END;
  Writeln('x= ', x, '  y= ', y);
END.

Ispis na ekranu:

Index