program znx;
uses math;
var x, y: real;
begin
write('Введите значение x: ');
readln(x);
y := 3 * power(x, 6) - 6 * sqr(x) - 7;
write('Y = ', y);
end.
program znx;
uses math;
var x, y: real;
begin
write('Введите значение x: ');
readln(x);
y := 3 * power(x, 6) - 6 * sqr(x) - 7;
write('Y = ', y);
end.