Fortran进程异常结束处理方法


唐朝
唐朝 2024-04-03 14:34:04 66318
分类专栏: 问答

Fortran进程异常结束处理方法

网站声明:如果转载,请联系本站管理员。否则一切后果自行承担。

本文链接:https://www.xckfsq.com/news/show.html?id=52944
赞同 0
评论 1 条
  • 1843880570 2024-04-03 15:47:51

    一般早期的方法是使用 pause 语句,它以暂停为“借口”延缓程序的结束,例如:

    1 Program www_fcode_cn
    2   Implicit None
    3   write(*,*) 'hello,www.fcode.cn'
    4   pause
    5   stop
    6 End Program www_fcode_cn


    请注意,第5行的stop并不是必须的,我们也不建议在程序最后使用stop。但是如果你使用了,pause 需要添加在 stop 前面。

    由于 Fortran95 语法去除了 pause 语句。所以更标准的方法是使用一个空白输入语句。它以等待用户输入为“借口”延缓程序的结束。用它来替代 pause

    1 Program www_fcode_cn
    2   Implicit None
    3   write(*,*) 'hello,www.fcode.cn'
    4   read(*,*)
    5   stop
    6 End Program www_fcode_cn


    不止 Fortran 的 console 程序存在这个问题,其他语言书写的 console 程序也存在这个问题。例如很多 C 程序员喜欢在程序最后增加一句 getchar(); 也是出于同样的理由和方法二的思路。

    最后,console 程序一闪而过的问题,还可能是由于出现了运行时错误,程序异常而退出了。

    因为方法二是倚靠在程序结束前延缓结束,对于中途异常退出,就不管用了。

    此时,需要用方法一来查看运行时错误的具体错误提示。然后根据错误来修改代码,直到程序可以正常结束为止。

    赞同 0 反对 0
    回复

唐朝L1
粉丝 0 发表 11 + 关注 私信
上周热门
银河麒麟添加网络打印机时,出现“client-error-not-possible”错误提示  1323
银河麒麟打印带有图像的文档时出错  1236
银河麒麟添加打印机时,出现“server-error-internal-error”  1023
统信桌面专业版【如何查询系统安装时间】  951
统信操作系统各版本介绍  944
统信桌面专业版【全盘安装UOS系统】介绍  903
麒麟系统也能完整体验微信啦!  889
统信【启动盘制作工具】使用介绍  499
统信桌面专业版【一个U盘做多个系统启动盘】的方法  441
信刻全自动档案蓝光光盘检测一体机  386
本周热议
我的信创开放社区兼职赚钱历程 40
今天你签到了吗? 27
信创开放社区邀请他人注册的具体步骤如下 15
如何玩转信创开放社区—从小白进阶到专家 15
方德桌面操作系统 14
我有15积分有什么用? 13
用抖音玩法闯信创开放社区——用平台宣传企业产品服务 13
如何让你先人一步获得悬赏问题信息?(创作者必看) 12
2024中国信创产业发展大会暨中国信息科技创新与应用博览会 9
中央国家机关政府采购中心:应当将CPU、操作系统符合安全可靠测评要求纳入采购需求 8

添加我为好友,拉您入交流群!

请使用微信扫一扫!