用Delphi编程从键盘输入年份月份，输出对应月的天数

包含：uses DateUtils
var date_: TDate
将你输入的日期转化为TDate类型 date_ := StrToDateTime(你的输入)
调用：DaysInMonth(date_);返回的就是该月天数
建议你用Delphi自带的日期控件DateTimePicker比较方便（不用转换了）

您好！三年四个月等于多少天，我们可以先将三年转换成天数，再将四个月转换成天数，最后将两个天数相加即可。
一年有365天，所以三年有3653=1095天。
一个月平均有3044天，所以四个月有30444=12176天。
将1095天和12176天相加，得到的结果是121676天。但是实际上，四个月不一定都是12176天，因为不同的月份天数是不同的。所以，我们需要将四个月的具体天数计算出来，再将其加入到总天数中。
假设这四个月分别是1月、2月、3月和4月，它们的天数分别是31天、28天、31天和30天。则四个月的总天数是31+28+31+30=120天。
将1095天和120天相加，得到的结果是1215天。因此，三年四个月等于1215天。
希望我的回答能够帮到您，如果您还有其他问题，请随时提出。

---