Составить программу на языке Паскаль для вычисления и печати таблицы значений функции Y=sin2(x-1)+2cos((x-1)/2), при условии, что X0=0.3, Xк=1.7, DX=0.2.

// PascalABC.Net v2.2 build 1019program znanija_12709887;const     xMin = 0.3;    xMax = 1.7;     xStep = 0.2;var     y : real;    x : real;begin    x := xMin;    while x <= xMax do begin        y := sin(2)*(x - 1) + 2 * cos((x - 1) / 2);        writeln ('x = ' , x, ' y = ', y);        x := x + xStep;    end;  end.