Try
Assuming[alpha>1,expr=1-2455/10^4==4Integrate[t^(1-1/alpha)(1-t)^(1/alpha),{t,0,1/2}]Integrate[t^-(1/alpha)(1-t)^(1/alpha),{t,0,1/2}]]
FindRoot[expr,{alpha,2}]
and
FindInstance[1-2455/10^4==4Integrate[t^(1-1/alpha)(1-t)^(1/alpha),{t,0,1/2}]Integrate[t^-(1/alpha)(1-t)^(1/alpha),{t,0,1/2}]&&alpha>2,alpha]
There should be ways to get NSolve
and Solve
to do this for you.
And there will be even more ways of doing this.