Jacobsthal numbers: Difference between revisions

Content added Content deleted
(Added uBasic/4tH version)
Line 2,786: Line 2,786:
If (a@ % b@) = 0 Then Unloop : Return (0)
If (a@ % b@) = 0 Then Unloop : Return (0)
Next
Next
Return (1)
Return (1)