24小时热门版块排行榜    

查看: 2181  |  回复: 6

pdce218

金虫 (正式写手)

[交流] 【求助】Fortran程序,如何让exe文件可以单独运行? 已有5人参与

每次写完程序(很简单的那种),编译成功后,可以运行exe文件,但是把那个exe文件单独拷贝到另一个地方,运行就不能出来结果了,不知道是什么原因,该如何解决?
还有个很简单的问题,小程序运行一次后,就出现“press any key to continue”,随意按个键后,程序就退出了,加什么语句,可以让程序运行多次,又如何控制程序退出呢?
刚开始学Fortran,遇到很多小问题,而这些小问题书上都找不到啊!
先谢过各位了!
回复此楼
明天会更好……
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

mplanck

至尊木虫 (职业作家)

之上又是啥子虫虫?

★ ★
余泽成(金币+2):谢谢参与应助!欢迎常来程序语言版! 2010-07-18 10:42:19
pdce218(金币+2): 2010-07-23 15:36:42
编译好的exe文件不会因为换了地方而不出结果,是不是你把结果打在屏幕上?而拷贝出来的exe文件运行完后会自动马上退出,你这样来不及看结果,你把结果打印到文件试下。
程序编译完运行,结束后就会提示“press any key to continue”,表示已经终止,按任意键是退出dos界面。
我不懂你说的‘让程序运行多次’是什么意思?假如想它从头多跑几次,可以用循环,或者写个bat文件,把exe文件运行多次
不知不觉过2W了!那向3W挺进~~
2楼2010-07-17 21:40:25
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)


余泽成(金币+1):谢谢参与应助! 2010-07-18 10:43:35
pdce218(金币+1): 2010-07-23 15:36:47
如果在 windows 下,在开始->运行那里输入 cmd,然后转到你的 exe 文件所在的目录,运行你的 exe 文件,这样就不会一闪就没有了,呵呵……
3楼2010-07-17 21:45:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

nono2009

超级版主 (文学泰斗)

No gains, no pains.

优秀区长优秀区长优秀区长优秀区长优秀版主


pdce218(金币+2):pause很管用 2010-07-18 16:11:26
余泽成(金币+1):谢谢参与应助! 2010-07-18 17:54:51
在程序结束前pause一下即可。
4楼2010-07-18 11:40:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pdce218

金虫 (正式写手)

引用回帖:
Originally posted by nono2009 at 2010-07-18 11:40:14:
在程序结束前pause一下即可。

我在
end program
前面加了个
pause
很管用啦
明天会更好……
5楼2010-07-18 16:08:08
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pdce218

金虫 (正式写手)

引用回帖:
Originally posted by mplanck at 2010-07-17 21:40:25:
编译好的exe文件不会因为换了地方而不出结果,是不是你把结果打在屏幕上?而拷贝出来的exe文件运行完后会自动马上退出,你这样来不及看结果,你把结果打印到文件试下。
程序编译完运行,结束后就会提示“press a ...

现在我还没看到文件操作那块的,
想问问如何把当前整个源程序文件内容和运行结果打印到某个文件中。
先谢啦!
明天会更好……
6楼2010-07-18 16:10:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

seanbsd

木虫 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
个人理解:第一,原来的程序不是编译成.exe,而是选择的DEBUG,可能会有一些库什么的未加入,一般要独立运行最好是编译选项里面有一个release版本,这样随便你拷贝到什么地方都应该可以运行。
第二档出现press any key to continue 的时候说明程序已经执行完毕,需要人工干预,是等待还是退出,一般是按键盘上任意键程序会退出,这个提示一般是在程序中加载PAUSE语句后会给出的提示。主要是有些程序在WIN7等系统的命令行方式下运行的结果很快,无法看的结果,加此句子来查看程序的最终运行结果。
多次运行那就做做一个BAT文件,多次把程序的可执行文件放入就好。
7楼2015-06-09 11:34:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 pdce218 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[找工作] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +3 i3cz6qj6l2 2026-02-17 3/150 2026-02-18 11:09 by lqtl9djx19
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +3 i3cz6qj6l2 2026-02-17 3/150 2026-02-18 10:54 by lqtl9djx19
[考研] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +3 i3cz6qj6l2 2026-02-17 3/150 2026-02-18 10:39 by lqtl9djx19
[考研] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +3 pnpwoqbg8f 2026-02-17 3/150 2026-02-18 08:53 by lqtl9djx19
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +3 pnpwoqbg8f 2026-02-17 3/150 2026-02-18 08:38 by lqtl9djx19
[找工作] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +4 pnpwoqbg8f 2026-02-17 4/200 2026-02-18 07:55 by lotyj5cz79
[基金申请] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +3 pnpwoqbg8f 2026-02-16 4/200 2026-02-18 07:40 by lotyj5cz79
[考研] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +4 pnpwoqbg8f 2026-02-16 4/200 2026-02-18 07:38 by lotyj5cz79
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +4 pnpwoqbg8f 2026-02-16 4/200 2026-02-18 07:23 by lotyj5cz79
[论文投稿] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +4 pnpwoqbg8f 2026-02-16 4/200 2026-02-18 07:08 by lotyj5cz79
[公派出国] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +3 pnpwoqbg8f 2026-02-16 3/150 2026-02-18 06:53 by lotyj5cz79
[论文投稿] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +3 pnpwoqbg8f 2026-02-17 3/150 2026-02-18 00:40 by tk2gfblvuz
[找工作] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +3 pnpwoqbg8f 2026-02-17 4/200 2026-02-18 00:23 by tk2gfblvuz
[公派出国] 售SCI一区文章,我:8 O5 51O 54,科目齐全,可+急 +3 pnpwoqbg8f 2026-02-17 3/150 2026-02-17 23:40 by tk2gfblvuz
[基金申请] 基金正文30页指的是报告正文还是整个申请书 +3 successhe 2026-02-16 4/200 2026-02-17 20:56 by successhe
[基金申请] 今年春晚有几个节目很不错,点赞! +5 瞬息宇宙 2026-02-16 6/300 2026-02-17 12:49 by jymy19840415
[微米和纳米] 球磨粉体时遇到了大的问题,请指教! 10+3 6sbiam 2026-02-12 15/750 2026-02-16 15:03 by tgzxzqj
[基金申请] 过年走亲戚时感受到了所开私家车的鄙视链 +3 瞬息宇宙 2026-02-15 5/250 2026-02-16 14:23 by aspect3000
[基金申请] 情人节自我反思:在爱情中有过遗憾吗? +4 瞬息宇宙 2026-02-15 5/250 2026-02-15 22:28 by baiboxie
[硕博家园] 江汉大学解明教授课题组招博士研究生/博士后 +3 cleverlyy 2026-02-12 3/150 2026-02-12 21:02 by qsdf1
信息提示
请填处理意见