Приписать по цифре a в начало и конец записи числа n (a вводится с клавиатуры)

Var a,n: integer;
  begin  write('Введите a: ');
  readln(a);
  n:=352346543;
writeln(a,n,a);
end.