Qbasicnews.com › QbasicNews.Com › Challenges v
Digit Isolation

Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Linear Mode
Digit Isolation
Antoni Gual Offline
Posting Freak
*****
Posts: 1,407
Threads: 117
Joined: Dec 2002
#2
09-06-2003, 02:32 AM
Code:
DECLARE SUB isolate (a&)
a& = 987654321
PRINT "isolating "; a&
isolate a&

SUB isolate (a&)
IF a& = 0 THEN EXIT SUB
b& = a& MOD 10
a& = a& \ 10
isolate a&
PRINT b&
END SUB
Antoni
Website Find
Reply


Messages In This Thread
Digit Isolation - by LinkMaster Sab - 09-06-2003, 02:14 AM
Digit Isolation - by Antoni Gual - 09-06-2003, 02:32 AM
Digit Isolation - by Sterling Christensen - 09-06-2003, 02:58 AM
Digit Isolation - by LinkMaster Sab - 09-06-2003, 06:44 AM
Digit Isolation - by Agamemnus - 09-06-2003, 07:39 AM
Digit Isolation - by LinkMaster Sab - 09-06-2003, 07:47 AM
code - by Meg - 09-06-2003, 08:29 AM
Digit Isolation - by Antoni Gual - 09-07-2003, 06:43 PM
::does the Hooray-for-recursion dance:: - by Meg - 09-07-2003, 09:13 PM
Digit Isolation - by LinkMaster Sab - 09-08-2003, 02:22 AM

Forum Jump:


Users browsing this thread: 1 Guest(s)