Select Code to Download

    for ($i=1; $i<1000; i++) {
 
      $sum_equ ={(1-$c[$i])(1-2*$q[$i])}/(-2*$q[$i]*$x +$x +$q[$i]) + 
+{$c[$i]*(2*$q[$i] -1)}/(2*$q[$i]*$x-$x+1)
    }

      when i=0; $sum_equ = (1 - 2*10)/(-2*10*$x +$x +10);
      when i=1; $sum_equ = (1 - 2*10)/(-2*10*$x +$x +10) +(2*5 -1)/(2*
+5*$x-$x+1);
      .....

      when i=999; $sum_equ = (1 - 2*10)/(-2*10*$x +$x +10) +(2*5 -1)/(
+2*5*$x-$x+1)+ ....... + (2*22 -1)/(2*22*$x-$x+1);

       for ($i=1;$i<1000;$i++) {
...
                } # End of if

        } #end of for