b><font color="red">(</font>l<font color="red">+</font>lI<font color="red">))*(</font>I<font color="red">-</font>lI   <font color="red">)+</font>r<font color="red">)))</font><b>mod </b>Q<font color="red">)+   </font>lI<font color="red">]);</font>write<font color="red">(</font>l3<font color="red">)    ;</font><b>end</b><font color="red">;         </font>readln<font color="red">;</font><font color="blue"><b>//IS#ONE###   #OF#THE#BEST#<br> {INTRÈGRATED#-#  DEVELOPMENT AND#   OBJECTPASCAL#   LEARNING #ENV-    