Howzabout:
77 PI PIC 9V9 VALUE 3.1.
That looks like cobol to me ?
Yup. Could just as easily be done in PL/I:
DECLARE PI FIXED DECIMAL (2,1) INITIAL(3.2);
But fixed point isn't precisely the same thing as floating point with
significant digit tracking.
Peace... Sridhar