Programación Vf de números primos
Suma = 0
Para i=1 a 50
Para j=i 1 a 50
s=i j
Si primo = 1
Suma = suma 1
? Allt(str(i)) " " allt(str(j)), "La suma de: ", allt(str(s)), "es un número primo"
endif
Fin
Fin
" 1-50 * *El número de dos números cualesquiera sumados a un número primo es: ", allt(str(suma)), "número ".
Programa perfusión(x)
flag=1
Para n=2 a x/2
si (xn==0 )
flag=0
endif
end
devolver bandera
endfun