На отрезке [2,3] с шагом 0,1 выстроить точечную диаграмму: Y=(x^2+2x+13)/(x+3)

program zzz1;

uses GraphABC;

var x, y: real; // задаем переменные не целого типа

begin

setwindowsize(200,200);

x:= 2; // задаем начальное значение для переменной х

while x lt;= 3.1 do // организуем цикл, в котором переберем все числа от десяти до единицы через единицу

begin

y:=(sqr(x) + 2 * x + 13)/sqrt(x + 3); // вычисляем значение по заданной формуле

x:= x + 0.1; // увеличиваем переменную х на значение шага

putpixel(trunc(x*10), trunc(y*10), clred); // ставим точку красноватого цвета в координаты x, y

end;

end.