нужно решение на Pascal ABC

[EvilCry]

написать программу для вывода на экран последнюю букву строки.

Тема: Строчный тип данных

[Noor]

Вот пимер как удалить последнюю букву, а вы уж не поленитесь и переделайте под себя, работы на пару кликов

var
 s:string;
 i:integer;
begin
 readln(s);
 for i:=1 to length(s)-1 do begin
  delete(s,length(s)-1,1);
  writeln(s);
 end;
 readln;
end.

Вот еще, как подсказка

for i:=length(s) downto 1 do
writeln(copy(s,1,i));

И не ленимся читать : тут

[Mad_Cat]

1 пример удаляет не последнюю букву, а предпоследний символ он может быть и цифрой и знакоми применение цикла for в данной интерпретации не корректно. Если его и использовать то с down to.

[Noor]

Наблюдательностью блеснули, а теперь код предоставьте (да такой что бы различал что буква I это именно буква, а не знак который используется в обозначении века XI ), который устранит Вами изложенную проблемку. Хотя это задачи начального уровня и будет достаточно того кода который я предоставил для обработки и переделки (сорри за флуд)

[Mad_Cat]

если б нужно было печатать символ последний имхо хватило бы

writeln (s[length(s)]);

но тогда эту задачу с бааальшой натяжкой можно назвать учебной и цикл тут вообще ни к чему и написали получается вы много не нужного и лишнего точнее почти все не нужное и лишнее вот и ответ вроде аргументировал и нафлудилда и еще I в обозначении века это все таки ЦИФРА а не ЗНАК

[Serge_Bliznykov]

ребят или я чего-то не понимаю, или Вас куда-то не туда понесло..

для вывода на экран последнюю букву строки.

var s : string;
begin
   WriteLn('Введите строку:');
   Readln(s);
   if length(s)=0 then 
     WriteLn('Пустая строка.')
   else begin
     Write('Последняя буква строки: ');
     WriteLn(s[Length(s)]);
   end;
   readln
end.

ДОБАВЛЕНО

Сообщение от Mad_Cat

но тогда эту задачу с бааальшой натяжкой можно назвать учебной

полностью согласен.
мой код выше выводит как раз последний символ строки - это может быть и пробел и цифра и знак препинания и буква, всё, что угодно..
если суть задачи стоит найти именно БУКВУ, тогда требуется определение, что считать буквой (хотя бы буква какого алфавита)...

[Mad_Cat]

например строка 'а1111а1'. Ваша программа выведет '1' а это цифра и правильный ответ будет все таки 'а' потому что вывести надо последнюю БУКВУ

[Noor]

Дана строка типа :"Он жизнь закончил в веке XXI", как дать программе понять что "I"' это цифра, а не буква ?? (Это не в упрек Mad_Cat, просто, реально стало интересно )

[Abstraction]

Noor,
Никакими средствами адекватной задаче сложности это не делается - для такого разделения нужно, чтобы программа поняла текст. "Пользователь с ником XIV" и "Король Людовик XIV", например - последовательность букв одна и та же, толкование зависит от контекста. Можно считать записями чисел все слова, которые могут быть прочитаны как римские числа, например, но это паллиатив. А ведь ещё запись чисел буквами алфавита есть в кириллице, наверняка и в других старых языках...