Question

Написать программу которая вычисляет значение выражения f(x)=x²-3•x-1

Answer 1

Ответ:

var y, x:Integer;

begin

readln(x);

y:=sqr(x)-3*x-1;

write(y);

end.