Пожалуйста помогите! Нужна только блок-схема.
var
x:real;
begin
x:=-1.23;
while x<=6.23 do begin<br> if x<0 then<br> Writeln('X=',x:5:2,', логарифм определен только для X>0')
else
Writeln('X=',x:5:2,', Y=',5.3*sqrt(abs(x*x*x))+cos(ln(x)+12.6));
x:=x+0.95
end
end.