24小时热门版块排行榜    

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

RwingRWING

新虫 (初入文坛)

[求助] FORTRAN的结果字符长度是多?程序没有错误,但是得到的结果一直是0,请前辈们赐教。 已有4人参与

程序和运行结果都已经截图了,请大家指点迷津。

FORTRAN的结果字符长度是多?程序没有错误,但是得到的结果一直是0,请前辈们赐教。
360截图20150420192153249.jpg
回复此楼

» 猜你喜欢

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

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖支持 ( 显示支持度最高的前 50 名 )

未岸亡灵

铁杆木虫 (著名写手)

暂时离开小木虫


【答案】应助回帖

★ ★ ★
感谢参与,应助指数 +1
RwingRWING: 金币+3, ★★★很有帮助 2015-04-23 14:37:39
添加IMPLICIT NONE
正确定义浮点数,整数

不要整这种既有整数又有浮点数的混合运算,算前统一一下
2楼2015-04-20 20:36:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

seanbsd

木虫 (小有名气)

【答案】应助回帖

感谢参与,应助指数 +1
即使LZ的程序不声明取消所有的默认设置,也会按照缺省的运算操作来执行。还是请LZ看下表达式上是不是从公式翻译过来的时候出现了运算符的差异。希望能帮到你。
3楼2015-04-21 09:48:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

bb_polarlight

金虫 (小有名气)

【答案】应助回帖

★ ★
感谢参与,应助指数 +1
RwingRWING: 金币+2 2015-04-23 14:38:00
在第二行加上语句implicit none
然后对每个变量明确的定义类型,整型(int)或者实型(double).
Q定义为double
5楼2015-04-22 09:02:38
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

seanbsd

木虫 (小有名气)

【答案】应助回帖

同意4楼的说法,我看了下你的输入的数据,M=0,带入公式中0her任何数相乘结果肯定是0而不可能是其他的数值。
8楼2015-04-22 14:15:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

seanbsd

木虫 (小有名气)

您需要检查您的输入,M是否为零。如果为零,结果肯定为零;如果不为零,则需要加入一个说明,就是定义所有的变量均是实数,否则会因为从整形到实型的转变引起结果为0.
9楼2015-04-22 14:51:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

qchem

铁杆木虫 (著名写手)


【答案】应助回帖

感谢参与,应助指数 +1
m输入的是0,那结果乘出来当然也就是0了

[ 发自小木虫客户端 ]
4楼2015-04-22 07:16:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

RwingRWING

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by 未岸亡灵 at 2015-04-20 20:36:52
添加IMPLICIT NONE
正确定义浮点数,整数

不要整这种既有整数又有浮点数的混合运算,算前统一一下

重新定义了,输入数据以后,没有反应
6楼2015-04-22 10:06:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

RwingRWING

新虫 (初入文坛)

引用回帖:
3楼: Originally posted by seanbsd at 2015-04-21 09:48:17
即使LZ的程序不声明取消所有的默认设置,也会按照缺省的运算操作来执行。还是请LZ看下表达式上是不是从公式翻译过来的时候出现了运算符的差异。希望能帮到你。

重新检查了公式,没有错误。
7楼2015-04-22 10:13:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

RwingRWING

新虫 (初入文坛)

引用回帖:
9楼: Originally posted by seanbsd at 2015-04-22 14:51:33
您需要检查您的输入,M是否为零。如果为零,结果肯定为零;如果不为零,则需要加入一个说明,就是定义所有的变量均是实数,否则会因为从整形到实型的转变引起结果为0.

m值为零是手误输错了,按照各位前辈的指点,已经把程序调试好,可以运行了。谢谢
10楼2015-04-22 17:38:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 RwingRWING 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 304求调剂 +12 素年祭语 2026-03-31 15/750 2026-04-01 22:41 by peike
[考研] 266分,一志愿电气工程,本科材料,求材料专业调剂 +8 哇呼哼呼哼 2026-04-01 8/400 2026-04-01 21:41 by cal0306
[考研] 290求调剂 +5 dfffsar 2026-03-29 5/250 2026-04-01 19:45 by 6781022
[考研] 085600,320分求调剂 +5 大馋小子 2026-04-01 6/300 2026-04-01 19:40 by 唐沐儿
[考研] 化学308分调剂 +13 你好明天你好 2026-03-30 14/700 2026-04-01 16:19 by yanflower7133
[考研] 求调剂 +4 图鉴212 2026-03-30 5/250 2026-04-01 15:32 by 图鉴212
[考研] 省双一流重点一本大学招收调剂 +4 wwwwffffff 2026-03-31 7/350 2026-04-01 15:23 by wwwwffffff
[考研] 330分求调剂 +11 qzenlc 2026-03-29 11/550 2026-04-01 14:32 by chenqifeng666
[考研] 326求调剂 +4 崽崽仔 2026-03-31 4/200 2026-04-01 09:58 by 我的船我的海
[考研] 349求调剂 +6 zwjjjjjj 2026-03-31 6/300 2026-04-01 09:16 by JourneyLucky
[考研] 254材料与化工求调剂 +3 翰冬林楠 2026-03-30 4/200 2026-03-31 17:53 by yishunmin
[考研] 266分,求材料冶金能源化工等调剂 +8 哇呼哼呼哼 2026-03-27 10/500 2026-03-31 13:35 by Huaxue_Wang
[考研] 哈尔滨工业大学材料与化工专硕378求调剂 +3 塔比乌斯 2026-03-30 3/150 2026-03-30 22:55 by 无际的草原
[考研] 材料化工340求调剂 +3 jhx777 2026-03-30 3/150 2026-03-30 17:54 by JourneyLucky
[考研] 348求调剂 +6 小懒虫不懒了 2026-03-28 6/300 2026-03-30 10:29 by Evan_Liu
[考研] 356求调剂 +4 gysy?s?a 2026-03-28 4/200 2026-03-29 10:32 by 唐沐儿
[考研] 305求调剂 +8 RuiFairyrui 2026-03-28 8/400 2026-03-29 08:22 by fmesaito
[考研] 一志愿211院校 344分 东北农业大学生物学学硕,求调剂 +5 丶风雪夜归人丶 2026-03-26 8/400 2026-03-27 19:22 by 丶风雪夜归人丶
[考研] 08开头275求调剂 +4 拉谁不重要 2026-03-26 4/200 2026-03-27 14:12 by Delta2012
[考研] 一志愿吉大071010,316分求调剂 +3 xgbiknn 2026-03-27 3/150 2026-03-27 10:36 by guoweigw
信息提示
请填处理意见