Quando eu crio o programa a seguir com o GnuCOBOL 3.2 no macOS e digito 10.5
, por que ele imprime 10.0
?
program-id. foo.
data division.
working-storage section.
77 x pic 99v9.
procedure division.
accept x.
display x.
stop run.
Da mesma forma, se eu alterar a cláusula Picture para PIC 9(3)V99
e inserir 458.12
, ele imprime 458.10
.