Определить на какую букву оканчивается последнее слово - Pascal ABC

Определить на какую букву оканчивается последнее слово

Листинг программы

var s:string;
BEGIN
Readln (s);
Writeln (s[Length(s)]);
END.

Объяснение кода листинга программы

Переменная s инициализируется значением типа string.
Функция Readln используется для чтения строки из стандартного ввода.
Строка, прочитанная из стандартного ввода, сохраняется в переменной s.
Вызов функции Writeln используется для вывода последней буквы строки s на экран.