Programación Vb en línea
Subcomando privado 1_Click()
Dim k es un número entero, I es un número entero
Dimensión m
k = 0
For m = El tamaño del paso de 999 a 100 es -1
i = 2
En m Mod i lt gt' 0 ' para determinar si es un número primo.
i = i 1
Anillo
Si i = m, entonces ' es un número primo.
Imprimir m
k = k 1
Si k = 3, salir
Finalizar si...
Siguiente m
Conector final