Ответ:     1.    program ReverseNum;

   2.      

   3.    var

   4.      n, a, b, c: word;

   5.      

   6.    begin

   7.      readln(n);

   8.      a := n mod 10;

   9.      n := n div 10;

 10.      b := n mod 10;

 11.      n := n div 10;

 12.      c := n;

 13.      n := 100 * a + 10 * b + c;

 14.      writeln(n)

 15.    end.

Строковый это string

Целый это integer

Вещественный это real

Логический это boolean

Символьный это char

Объяснение:Прости плохо видно я только это смог.

Не знаю точно но вроде так в первом