[size=18px]var s,n:integer;
begin
write('输入变长的条数n');        
readln(n);
[color=#FF0000]s:=n*(n-1)*(n-2)div 6;    //本行替换为s:=n*(n-1)*(n-2)/ 6;怎么不行???[/color]
writeln('组成的三角形个数',s);
readln;
[/size]

解决方案 »

  1.   

    div 用于整数
    / 不限于整数详见帮助
      

  2.   

    / 就是普通除法, DIV是去整 除法     10/4 =2.5  接可以是real,extended等   10 div 4 =2 结果肯定是整数
      

  3.   

      参与运算的数据也有要求 / 任意   div 必须是整数
      

  4.   


                   操作数            结果类型/    实数除     整数, 实数           实数 div  整数除       整数                 整数  
      

  5.   

    /可以是浮点数相除,当然也可以是整型,整型相除结果好像同 div
    div只能是整型相除,得整型