VFP escribe un programa para calcular el valor de una función por partes
*?Escribe un programa para calcular el valor de la función por partes f(x)={?
*?x3-1?x>0
* ?1?x?=0
*?x2+1?x<0
*?Ejecute el programa y encuentre x=0.5; respectivamente, el valor de f(x)
SET?TALK?OFF
CLEAR
CLOSE?DATABASES
input?[Por favor ingrese x =]?to?x
DO?case
CASE?x>0
y=x*x*x-1
CASO?x=0
y=1
CASO?x<0
y=x*x+1
ENDCASE y
RETORNO