var  counter1, counter2, SmaxL, SminL: Integer; 
    Lmax, Lmin, fenmu, fenzi,jieguo: Double;    Lmax := SmaxL div counter1;
    Lmin := SminL div counter2;     fenmu := Lmax - Lmin;
     fenzi := Lmax + Lmin; jieguo:=fenmu div fenzi ;提示 jieguo:=fenmu div fenzi ; 出错了 请问该如何改正?