Составить блок схему алгоритма нахождения числа z
Var z,x:integer; begin readln(z); if x>=4 then writeln(x-3); if x<0 then writeln(sqr(x));<br>if (x>0) and (x<=4) then writeln(sqrt(x+1));<br>readln; end.