письменно: составить блок-схему для нахождения значения функции у=3х+11. *составить алгоритм для задачи на языке Паскаль

pascal

program func;

var x, y: real;

begin

Write('Введите значение аргумента x =

ReadLn(x);

y := 2 * (x + abs(sqr(x-1)));

WriteLn('Y(', x, ') = ', y:1:2);

end