Ответ: 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
Объяснение:Прости плохо видно я только это смог.
Не знаю точно но вроде так в первом