Язык: QBasic
 Составить программу, вычисляющую значение переменной У по следующему правилу:        у = х+3, если 0 <= х <=3        y = |x|+3, если х < 0 (Y=ABS(X), присваивает переменной Y значение, равное модулю числа Х)        у = x2-3, если х > 3.

CLS FOR x = -6 TO 6 n = n + 1 IF x < 0 THEN y = ABS(x) + 3 ELSE IF x > 3 THEN y = x ^ 2 - 3 ELSE y = x + 3 END IF END IF PRINT n; x, y NEXT x   INPUT "X =", x IF x < 0 THEN y = ABS(x) + 3 ELSE IF x > 3 THEN y = x ^ 2 - 3 ELSE y = x + 3 END IF END IFPRINT y