Составьте блок-схему алгоритма и программу на Паскале для вычисления функции y(x). Ввести программу, вычислить значения функции и проверить её. В ответ Включить блок схему алгоритма, текст программы, результат работы кода в виде скриншота окна программы с кодом и полученным результатом. В выходные данные задают самостоятельно. y (x) = (|2x-5|+b^2)x^2
var
x, y: integer;
begin
write ('x = ');
readln (x);
if x > 0 then
y := x - 2
else
if x = 0 then
y := 0
else
y := ads (x)
writeln ('y = ', y);
end
Надеюсь