24小时热门版块排行榜    

查看: 2941  |  回复: 8

红叶cq

木虫 (小有名气)

[求助] fortran程序在ubuntu上的运行 已有2人参与

本人刚开始接触fortran,在fortran教程中找了一个程序尝试运行。我用editplus编写程序,保存为.f格式,文件名为hello
放到linux系统下,输入命令gfortran hello.f -o hello.o  ,运行结果出现错误,希望各位大神能帮帮我。
运行结果如下:                                                                     编写的程序如下:
hello.f:1.1:                                                                                                             program ex05
                                                                                                                             implicit none
program ex05                                                                                                       real p
1                                                                                                                          parameter(p=3.1415926)
Error: Non-numeric character in statement label at (1)                                           write(*,*) sin(p/6)
hello.f:1.1:                                                                                                             end

program ex05                                                            
1
Error: Unclassifiable statement at (1)
hello.f:2.1:

implicit none                                                           
1
Error: Non-numeric character in statement label at (1)
hello.f:2.1:

implicit none                                                           
1
Error: Unclassifiable statement at (1)
hello.f:3.1:

real p                                                                  
1
Error: Non-numeric character in statement label at (1)
hello.f:3.1:

real p                                                                  
1
Error: Unclassifiable statement at (1)
hello.f:4.1:

parameter(p=3.1415926)                                                  
1
Error: Non-numeric character in statement label at (1)
hello.f:4.1:

parameter(p=3.1415926)                                                  
1
Error: Unclassifiable statement at (1)
hello.f:5.1:

write(*,*) sin(p/6)                                                     
1
Error: Non-numeric character in statement label at (1)
hello.f:5.1:

write(*,*) sin(p/6)                                                     
1
Error: Unclassifiable statement at (1)
hello.f:6.1:

end                                                                     
1
Error: Non-numeric character in statement label at (1)
hello.f:6.1:

end                                                                     
1
Error: Unclassifiable statement at (1)
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

baobiao007

木虫 (职业作家)

中国特色

【答案】应助回帖

感谢参与,应助指数 +1
不要用这么老土的Fortran 77风格语法写。。。。。。。。。。。。因为gfortran编译器不支持了。。。。。。。。。应该写成 real, parameter :: p = 3.1415926
我同意叔本华的观点,人们投身艺术和科学领域的强烈愿望之一就是逃离痛苦、残酷和枯燥无味的现实生活,逃离自己飘忽不定的七情六欲的桎梏。--爱因斯坦
2楼2015-01-13 22:26:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

qchem

铁杆木虫 (著名写手)


【答案】应助回帖

★ ★ ★ ★ ★
感谢参与,应助指数 +1
红叶cq: 金币+5, ★★★★★最佳答案, 谢谢您的回答,我知道问题出在哪里了,非常感谢! 2015-01-14 16:35:56
应该用code模式贴出完整的程序,你现在这个太乱了,看不明白。

文件后缀应该用f90,而不是f。

[ 发自小木虫客户端 ]
3楼2015-01-13 22:28:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

baobiao007

木虫 (职业作家)

中国特色

现在 fortran2003标准都出来很久了,那些该死的Fortran 77语法都该扔到垃圾桶里去了。。。。。。。。你可以看懂他们,但自己写代码的时候都应该遵循 fortran 90/95 甚至2003标准来写
我同意叔本华的观点,人们投身艺术和科学领域的强烈愿望之一就是逃离痛苦、残酷和枯燥无味的现实生活,逃离自己飘忽不定的七情六欲的桎梏。--爱因斯坦
4楼2015-01-13 22:28:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pippi6

铁杆木虫 (著名写手)

工程和科学数值计算咨询

引用回帖:
2楼: Originally posted by baobiao007 at 2015-01-13 22:26:13
不要用这么老土的Fortran 77风格语法写。。。。。。。。。。。。因为gfortran编译器不支持了。。。。。。。。。应该写成 real, parameter :: p = 3.1415926

real p
parameter(p=3.1415926)
这两个语句ok,f90 是支持的。事实上,f90/95 兼容 f77。风格没有好坏,自己习惯就好。
5楼2015-01-14 03:23:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

qchem

铁杆木虫 (著名写手)


引用回帖:
5楼: Originally posted by pippi6 at 2015-01-14 03:23:12
real p
parameter(p=3.1415926)
这两个语句ok,f90 是支持的。事实上,f90/95 兼容 f77。风格没有好坏,自己习惯就好。...

哈哈,有时候写程序真想来两句goto

[ 发自小木虫客户端 ]
6楼2015-01-14 07:05:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

红叶cq

木虫 (小有名气)

引用回帖:
5楼: Originally posted by pippi6 at 2015-01-14 03:23:12
real p
parameter(p=3.1415926)
这两个语句ok,f90 是支持的。事实上,f90/95 兼容 f77。风格没有好坏,自己习惯就好。...

你好,我刚刚接触fortran,想请教一下我究竟错在哪里,应该怎么改?谢谢
7楼2015-01-14 15:49:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

红叶cq

木虫 (小有名气)

引用回帖:
5楼: Originally posted by pippi6 at 2015-01-14 03:23:12
real p
parameter(p=3.1415926)
这两个语句ok,f90 是支持的。事实上,f90/95 兼容 f77。风格没有好坏,自己习惯就好。...

问题已解决,非常感谢!
8楼2015-01-14 16:33:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

liufeng0619

银虫 (正式写手)

引用回帖:
8楼: Originally posted by 红叶cq at 2015-01-14 16:33:37
问题已解决,非常感谢!...

楼主最终怎么解决的,我遇到的问题与你的类似
永远不要懒惰
9楼2015-08-07 19:09:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 红叶cq 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 今天系统多次维护,明天很可能放榜! +5 zju2000 2026-08-16 5/250 2026-08-16 23:23 by Haru815
[论文投稿] 岩土工程学报什么时候才能终审完呐 25+3 yeager111 2026-08-10 4/200 2026-08-16 20:42 by tfang
[基金申请] 2027广东省杰青 +3 奶牛小黑 2026-08-15 6/300 2026-08-16 20:07 by 奶牛小黑
[基金申请] 快农历七夕节了,轻松一下,男人悄悄话,女施主请不要进来。 +3 Tide man 2026-08-14 3/150 2026-08-16 17:47 by jurkat.1640
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +9 Ldrop2023 2026-08-13 9/450 2026-08-16 13:24 by wukun_007
[基金申请] 咱们一起用铁证分析2026国家社科基金中标与否 +7 启萌科技 2026-08-12 26/1300 2026-08-16 12:35 by 启萌科技
[基金申请] 我的国基提前知道中了,可是同事的操作让我实在接受不了,怎么会有这样的人 +11 家与远方 2026-08-10 16/800 2026-08-16 10:28 by ray43
[精细化工] 招聘 金属平磨液,抛光液研发工程师 +3 小天0311 2026-08-14 3/150 2026-08-16 07:31 by H9PLUS
[基金申请] filecode=后面第一个是大写字母 +6 wangze12014 2026-08-14 7/350 2026-08-15 20:12 by gltch
[基金申请] 关于Filecode分析方法 +10 majunge000 2026-08-10 13/650 2026-08-15 12:26 by hanpeng972
[基金申请] 奇怪,两个人的filecode固定段从头到尾一模一样 +8 布布和一二 2026-08-10 11/550 2026-08-14 14:58 by Equinoxhua
[基金申请] FileCode能看出啥? +10 要乐观耀哥 2026-08-10 32/1600 2026-08-14 09:37 by 要乐观耀哥
[基金申请] 静等基金结果 +8 gjjjzhong 2026-08-10 21/1050 2026-08-13 17:56 by 且听虎啸
[基金申请] 重要来源:本周末出结果 +10 瞬息宇宙 2026-08-12 10/500 2026-08-13 15:46 by likettle
[基金申请] 不应该看fileCode +7 且听虎啸 2026-08-12 9/450 2026-08-13 14:27 by flydreamws
[基金申请] 分享一下我之前已中青C的计划书的filecode +4 布布和一二 2026-08-11 5/250 2026-08-13 12:56 by cratir
[基金申请] 2019年青年基金涵评意见,大家看看几个A,几个B? +11 Tide man 2026-08-11 11/550 2026-08-13 07:35 by 撸猫猫
[基金申请] 什么时候出结果,有咨询渠道??? +3 Tide man 2026-08-11 3/150 2026-08-11 17:54 by kudofaye
[基金申请] 确定了,国自然21号放榜 +6 布布和一二 2026-08-10 7/350 2026-08-10 19:15 by 2000zf36392
[基金申请] 国自然结果 +4 Vierhys 2026-08-10 8/400 2026-08-10 15:06 by Vierhys
信息提示
请填处理意见