7.2.. Napisati program koji za y > x računa x i y prema izrazima: x = x - 1; y = y + 2 inače x = x + 1; y = y - 2.

Listing programa:

REM P07211025;
CLS
INPUT "Unesite prvi broj:", x
INPUT "Unesite drugi broj:", y
IF y > x THEN 
   x = x - 1
   y = y + 2
ELSE
   x = x + 1
   y = y - 2
ENDIF
PRINT "x = "; x, " y = "; y
END

Izvođenje programa:

Index