如何读取日序

love2100 · 发表于 2017-12-28 09:18:42

登录后查看更多精彩内容~

您需要登录才可以下载或查看，没有帐号？立即注册

x

各位大侠，本人读取一个文本文件，文本文件中每个记录的数据项依次为年、月、日，共有50年数据的。想输出的文本中每个记录的数据依次为年、月、日、日序。因为平年和闰年的年数是不同的，一个为365天，一个为366天。图片中的前三行为输入的文本，希望输出的文本中加上最后一行日序。自己编了几次，总是搞不定，哪位大侠知道如何解决这个问题呢？

言深深 · 发表于 2017-12-28 10:29:14

判断闰年的程序，供参考：

do iy=1974,2012
if(mod(iy,4).eq.0.and.mod(iy,100).ne.0.or.mod(iy,400).eq.0) then
is=is+366
else
is=is+365
endif

enddo

weinihou · 发表于 2017-12-28 11:27:31

lz你得说清楚是在什么地方卡住了呗

kwzx5566 · 发表于 2017-12-28 15:19:12

谢谢楼主分享

刘明旭 · 发表于 2018-1-10 14:04:44

用什么编的，可以fgets()函数读出每行，然后再加上想要的，写到新文件中去

love2100 · 发表于 2018-3-10 12:49:11

谢谢，我用的是FORTRAN程序编写的

		自动登录	找回密码
密码			立即注册

[求助] 如何读取日序

登录后查看更多精彩内容~