Aleatorización de idiomas sencilla
.Ensamblaje Ventana Ensamblaje 1. Respuesta de variable ensambladora, número entero. Valor aproximado de la variable ensambladora, entero, "0". Operador de variable ensambladora, tipo de texto, "0"
Subrutina __Launch Window_Created
Operador = { "+", "-", "×", "÷ " }
.Subrutina de suma y resta, tipo texto. Parámetros resultado, número entero, referencia. Operando variable local 1, entero. Operando variable local 2, entero. Operando de variable local, entero
Establecer número aleatorio semilla () operando = obtener número aleatorio (1, 4) operando 1 = obtener número aleatorio (1, 20). Comienza el juicio (operando = 2) Operando 2 = Toma un número aleatorio (1, operando 1). Operando predeterminado 2 = toma un número aleatorio (1, 20). Se acabó el juicio. Comienza el juicio (operador = 4) valor aproximado (operando 1) operando 2 = valor aproximado [obtener número aleatorio (1, obtener miembro de la matriz (valor aproximado))]. Valor por defecto
Fin del juicio
. Comienza el juicio (operando = 1) Resultado = operando 1 + operando 2. Resultado del juicio (operador = 2) = operando 1 - operando 2. Resultado del juicio (operador = 3) = operando 1 × operando 2. Resultado del juicio (operador = 4) = operando 1 ÷ operando 2. El juicio termina Regresar (al texto (operando 1) + operador [operador] + al texto (operando 1) + al texto (operador [operador] + al texto (operador [operador] + al texto (operador[operador])). operador ] + a texto (operando 2) + a texto (operando 2) + "=")
.Subroutine_Button1_Clicked
Etiqueta 1.Título = Suma y Resta (Respuesta)
. Subrutina_EditBox1_Presionó una tecla, lógica. Código de tecla de parámetro, número entero. Estado de la tecla de función de parámetro, número entero
. (respuesta)) InfoBox ("La respuesta es correcta", ícono #info, ) return (). Si es verdadero, finalice Infoobox ("Respuesta incorrecta", ícono #info,). Finalice si es verdadero
. número aproximado. Parámetro parámetro, número entero. Variable local x, número entero
Borrar matriz (número aproximado). Comience contando el bucle (parámetro, x). Si es verdadero (parámetro % x = 0), agregue el miembro (. entero, x). Si es verdadero, finaliza el ciclo de conteo ()
.