Найти значение функции : y= 3x^2-6x-7
"^" -степень.

В принципе, можно было использовать перегрузку функций, ну и так сойдет...

//прога на Pascal`evarx : int64;//function f (x: int64):int64;beginf:=3*x*x-6*x-7;end;//beginwrite ('Введите значение X: ');readln (x);writeln ('y = ', f(x));end.