Написать программу на Pascal, используя рекурсию:
Дан набор символов, оканчивающихся пробелом (короче это слово), Вывести символы в обратном порядке, используя рекурсию.

program pos;var    s: string;    l: integer;procedure PrintChar(n: integer);var    sub: string;begin    sub := Copy(s, n, 1);    write(sub);    if n <> 1 then        PrintChar(n - 1);end;begin    write('Введите слово: ');    readln(s);    l := Length(s);    PrintChar(l);end.