9 Apr
2001
9 Apr
'01
12:55 p.m.
At 11:29 AM 4/9/2001 -0500, you wrote:
The oldy and goldy Fortran II, remember go to's and
format statements.
Don't forget all capitals.
IMPLICIT INTEGER (I-N)
READ(5,995) I
IF( I ) 100,200,300
100 PRINT(6,999) I
999 FORMAT('0I IS NEGATIVE, ',I4)
GO TO 500
200 PRINT(6,998) I
998 FORMAT('0I IS ZERO, ',I4)
GO TO 500
300 PRINT(6,997) I
997 FORMAT('0I IS POSITIVE, ',I4)
500 STOP
END
I think a computer language and programming flame war is needed to clear the
air and stoke the emotions :)
Never mind!
You forgot the format statement for 995 so it won't compile :-)
One of the coolest things about the OpenVMS hobbyist program is the number
of old languages that you can play with and learn when you have a VAX
sitting around. Mine have COBOL, FORTRAN, BASIC, C, C++, PASCAL, and ADA
all loaded. I'm trying to get copies of the MODULA-2 and MODULA-3 systems,
and while I have the distro kits for APL and PL/I the hobbiest program
doesn't include PAKS for them. (If someone has said PAKs I'd be interested
in them).
I would like to put together a CD that has all of the languages on it and
I'm wondering sort of how to go about that. If I 'INIT' a disk and stage
the CD I want to create, then I can used backup to create a
/FOREIGN/PHYSICAL copy of it in a file I think, then if I burn that on to a
CD will it still mount? Curious minds want to know.
--Chuck