¿Solución de prueba de aplicaciones de bases de datos VISUAL FOXPRO?
1. (1)98
(2)125
2.
Borrar
Detener la conversación
Entrada" a= "a a
Entrada" b=" a b
Entrada" c=" a c
Si un ltb entonces p >
t=a
a=b
b=t
endif
Si a lt entonces c p >
t=a
a=c
c=t
endif
Imprimir "tres números" El número máximo es: ", uno
Iniciar conversación
Regresar
3.
m=100
4.
Borrar
Detener la conversación
Ingrese "Por favor ingrese cualquier número entero:" a x"
Si mod(x, 2) =0
Imprime x, "Es un número par"
Otro
Imprime x, "Este es un número impar"
endif
Iniciar conversación
Volver
5.
Borrar
Ingresa " x=" a x
Si x gt0
y=x*1.5
Otro
Si x=0
y = x
Otro
y=x*3
endif
endif
Imprimir " y= ", y
Cancelar
6.
Borrar
s=0
n=0
p>Usa zg
do mientras no sea eof()
if zc= "Profesor"
s=s sfgz
n=n 1
endif
Saltar
Endor
El salario medio de todos los profesores es
Usar
regresar