Question

Дано число примечать этому числу с право и слево 1

Answer 1

Var
  n: integer;
begin
  write('Введите число: ');
  read(n);
  writeln('Полученное число: 1', n, '1')
end.