На Паскале:
var t,x,a:integer;
begin
write('Введите значение x: ');
read(x);
write('Введите значение a: ');
read(a);
t:=(2*sqr(a)-5*a)-3*x;
writeln('t = ',t);
end.
