24小时热门版块排行榜    

查看: 3031  |  回复: 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 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:15 by XQNyDCa1Tk5n
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 22:11 by XQNyDCa1Tk5n
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:06 by XQNyDCa1Tk5n
[教师之家] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:06 by XQNyDCa1Tk5n
[有机交流] OpenAI又攻克数学难题了,离AI做有机合成还有多远? +3 wangyl_123 2026-10-10 6/300 2026-10-11 15:04 by Abin0406
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 14:25 by VOMexwnDzOFZ
[公派出国] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +4 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 14:13 by VOMexwnDzOFZ
[教师之家] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 (EPI+-1)(金币-50) +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 14:05 by VOMexwnDzOFZ
[考研] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:51 by VOMexwnDzOFZ
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:45 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:54 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:53 by VOMexwnDzOFZ
[公派出国] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +4 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 10:53 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:34 by VOMexwnDzOFZ
[考博] 招收博士生一名 +3 mandolin 2026-10-10 3/150 2026-10-11 10:21 by 不是山谷!
[教师之家] 课题组会帮你通过考核么? +3 好运来~9527 2026-10-10 5/250 2026-10-11 09:00 by 好运来~9527
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 qR2AdCWTVtkw 2026-10-09 4/200 2026-10-11 03:14 by M0zrYVSAnxpE
[有机交流] 各位大佬,路线设计求助 +6 zapen 2026-10-08 8/400 2026-10-10 15:59 by zapen
[基金申请] 入职后第一次管课题组的专利缴费,对账才发现官费比别人多掏了一倍 +5 13108017953 2026-10-08 5/250 2026-10-10 11:15 by wdwd123
[有机交流] 我应该选哪条合成路线让实验成功率高一些? +5 jing816y 2026-10-08 9/450 2026-10-10 09:05 by zapen
信息提示
请填处理意见