24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 871  |  回复: 4

asui

管理员

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

[求助] fortran程序编译问题整不懂啊 已有1人参与

以下是我程序中的一部分
program Einttry
implicit none
integer N
N=5
complex c
c=(0.0,1.0)
integer nb
nb=5
print*,"nb=",nb,"c=",c
end

编译时出现如下错误:
MacdeMacBook-Pro:desktop mac$ gfortran hello.f90 -o hello
hello.f90:5:9:

complex c
         1
Error: (1)处有非预期的 数据声明 语句
hello.f90:7:10:

integer nb
          1
Error: (1)处有非预期的 数据声明 语句
hello.f90:6:1:

c=(0.0,1.0)
1
Error: Symbol ‘c’ at (1) has no IMPLICIT type
hello.f90:8:2:

nb=5
  1
Error: Symbol ‘nb’ at (1) has no IMPLICIT type
我用的是fortran的编译器,请问各位大神应该怎么修改程序?

谢谢了!!
回复此楼

» 猜你喜欢

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

fmying

超级版主

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

【答案】应助回帖

★ ★ ★
感谢参与,应助指数 +1
asui: 金币+3, 有帮助 2016-02-23 15:31:48
当你写下
c=(0.0,1.0)
的时候,就表示程序的声明部分已经结束,进入程序体了。然后后面又声明了一个整型变量:
integer nb

这就是编译出错的原因。把这两句的顺序换一下就可以了。
上善若水
2楼2016-02-21 17:07:56
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zeppe

主管区长

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

所有的声明结束再开始赋值

发自小木虫Android客户端
3楼2016-02-21 17:51:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

asui

超级版主

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

引用回帖:
2楼: Originally posted by fmying at 2016-02-21 17:07:56
当你写下
c=(0.0,1.0)
的时候,就表示程序的声明部分已经结束,进入程序体了。然后后面又声明了一个整型变量:
integer nb

这就是编译出错的原因。把这两句的顺序换一下就可以了。

谢谢,我知道了,第一次写fortran的程序
4楼2016-02-23 15:27:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

asui

兑换贵宾

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

引用回帖:
3楼: Originally posted by zeppe at 2016-02-21 17:51:49
所有的声明结束再开始赋值

谢谢了~
5楼2016-02-23 15:30:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 asui 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿南昌大学324求调剂 +10 hanamiko 2026-04-01 10/500 2026-04-01 15:14 by Wang200018
[考研] 求调剂 +5 零八# 2026-03-27 5/250 2026-04-01 14:40 by yulian1987
[考研] 296求调剂 +3 汪!?! 2026-03-31 6/300 2026-04-01 14:16 by 夜空空哦
[考研] 一志愿中农0710生物学,微生物方向总分338求调剂 +3 柒xxxx. 2026-03-26 3/150 2026-04-01 12:30 by 冰乌龙
[考研] 284求调剂 +11 小熊~~ 2026-03-31 11/550 2026-04-01 11:13 by 逆水乘风
[考研] 一志愿 南京航空航天大学 ,080500材料科学与工程学硕 +10 @taotao 2026-03-31 11/550 2026-04-01 09:43 by xiayizhi
[考研] 考研材料工程351分调剂 +5 整个好的 2026-03-31 5/250 2026-04-01 09:36 by topgun2009
[考研] 0805求调剂 +6 是水分 2026-03-31 6/300 2026-04-01 09:05 by oooqiao
[考研] 311(085601)求调剂 +12 liziyeyeye 2026-03-28 13/650 2026-04-01 00:34 by fmesaito
[考研] 070300化学专业279调剂 +10 哈哈哈^_^ 2026-03-31 10/500 2026-03-31 23:13 by liu823948201
[考研] 318求调剂 +3 笃行致远. 2026-03-31 3/150 2026-03-31 20:27 by 求调剂zz
[考研] 085602 307分 求调剂 +10 不知道叫什么! 2026-03-26 10/500 2026-03-31 19:53 by Dyhoer
[考研] 086000调剂 +5 7901117076 2026-03-26 5/250 2026-03-31 17:45 by 544594351
[考研] 269求调剂 +4 我想读研11 2026-03-31 4/200 2026-03-31 10:04 by cal0306
[考研] 一志愿大连理工大学材料求调剂 +6 Gymno 2026-03-30 6/300 2026-03-31 07:26 by 无际的草原
[考研] 一志愿食品科学与工程083200求调剂 +4 XQTJZ 2026-03-30 4/200 2026-03-31 04:10 by fmesaito
[考研] 福建理工大学材料学院先进合金团队招收考研调剂学生 +3 大华金商都 2026-03-30 4/200 2026-03-31 01:04 by 方英俊602
[考研] 303求调剂 +7 DLkz1314. 2026-03-30 7/350 2026-03-30 21:07 by peike
[考研] 一志愿北京化工大学材料与化工(085600)296求调剂 +25 稻妻小编 2026-03-26 25/1250 2026-03-30 20:11 by 滴滴上岸呀
[考研] 材料与化工(0856)304求B区调剂 +8 邱gl 2026-03-27 8/400 2026-03-28 12:42 by 唐沐儿
信息提示
请填处理意见