- 用pascal编输出月份的天数程序输入年份，月份，输出天数最简洁
- 输入年份，月份，输出天数
最简洁的方法。
- 除了韵年（那个字打不出来）有点裹筋，这个题真得不难
program tianshu(input,output);
var
year,month,day:integer;
begin
readln(year,month);
case month of
2:if year mod 4=0 then day:=29
else day:=28;
1,3，5，7，8，10，12：day:=31;
4,6,9,11:day:=30;
end;
writeln(day:3);
end.
输出语句里面加一些说明的字符串，更好。