Question

составьте программу на языке паскаль для вычесления Y по формуле : Y=1-2X=3X^2-4X^3 , где X - натуральное число

Answer 1

var x,y:integer;
begin
write('x = ');
readln(x);
y:=1-2*x+3*x*x-4*x*x*x;
writeln('y = ',y);
end.

Пример:
x = 3
y = -86