Составить программы на pascal'e: дано число х, найти y = 3|x^3|-6x^2+7 и
y = 4(x-3)^2 - 14,65(x-3) + 2,5x.
, ❤️

1)
var
x,y : integer;
begin
readln(x);
y := 3*abs(x*x*x)-6*x*x+7;
writeln(y);
end.

2)
uses math;

var
x,y : real;
begin
readln(x);
y := 4*Power((x-3),2)-14.65*(x-3)+2.5*x;
writeln(y);
end.