首页 > 试题广场 >

计算日期到天数转换

[编程题]计算日期到天数转换

热度指数：180389 时间限制：C/C++ 1秒，其他语言2秒空间限制：C/C++ 32M，其他语言64M
算法知识视频讲解

$\hspace{15pt}$ 每一年中都有 $12$ 个月份。其中， $1,3,5,7,8,10,12$ 月每个月有 $31$ 天； $4,6,9,11$ 月每个月有 $30$ 天；而对于 $2$ 月，闰年时有 $29$ 天，平年时有 $28$ 天。
$\hspace{15pt}$ 现在，对应输入的日期，计算这是这一年的第几天。

$\hspace{15pt}$ 一个年份是闰年当且仅当它满足下列两种情况其中的一种：
$\hspace{23pt}\bullet\,$ 这个年份是 $4$ 的整数倍，但不是 $100$ 的整数倍；
$\hspace{23pt}\bullet\,$ 这个年份是 $400$ 的整数倍。

输入描述:

在一行上输入三个整数 ，分别代表年、月、日。保证输入的日期是合法的。

输出描述:

输出一个整数，代表输入的日期是这一年的第几天。

示例1

输入

2012 12 31

输出

说明

 年是闰年，因此  年  月  日是这一年的第  天。

示例2

输入

1982 3 4

输出

算法知识视频讲解

郭灬

end<-readLines("stdin")
end_1<-gsub("\\ ","",end)
end<-gsub("\\ ","\\-",end)
end_1<-as.numeric(end_1)
begin<-substr(end_1,start=1,stop=4)
begin_01<-c("01")
begin<-paste(begin,begin_01,begin_01,sep = " ")
begin<-gsub("\\ ","\\-",begin)
begin<-as.Date(begin)
end<-as.Date(end)
Days<-difftime(end,begin,units="days")
Days<-gsub("\\ ","\\",Days)
Days<-as.numeric(Days)
Days<-Days+1
cat(Days)

发表于 2022-02-05 22:05:23 回复(0)