Guest User

Untitled

a guest
Jan 16th, 2019
83
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Public Function mafs(ByVal y As Long) As Boolean
  2.         For prime = 2 To y
  3.             If prime Mod y(Long.Parse(prime / 2)) Then
  4.                 mafs = False
  5.  
  6.             End If
  7.  
  8.         Next
  9.         mafs = True
  10.     End Function
Add Comment
Please, Sign In to add comment