Написать программу вычисления значения выражения
1) a = (d + c + b)*e - 5k - 1
2) c = |x + 4| - |x2 - 3x + 6|

Спасибо большое

1)var a,b,c,d,e,k : real;beginwriteln('Введите ,b,c,d,e,k');read(,b,c,d,e,k);a:= (d + c + b)*e - 5k - 1writeln(a);end;2)var c,x : real;beginwriteln('Введите x');read(x);c:= abs(x+4) - abs(sqr(x)-3*x+6);writeln(c);end.