Построить в pascalabc график функции y=+5*sinx одз: x≠1 50 +25 за лучший

В комплекте PascalABC.NET в папке
..\pascalABC\Samples\Graphics\GraphABC\
есть файл graphic.pas
меняешь функцию на нужную тебе и получаешь рещультат.

function f(x: real) := 10/(x-1) + 5 * sin(x);

скриншот работы и измененная программа в приложениях.