[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Zero Divided By Zero
- Subject: Zero Divided By Zero
- From: "mmphosis" <markstock@mail.com>
- Date: 7 Dec 2006 16:00:24 -0800
- Complaints-to: groups-abuse@google.com
- Injection-info: j44g2000cwa.googlegroups.com; posting-host=70.66.60.39; posting-account=7uQMLQ0AAAB8qpxOFEkK1_UQpZcRVam_
- Newsgroups: comp.sys.apple2
- Organization: http://groups.google.com
- User-agent: G2/1.0
- Xref: g2news2.google.com comp.sys.apple2:15374
http://standards.ieee.org/reading/ieee/interp/754-1985.html
0 REMZERO DIVIDED BY ZERO
1 REM
2 REMPRIOR TO THE YEAR 806,
3 REMTHIS PROBLEM WAS SOLVED
4 REMOR IT WASN'T A PROBLEM^J
10 LET A = 0
20 LET B = 0
30 GOSUB 100DIVIDE
40 PRINT A " / " B " = " V$
50 END:^J
100 REMDIVIDE A BY B
110 REMCHECK FOR DIVISION BY ZERO
120 IF B THEN V = A / B : V$ = STR$(V) : RETURN
130 REMCHECK FOR ZERO DIVIDED BY ZERO -- DEC 6, 2006
140 IF (A) THEN V$ = "NOT A NUMBER" : RETURN
150 V$ = "NULLITY" : RETURN
( this is not a test, this topic was posted in order to embed a link to
a video, do not watch this video! )
http://video.google.com/videoplay?docid=-6529813972926262623
( Scottish oil man and patsy: O'Samma Ben Ladden )