Programming challenge
by Volker Weber
Who can do this in COBOL?
Comments
rem "there's probably an easier way";
x:=4:1:2:6:2:1:3:1:3:1:6:1:1:1:2:3:1:1:1:3:1:1:2:3:3:2:1:1:1:2:1:4:1:2:4:1:5:1:1:1:1:1:1:2:1:2:3:1:1:1:1:2:3:2:1:1:1:1:1:2:1:1:3:1:3:2:6;
t:="0":"1";
b:="0000":"0001":"0010":"0011":"0100":"0101":"0110":"0111":"1000":"1001":"1010":"1011":"1100":"1101":"1110":"1111";
h:="0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"A":"B":"C":"D":"E":"F";
@For(i:=1;i
Your comment system doesn't like the syntax -- thinks it contains HTML tags, I guess. So I'll post on my own blog.
Here it is.
I was going to say, that doesn't look anything like the COBOL I used to write back in the 70's and 80's. But having looked at Richard's blog, it's obvious that COBOL has not moved on as much as I feared ;-)
I had the same thought as John. :-)
