Построение блок-схемы алгоритма с использованием цикла и
ветвления

Вычислите значение заданной
функции, если Х изменяется от Хнач до Хкон с ΔХ (в качестве
исходных данных может использоваться другая переменная. Если при
функции стоят знаки суммы (Σ̈) или произведения (Π) то ΔХ=1)


очень нужно,помогите пожалуйста,заранее спасибо!

function y1(var x: double): double;begin  if x <= 2 then begin    result := 3*x*cos(x);  end  else if x <= 8 then begin    result := 3*x*x*x - x*x;  end;end;function y2(var x: double): double;begin  result := x + power(e, -x);end;function z(var x: double): double;begin  result := power(y1(x), 2)+ y2(x);end;begin  var x : integer;  var x0: double;    for x := 0 to 8 do begin    x0 := x;    writeln(z(x0));  end;end.