Что может относится к осязанию

ответ:

осязание - одно из пяти основных видов чувств, к которым способен человек, заключающее в способности ощущать прикосновение, воспринимать что либо рецепторами, расположенными в коже, мышцах, слизистых оболочках. различный характер имеют ощущения, вызываемые прикосновением, давлением, вибрацией, действий фактуры и протяжённости. обусловлены работой двух видов рецепторов кожи: нервные окончаний, окружающих волосяные луковицы, и капсул, состоящих из клеток соединительной ткани.

program p1; vara: string; i: integer; beginreadln(a); for i: =length(a) downto 2 dobeginif a[i]=a[i-1]then delete(a,i,1); end; writeln(a); end.

ввел: asdfsss

результат: asdfs

либо я не знаю либо нужно подумать. но символу нельзя присвоить число ему можно присвоить только символ.

program ssd;

  uses crt,graph;

  var   a,a1,a2,a3: integer;

  begin

  clrscr;

  writeln('введите трехзначное число');

  readln(a);

  a1: = a mod 10;

  a2: =(a div 10) mod 10;

  a3: = a div 100;

  writeln('      ',a1,a2,a3);

  readkey;

end.