identification division.
program-id. prog.
environment division.
data division.
working-storage section.
77 n pic Z9.
77 i pic Z9.
77 r pic Z9.
procedure division.
display 'Hello, World!'
accept n
move 0 to i
perform until i>n
compute r = 2**i
display r
end-perform.
stop run.
aWRlbnRpZmljYXRpb24gZGl2aXNpb24uCnByb2dyYW0taWQuIHByb2cuCmVudmlyb25tZW50IGRpdmlzaW9uLgpkYXRhIGRpdmlzaW9uLgp3b3JraW5nLXN0b3JhZ2Ugc2VjdGlvbi4KICA3NyBuIHBpYyBaOS4KICA3NyBpIHBpYyBaOS4KICA3NyByIHBpYyBaOS4KcHJvY2VkdXJlIGRpdmlzaW9uLgogIGRpc3BsYXkgJ0hlbGxvLCBXb3JsZCEnCiAgYWNjZXB0IG4KICBtb3ZlIDAgdG8gaQogIHBlcmZvcm0gdW50aWwgaT5uCiAgICBjb21wdXRlIHIgPSAyKippCiAgICBkaXNwbGF5IHIKICBlbmQtcGVyZm9ybS4KICBzdG9wIHJ1bi4=
prog.cbl: 17: error: syntax error, on or before '.'
prog.cbl: 17: error: unknown or wrong statement, on or before '.'