Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

Надо решить задачу в visual fox pro 9.0

Ответ оставил Гость

Возможна где-то описка, VFP нет под рукой, чтобы проверить

FUNCTION U(x AS NUMERIC, y AS NUMERIC) AS NUMERIC
   IF y>=ABS(x) AND y^2>=1-x^2
      RETURN SQRT(ABS(x^2-1))
   ELSE
      RETURN x+y
   ENDIF
ENDFUNC