24小时热门版块排行榜    

查看: 832  |  回复: 3

yhwsmile

金虫 (小有名气)

[求助] 资料中计算某一段时间的数据,请问这个起始日期该如何判断呢?

我资料是从1971年1月1日开始的,计算蒸散,假设我现在只想计算1999年8月9日至2000年5月4日之间的数据,这个起始日期该如何判断然后继续计算呢?
年比较好判断,只需要iy>=y(i)就可以了,请问这个月和日该如何判断?程序里该如何实现啊。谢谢咯……

date.txt 里存放的是起始和结束日期,iy1,im1,id1为开始日期
y(i),m(i),d(i)为年月日

open(3,file='date.txt')
read(3,*)iy1,im1,id1,iy2,im2,id2

    do i=1,ii

           read (100,50,end=101)y(i),m(i),d(i),tt(i),tmax(i),tmin(i),rh(i),u(i),h(i)
           if(iy1>=y(i) ……
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

mengxc

木虫 (著名写手)

【答案】应助回帖


yhwsmile(金币+3): 呵呵,自己解决了,虽然自己弄的比较烦,但暂时解决了……还是谢谢你哦,有空试下你的方法…… 2011-06-01 17:01:04
余泽成(金币+1): 谢谢参与应助! 2011-06-02 00:10:33
yhwsmile(金币+1): 谢谢 2011-11-17 10:57:09
建议楼主将时间转换为儒略日表示,便于比较
具体参见http://baike.baidu.com/view/3749 ... dle\" border=\"0\">
2楼2011-06-01 16:35:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

mengxc

木虫 (著名写手)

3楼2011-06-01 17:02:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖


余泽成(金币+1): 谢谢参与应助! 2011-06-02 00:10:45
yhwsmile(金币+1): 谢谢 2011-11-17 10:56:56
你这个无非就是年月日全部对上就开始读数,到下一个时间点时,也要全部对上……除非你的数据不是按顺序排列的……
4楼2011-06-01 20:14:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 yhwsmile 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 324求调剂 +5 lucky呀呀呀鸭 2026-03-20 5/250 2026-03-20 22:30 by 促天成
[考研] 287求调剂 +7 晨昏线与星海 2026-03-19 8/400 2026-03-20 22:19 by JourneyLucky
[考研] 350求调剂 +5 weudhdk 2026-03-19 5/250 2026-03-20 22:04 by luoyongfeng
[考研] 求调剂 +5 Mqqqqqq 2026-03-19 5/250 2026-03-20 20:46 by zhukairuo
[考研] 271材料工程求调剂 +7 .6lL 2026-03-18 7/350 2026-03-20 09:10 by xingguangj
[考研] 081700化工学硕调剂 +3 【1】 2026-03-16 3/150 2026-03-19 23:40 by edmund7
[考研] 0703化学调剂 +4 18889395102 2026-03-18 4/200 2026-03-19 16:13 by 30660438
[考研] 286求调剂 +6 lemonzzn 2026-03-16 10/500 2026-03-19 14:31 by lemonzzn
[考研] 354求调剂 +4 Tyoumou 2026-03-18 7/350 2026-03-18 21:45 by Tyoumou
[考研] 一志愿武理材料305分求调剂 +5 想上岸的鲤鱼 2026-03-18 6/300 2026-03-18 17:53 by 无际的草原
[考研] 08工科 320总分 求调剂 +5 梨花珞晚风 2026-03-17 5/250 2026-03-18 14:49 by haxia
[考研] 280求调剂 +6 咕噜晓晓 2026-03-18 7/350 2026-03-18 11:25 by 无际的草原
[考研] 材料,纺织,生物(0856、0710),化学招生啦 +3 Eember. 2026-03-17 9/450 2026-03-18 10:28 by Eember.
[考研] 290求调剂 +3 p asserby. 2026-03-15 4/200 2026-03-17 16:35 by wangkm
[考研] 一志愿苏州大学材料工程(085601)专硕有科研经历三项国奖两个实用型专利一项省级立项 +6 大火山小火山 2026-03-16 8/400 2026-03-17 15:05 by 无懈可击111
[考研] 11408 一志愿西电,277分求调剂 +3 zhouzhen654 2026-03-16 3/150 2026-03-17 07:03 by laoshidan
[考研] 333求调剂 +3 文思客 2026-03-16 7/350 2026-03-16 18:21 by 文思客
[考研] 304求调剂 +5 素年祭语 2026-03-15 5/250 2026-03-16 17:00 by 我的船我的海
[考研] 26考研一志愿中国石油大学(华东)305分求调剂 +3 嘉年新程 2026-03-15 3/150 2026-03-15 13:58 by 哈哈哈哈嘿嘿嘿
[考研] 288求调剂 +4 奇点0314 2026-03-14 4/200 2026-03-14 23:04 by JourneyLucky
信息提示
请填处理意见