Составте программу для вычисления значения функции y={^3x-1,если x>3;10 для всех остальных значений.
Var y,x: Integer;
begin
writeln('Введите x');
readln(x);
if (x>3) then y:=3*x-1
else y:=10;
writeln('Ответ, y = ', y);
end.