Fortran Coder

查看: 8415|回复: 6
打印 上一主题 下一主题

[输入输出] 有关输出格式不正确的求助~

[复制链接]

9

帖子

3

主题

0

精华

入门

F 币
50 元
贡献
33 点

规矩勋章

跳转到指定楼层
楼主
发表于 2015-7-23 17:43:16 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

[Fortran] 纯文本查看 复制代码
program main
implicit none

integer :: year

write(*,*) "请输入年份:"
read(*,*) year
if ( (mod(year,4))==0 .or. (mod(year,400)==0 .and. mod(year,100)==0) ) then
	write(*,"('该年是闰年,且一年有'I3'天' )" ) '366'
else
	write(*,"('该年不是闰年,一年有'I3'天' )" ) '365'
end if
stop	 
end

这个输出格式不正确,哪位大神可以来指点一下呀~~~我是新学的~~
分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩
我有我的大梦想。

9

帖子

3

主题

0

精华

入门

F 币
50 元
贡献
33 点

规矩勋章

沙发
 楼主| 发表于 2015-7-23 18:01:09 | 只看该作者
我贴上去的09与11行后面的数字应该去掉单引号,我忘记去掉了~~~~
可是为什么前面那么多汉字没有输出来呢,输出来的是乱码
我有我的大梦想。

1967

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1369 元
贡献
581 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

板凳
发表于 2015-7-23 19:01:41 | 只看该作者
在我这里去掉引号以后是可以正常输出的。不知道你用的什么编译器?

9

帖子

3

主题

0

精华

入门

F 币
50 元
贡献
33 点

规矩勋章

地板
 楼主| 发表于 2015-7-24 10:15:17 | 只看该作者
fcode 发表于 2015-7-23 19:01
在我这里去掉引号以后是可以正常输出的。不知道你用的什么编译器?

我用的是fortran power station4.0……

我这里输出的是:媚晔侨蚰辏乙荒暧?66天
我有我的大梦想。

1967

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1369 元
贡献
581 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

5#
发表于 2015-7-24 12:52:52 | 只看该作者
换一个编译器吧。这垃圾编译器,早该淘汰了。

9

帖子

3

主题

0

精华

入门

F 币
50 元
贡献
33 点

规矩勋章

6#
 楼主| 发表于 2015-7-24 15:04:49 | 只看该作者
fcode 发表于 2015-7-24 12:52
换一个编译器吧。这垃圾编译器,早该淘汰了。

好的~~我们比较常用哪种编译器呀~我是win7
我有我的大梦想。

1967

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1369 元
贡献
581 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

7#
发表于 2015-7-24 15:15:10 | 只看该作者
http://choose.fcode.cn 选择编译器
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-5-11 14:28

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表