Format 10 (HP COBOL)

ACCEPT identifier [FREE]  [FROM { SYSIN         }]
                                { CONSOLE       }
                                { mnemonic-name }