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

var y, x: real;begin read(x); if x < 4 then y := 2 * sqr(x) * x + 1 / x - 5; if x >= 4 then y := 3 * sqr(x) - 2; writeln(y);end.

var y, x: real;beginread(x);if x < 4 then y:= 2*sqr(x)*x + 1/ x - 5;if x>= 4 then y:= 3*sqr(x) - 2;writeln(y);end.