Запишите на языке Паскаль в виде участка программы следующую блок-схему:
X:=10; write ('введите А'); readln (A); if (A>5) then y:=10-A*x else y:=10+A*x; writeln (y);