IBM开放的免费培训课程，能否缓解COBOL程序员青黄不接的危机？各位IT大佬帮帮小女子吧，18年毕业的女孩转行it学cobol可行吗_语言_火柴盒_都是

本文目录

• IBM开放的免费培训课程，能否缓解COBOL程序员青黄不接的危机
• 各位IT大佬帮帮小女子吧，18年毕业的女孩转行it学cobol可行吗
• 大连COBOL技术前景怎么样
• 题目是要求用cobol读入文件

IBM开放的免费培训课程，能否缓解COBOL程序员青黄不接的危机

本人10年开发培训经验,期间经历了Java,Android,H5,大数据,PHP等多个不同的方向的开发,也做过软件培训公司的金牌讲师，很有兴趣回答你这个问题。

COBOL这玩意一般人都没听过，最近这两天突然冒出了个头，当然也不是火，而且国内来说也不可能有公司再去用这种语言去做开发，目前用COBOL做的项目都是维护老旧项目。

即使IBM开发了免费的培训课程，我觉得也不会缓解这个危机，为什么呢？

举个栗子，解释一下这个原因。

很早之前，民国那个年代，有的人会通过手工去糊火柴盒这样纸盒，一个火柴盒一个火柴盒的去糊，慢慢的熬时间也能完成工作量需求量。后来都是机械化了，咔嚓咔嚓很快就可以造出来很多的火柴盒。现在因为某些特殊的原因，造成暂时无法机械化生产火柴盒了，但仅仅是暂时的，而且是局部范围的，可能就只是某一个小车间存在这个问题。然后现在有个人就站出来，说我会手工糊火柴盒，大家跟我来学一下吧，你觉得会怎么样呢？会不会涌现出来一大堆人跟着去学手工糊火柴盒呢？

我觉得完全不会啊。这么一种老古董，我学它干嘛！技术是往前更新的，而不是要复古！

COBOL目前一般是在银行、保险行业中有使用，其实目前可能也就是欧美国家，或者国内小部分国企金融行业中，可能还存在这COBOL写的系统，但是目前大多数使用COBOL项目的银行等单位也都想换掉COBOL这套系统。

原因如下：

1.懂这套系统的人越来越少；

2.学习资料很少，跟JAVA啊C++这类编程语言比起来，基本上都是靠企业自己内部资料；

3.系统跟不上时代，基本上就靠IBM在对一些功能更新换代。

我从事开发培训10年，擅长Java,Android,H5,大数据,PHP等多个不同的技术方向。后续我会写一系列关于互联网技术方面的文章，感兴趣的朋友可以关注我。另外如果你有Java,Android,H5等开发方面，或者是求职方面的问题，也可以在评论区留言，或者私信我，相信一定会让你有所收获！

各位IT大佬帮帮小女子吧，18年毕业的女孩转行it学cobol可行吗

原谅我没听过cobol这个语言（囧），想来应该不是很流行，应用面很并不广吧。

为什么不学习一些当下比较流行的语言呢？比如java，python，go等，不需要担心语言短时间内会被淘汰，工作机会也非常多。

大连COBOL技术前景怎么样

你好，提问者

作为一个十多年COBOL语言经验者，COBOL培训讲师来告诉你一些真相。

COBOL语言上个世纪广泛应用到银行保险金融政府等项目，作为后台数据处理批处理软件，在大机上应用很广泛。

首先该语言是专门为企业管理而设计的高级语言，可用于统计报表、财务会计、计划编制、作业调度、情报检索和人事管理等方面。

上个世纪各种计算机高级语言没有发明出来的时候，COBOL作为一个接近英语书写的语言应用相当广泛！

现如今虽说很多项目需要更多的是JAVA和.net等语言，但是很多老系统限于成本和稳定性，还是大比例使用COBOL！而且就算改造起来，也会需要使用该技术！

这些年来，除了一些老系统的维护和改造，大部分活都是承接的COBOL改各种语言！

这种现象尤其是在对日项目中！

不过COBOL相对其他语言，语法和深度相对简单，面向过程的思想确实赶不上面相对象的语言，如果想要不被淘汰，一定要把相关技能熟练掌握，例如数据库，sql，jcl等各种技能。

再者一定要把金融保险等业务技能熟练掌握，并且匹配以熟练的外语技能（日语英语）！

如果你真能把这些搞定，相信你在职场中一定游刃有余，无往不利！

大连和苏州上海等日企软件公司多的地方都是你找工作的好选择，希望你能如意！

题目是要求用cobol读入文件

说实话你的题目描述太不清楚，我很多没有明白意思，比如读入，读入要做操作啊，比如说原样输出到另一个文件，或者要求用的是数字还是字母，还是都用等我只有按照自己的理解来做了输入文件记录长度80内容12345abcde234563456745678567896789178910读入这个内容，并且直接显示出来IDENTIFICATION DIVISION.PROGRAM-ID. RFILEIN.ENVIRONMENT DIVISION.INPUT-OUTPUT SECTION.FILE-CONTROL.SELECT IN-FILE ASSIGN TO INFILE.DATA DIVISION.FILE SECTION.FD IN-FILERECORDING MODE IS FLABEL RECORD IS STANDARD.01 IN-REC PIC X(80).WORKING-STORAGE SECTION.01 EOF-FLAG PIC X VALUE ’N’.01 AMOUNT PIC 9(4).PROCEDURE DIVISION.000-MAIN.OPEN INPUT IN-FILE.PERFORM 001-PROCESS UNTIL EOF-FLAG = ’Y’.CLOSE IN-FILE.GOBACK.001-PROCESS.READ IN-FILEAT END MOVE ’Y’ TO EOF-FLAGEND-READINSPECT IN-REC TALLYING AMOUNT CHARACTERS BEFORE SPACEDISPLAY IN-REC(1:AMOUNT).输出结果就是上面输入文件一样。