xPasos - TODO POR PASOS

Objetivo:

Comprender el uso de la instrucción IF-ELSE-ENDIF, la lectura de datos tipo cadena (String) y las funciones de conversión de tipo, NUMERO a CADENA y CADENA a NUMERO.


Problema:

Leer dos números A y B y calcular la división de A sobre B. A y B deben ser números enteros y el resultado debe ser real.


Solución:

---

Análisis

El calculo de la división de A sobre B requiere una variable C de tipo real donde almacenaremos el resultado. Hay que tener en cuenta que la variable B no puede tener valor igual a cero ya que en ese caso el resultado sería indeterminado.

---

Variables

i_A: variable de entrada de tipo entero (integer).
i_B: variable de entrada de tipo entero (integer).
f_C: variable de salida de tipo real (float).

---

Programa

;EJEMPLO NUMERO 001

EnableExplicit

OpenConsole()

Define.i i_A, i_B
Define.f f_C

Print("NUMERO A: ")
i_A=Val(Input())
Print("NUMERO B: ")
i_B=Val(Input())

If i_B <> 0
 f_C = i_A/i_B
 Print("Resultado: "+StrF(f_C))
Else
 Print("ERROR, B debe ser diferente de cero")
EndIf

Input()

CloseConsole()

End

---