主题：fortran 90 菜鸟求救！ 菜鸟求救！
c.fan
[专家分：0] 发布于 2011-05-28 23:23:00
程序如下：
data a,b,c/2*-1.0,1.0/
p=300*C-0.1*A-0.01*B
write(*,100) p
100 format(f7,3)
end
输出结果是00.110 为什么不是300.110 对于这类格式输入输出我表示很头痛，哪位大虾帮帮忙啊！！如果有好的学习文件，还请慷慨解救啊！
E-MAIL ;cfanchenfan@163.com
菜鸟在此谢过啦！！
回复列表 （共17个回复）
沙发
cgl_lgs [专家分：21040] 发布于 2011-05-29 22:20:00
这程序难道可以编译通过？！！
板凳
qiandashuai [专家分：30] 发布于 2011-05-30 06:29:00
请在本版或网上其他地方搜索fortran输出格式的相关问题，推荐彭国伦的书。
3 楼
cgl_lgs [专家分：21040] 发布于 2011-05-30 08:21:00
不仅是输出格式，实际上C也没有初始化。。。
4 楼
asymptotic [专家分：16630] 发布于 2011-05-30 10:49:00
俺想偷偷告诉 3 楼 cgl_lgs 网友：
data a,b,c/2*-1.0,1.0/ 等价于： data a,b,c/-1.0, -1.0, 1.0/
5 楼
asymptotic [专家分：16630] 发布于 2011-05-30 10:51:00
楼主的问题是： 100 format(f7,3)
这一行应该是笔误，编译器应该可以检测出来的。
data a,b,c/2*-1.0, 1.0/
p = 300 * c - 0.1 * a - 0.01 * b
write(*, "(F7.3)") p
6 楼
cgl_lgs [专家分：21040] 发布于 2011-05-30 11:35:00
[quote]俺想偷偷告诉 3 楼 cgl_lgs 网友：
data a,b,c/2*-1.0,1.0/ 等价于： data a,b,c/-1.0, -1.0, 1.0/[/quote]是我错了。。。我太粗心，忘了还有这规矩：）谢谢asymptotic兄~~~~
7 楼
c.fan [专家分：0] 发布于 2011-05-31 22:30:00
[em1]
8 楼
c.fan [专家分：0] 发布于 2011-05-31 22:39:00
[quote]楼主的问题是： 100 format(f7,3)
这一行应该是笔误，编译器应该可以检测出来的。
data a,b,c/2*-1.0, 1.0/
p = 300 * c - 0.1 * a - 0.01 * b
write(*, "(F7.3)") p[/quote]
这个程序输出为什么不是300.110啊？我确实还不大明白。。
9 楼
cgl_lgs [专家分：21040] 发布于 2011-05-31 23:42:00
输出理应是300.110。你截个图啥的？是不是在屏幕边儿上，输出了但你没看见啊？
10 楼
yeg001 [专家分：14390] 发布于 2011-06-01 00:07:00
我用cvf弱弱地试了一下, 结果正常.
命令行复制结果:
300.110
Press any key to continue
楼主用什么编译器, 什么环境?
data赋值这种使用除了编写个别物理中的特殊函数里面用过, 其他情况极少使用了.
我来回复
您所在位置：