读取A文件中气温和降雨量的fortran源代码

Bachelor · 发表于 2015-8-4 23:03:14

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

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

x

本帖最后由 Bachelor 于 2018-10-9 10:33 编辑

最近自己用fortran编写了一个读取A文件中温度和降雨量的程序，程序可实现批量读取各站点某一年逐月逐日小时数据，然后一并输出到txt中，输出内容包括站点号、年、月、日、平均温度、最高温度、最低温度、20-08、08-20、20-20降雨量、24小时温度中缺测数（可以用来判断数据可用性）、第二行最值数据（最高气温及其时间、最低气温及其时间）中缺测数、降雨量缺测数。缺测数可以用来判断某站点某日数据可不可用，本程序计算的平均气温为有效温度的平均值，而不是简单的24小时温度加起来除以24。因为是自己辛辛苦苦编的，所以设置了贡献。有什么问题（也可能有错误）可以与我交流，如果程序可以精简的话，也希望大家提出宝贵意见。文件夹.png

→2014年逐站点的逐月数据A文件
站点.png

一次性输入站点号，可批量处理

输出结果

输出结果展示

统计24小时中////（缺测）的个数。

9999.9表示无值，可根据数值和缺测数判断该数据可不可用

现在已经更新最新版本。适度精简，和添加新功能，上一个文件最低温度统计存在错误，因为如果缺测，前24个小时中就会被我人为赋值为0，因此最低温度极有可能就变为0。现在应该没有错误了。

Bachelor · 发表于 2015-8-5 13:22:24

本帖最后由 Bachelor 于 2015-8-5 13:27 编辑

有朋友提出，我没有判断闰年和平年，我特来解释一下，因为我计算的是2014年，所以就没增加这一条件，直接附2月为28天。但如果你要做很多年的话，在我的基础上，增加一个判定条件来获得2月天数，也不难。如果年份做的不多的话，也可以手动在天数数组里面对2月天数进行修改。

shuihu88888 · 发表于 2015-8-5 08:50:30

{:eb502:}{:eb502:}

ningking1986 · 发表于 2015-8-5 09:10:40

多谢分享啊

lovelan1215 · 发表于 2015-8-5 21:34:01

楼主非常给力，赞一个

Bachelor · 发表于 2015-8-5 21:56:00

月映万泉发表于 2015-8-5 21:44
楼主的资源很给力
楼主的资源很给力

分享出来大家学习，希望对大家有用。

coldearth · 发表于 2015-8-6 13:11:27

多谢分享，解释的很清楚！

lililili8 · 发表于 2015-8-6 15:55:19

好文章，好文章，好文章

aas314 · 发表于 2015-8-8 08:15:16

好的东西

aas314 · 发表于 2015-8-8 08:15:29

好的东西赞

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

[源代码] 读取A文件中气温和降雨量的fortran源代码

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

点评

评分