Чуть-чуть преобразовать код qbasic, нужно сюда как-то вставить проверку того, что a < > b, и четырёхзначное ли число. вот само : ввести с клавиатуры два четырёхзначных числа. если первое > второго, то вывести формулу куба разности, а наоборот - формулу куба суммы. сам код: cls input "vvedite dva chisla"; a,b if a> b then print "a^3-3*a^2*b^2+b^3" else "a^3+3*a*b^2+b^3" end

CLS
INPUT "A = ", A
INPUT "B = ", B
IF (999 < A)and(A < 10000)and(999 < B)and(B < 10000) THEN
   IF A > B THEN
      PRINT "a^3-3a^2b+3ab^2-b^3"
   END IF
   IF A < B THEN
      PRINT "a^3+3a^2b+3ab^2+b^3"
   END IF
ELSE
   IF (999 > A)or(A > 10000) THEN
      PRINT "A - ne ChetyrehZnachnoe"
   END IF
   IF (999 > B)or(B > 10000) THEN
      PRINT "B - ne ChetyrehZnachnoe"
   END IF
END IF
END