pascal初学者问题,急!!!!!

Question

我是一个编成初学者,刚学PASCAL
 在按照书上编以个程序,要求输入三个整数输出三个整数中最大的数
编好后我发现,如果输入5位以上的整数时答案就不正确;
  如输入:123456 123 456
      折输出的是456
小于5位数的就没有这个问题,各位大侠这是怎么回事啊?
我用的是Broland Pascal7.0
   
还有一个问题
输入三个数,按由大到小顺序打印出来怎么编,只用if,case语句
计算某年某月的天数怎么编,只用if,case语句
再次感谢!!!!!!!!!!

Answer 1

o ,第一个不明白。
第二个：
if ((X1>X2) and (X1>X3) and (X2>X3)) then write(x1,x2,x3)

Answer 2

1、数值越界了，使用longint定义。
2、case 月份 of
     1,3,5,7,8,10,12: 有31天；
     4，6，9，11： 有30天；
     2： if IsLeapYear(Year: Word) then 有28天 else 有29天
   end;