¿Cómo utilizar el lenguaje de programación para determinar si el número real R es un número primo?
El bucle de arriba es demasiadas veces, solo bucle int (n^0.5)
Private Sub CommandButton1_Click()
hacer
n = InputBox("Ingrese un número entero positivo mayor que 1", "Entrada de datos")
si ngt 2 entonces salga del
bucle
i; = 2
Hacer
r = n Mod i
i = i 1
Si r = 0 Entonces
p >MsgBox (Str(n) "es un número primo")
salir sub
end if
if igt;=n^0.5 entonces salir de
Loop
MsgBox (Str(n) "No es un número primo")
End Sub