Red de conocimiento informático - Conocimiento sistemático - Pide ayuda al maestro de la informática

Pide ayuda al maestro de la informática

Supongamos que menos de 1.500 yuanes (inclusive) están libres de impuestos; de 1.500 (exclusivos) a 3.000 yuanes (inclusive) la tasa impositiva es 5; es 10 5.000 La tasa impositiva es de 20 yuanes (exclusivo) a 10.000 yuanes (inclusive) la tasa impositiva es de 30 yuanes para más de 10.000 yuanes (exclusivo); Programación para calcular el IRPF, cuyos ingresos personales se introducen mediante teclado.

Parte del código de puntuación se proporciona a continuación, complete el programa y ejecútelo.

Borrar

Ingrese "Ingrese la cantidad de ingresos personales:" Para x

Hacer caso

Caso xlt;=1500

y=0

Caso xlt;=3000

y=(x-1500)*0.05

Caso xlt;=5000

y=_____1500*0.05 (x-3000)*0.1____________

Caso xlt;=10000

y=___1500*0.05 2000*0.1 (x-5000 )* 0.2____

De lo contrario

y=__1500*0.05 2000*0.1 5000*0.2 (x-10000)*0.3_

Fin de caso y

Volver

2. ?Programe y diseñe una calculadora sencilla que pueda realizar operaciones de suma, resta, pesaje y división. Los dos operandos y tipos de cálculo involucrados en la operación se ingresan a través del teclado; los resultados del cálculo se muestran en la ventana de Visual FoxPro. Complete el programa y ejecútelo.

Borrar

Ingrese "Ingrese el primer operando de cálculo" ?a ?x

Ingrese "Ingrese el segundo operando de cálculo" ?a ?y

"----------------Por favor seleccione----------------"

" 1-Adición operación? 2- Operación de resta? 3- Operación de escala? 4- Operación de división"

" 0-Salir"

"-------- ----- ----Por favor seleccione----------------"

Esperar "?" para p

Hacer Caso

Caso ?p=_"1"___

ans=x Y

Caso ?p=_"2"_

ans=x-Y

Caso ?p=_"3"_

ans=x*Y

Caso ?p=_"4"_

Si ?_y=0__

"El divisor no puede ser 0"

Retorno

Else

ans=x/Y

Endif

Caso ?p="0"_

Retorno

Fin de caso

"Calcular El resultado es: " ,ans

Retorno

3. Escribe un programa para implementar la función: S=2**2 4**2 6**2 8**2 … 100 ** 2

s=0

i=2

hacer mientras ilt;=100 s=s i**2 i=i 2

enddo s4 ? Escribe un programa para implementar la función: ingresa un número positivo menor que 1000 desde el teclado y encuentra su raíz cuadrada. Después de solicitar una entrada numérica, primero determine si el valor de entrada es inferior a 1000. De lo contrario, solicite volver a ingresar.

x=-1

hacer mientras xlt; 0.or xgt; 1000 ingresa "Ingresa un número positivo menor que 1000:" a x

enddo x, la raíz cuadrada de " es: ", sqrt(x)

5. Escribe un programa para implementar la función: genera la cadena ingresada desde el teclado en orden inverso, como por ejemplo: entrada ". abcdef", salida "federcba".

a="abcdef"

b=""

k=LEN(a)

i=k

hacer mientras igt;=1 c=subs(a,i,1) b=b c i=i-1

enddo b