hig3

<?php
$x1=range(1,3);
$y1=range(1,3);
$x2=range(1,3);
$y2=range(1,3);
condition:ne($y1,$y2);
$ans=maple("x-($x1)=(($x2)-($x1))/(($y2)-($y1))*(y-($y1))");
$ansdisp=maple("print(MathML[ExportPresentation]($ans))");
$grade=maple("proc(A,R) evalb(simplify(solve(A,x)-solve(R,x))=0) end proc;");
$ansplot=plotmaple("plot([solve($ans,x),y,y=-3..3],labels=[x,y])");