Составьте блок-схему к задаче пожалуйста

[email protected] в категроии Информатика, вопрос открыт 14.05.2018 в 00:53

program aaa;
var y,x,a,pi:real;
begin
pi:=3.14;
a:=0.8;
x:=0;
while x<=pi do begin
if x<(pi/2) then y:=sqrt(a*sin(3*x)+1)
else y:=cos(3*x)/sqrt(a*sin(3*x)+1);
x:=x+0.3;
writeln(y);
end
end.